Адрес этой странички : http://spcalc.narod.ru/spcalc_func_math.htm
spCalc.exe
Интерпретатор скриптов.
ВНИМАНИЕ !
Прежде, чем читать этот документ, крайне
рекомендуется детально ознакомиться с
документом :
"Библиотека скриптов FastScript 1.4. Руководство разработчика"
( http://spcalc.narod.ru/download/fs14_ru_rtf.zip
).
Проверка корректности числа (строка).
function IsNumber(Sx : string) : boolean;
Проверка корректности целого в строке
function ValidInt(cInt: String): Boolean;
Проверка корректности цисла с плавающей
запятой в строке
function ValidFloat(cFlt: String): Boolean;
Перевод целого 10-чного числа (v10)
в систему счисления с основанием (BaseAnother)
function Int10_to_Another(v10 : cardinal;
BaseAnother : integer) : string;
BaseAnother
= 2..36
Перевод целого числа в строковом
представлении (vAnother)
из системы счисления BaseAnother
в десятичную систему счисления
function IntAnother_to_10(vAnother : string;
BaseAnother : integer) : cardinal;
BaseAnother
= 2..36
Конвертация римских цифр в арабские
function RomanToDec(Value: string): Cardinal;
Конвертация арабских цифр в римские
function DecToRoman(num: Cardinal): String;
Вычисление коэффициентов регрессии для
линейной функции
function Regress_Line(ListData : TStrings;Var A,B
: real) : Boolean;
Вычисление
коэффициентов регрессии для квадратичной
функции
function Regress_Square (ListData : TStrings;Var A,B,C :
real) : Boolean;
Перевод целого в строку
function IntToStr(i: Integer): String;
Перевод числа с плавающей запятой в строку
function FloatToStr(e: Extended): String;
Перевод числа (real) в строку
function spRealToStr(R : real; Precis : integer)
: string;
Precis – кол-во
знаков после запятой
Перевод строки в целое
function StrToInt(s: String): Integer;
Перевод строки в число с плавающей запятой
function StrToFloat(s: String): Extended;
Конвертировать строку в число (integer)
function spStrToInt(Sx : string; DefValue :
integer) : integer;
DefValue –
значение по умолчанию (если строка – не
число)
Конвертировать строку в число (real)
function spStrToReal(Sx : string;DefValue : real)
: real;
DefValue –
значение по умолчанию (если строка – не
число)
Конвертировать строку в число (extended)
function spStrToExtended(Sx : string;DefValue :
Extended) : Extended;
DefValue –
значение по умолчанию (если строка – не
число)
Конвертировать строку в число (cardinal)
function spStrToCardinal(Sx : string;DefValue :
Cardinal) : Cardinal;
DefValue –
значение по умолчанию (если строка – не
число)
Инкремент числа
procedure Inc(var i: Integer; incr: Integer = 1);
Декремент числа
procedure Dec(var i: Integer; decr: Integer = 1);
Округление числа до ближайшего
function Round(e: Extended): Integer;
Усечение числа до меньшего
function Trunc(e: Extended): Integer;
Возвращает целую часть числа
function Int(e: Extended): Integer;
Возвращает дробную часть числа
function Frac(X: Extended): Extended;
Возвращает квадратный корень из числа
function Sqrt(e: Extended): Extended;
Квадрат числа
function Sqr(X: Extended): Extended;
Возвращает
модуль числа
function Abs(e: Extended): Extended;
Синус
function Sin(e: Extended): Extended;
Косинус
function Cos(e: Extended): Extended;
Арктангенс
function ArcTan(X: Extended): Extended;
Тангенс
function Tan(X: Extended): Extended;
Арккосинус
function ArcCos(X: Extended): Extended;
Арксинус
function ArcSin(X: Extended): Extended;
Гиперболический Синус
function Sinh(e: Extended): Extended;
Гиперболический Косинус
function Cosh(e: Extended): Extended;
Гиперболический Арктангенс
function ArcTanh(X: Extended): Extended;
Гиперболический Тангенс
function Tanh(X: Extended): Extended;
Гиперболический Арккосинус
function ArcCosh(X: Extended): Extended;
Гиперболический Арксинус
function ArcSinh(X: Extended): Extended;
Градусы -> Радианы
function DegToRad(Degrees: Extended): Extended;
Радианы
-> Градусы
function RadToDeg(Radians: Extended): Extended;
Грады -> Радианы
function GradToRad(Grads: Extended): Extended;
Радианы
-> Грады
function RadToGrad(Radians: Extended): Extended;
Экспонента
function Exp(X: Extended): Extended;
Натуральный
логарифм
function Ln(X: Extended): Extended;
Десятичный
логарифм
function Log10(X: Extended): Extended;
Двоичный
логарифм
function Log2(X: Extended): Extended;
Логарифм числа X по основанию Base
function LogN(Base,
X: Extended): Extended;
Инициализация генератора псевдослучайных
чисел
procedure Randomize;
Генерация псевдослучайного числа (0..1)
function Random: Extended;
Генерация псевдослучайного числа (0..N)
function RandomN(N :
Integer): Extended;
Возвращает случайное число,
распределенное по нормальному закону
распределения с заданным математическим
ожиданием и дисперсией
function RandomGauss(Mx, Sigma: Extended): Extended;
Возвращает случайное число,
распределенное по экспоненциальному
закону распределения
function RandomExponent(ex: Extended): Extended;
Возвращает случайное число,
распределенное по закону Гамма-распределения
function RandomGamma(k, a: Extended): Extended;
Возвращает случайное число,
распределенное по закону распределения
Паскаля
function RandomPascal(k, q: Extended): Extended;
Возвращает случайное число,
распределенное по биноминальному закону
распределения
function RandomBinom(n, p: Extended): Extended;
Возвращает случайное число,
распределенное по гипергеометрическому
закону распределения
function RandomGipgeo(tn, ns, p: Extended): Extended;
Форматирование числа с плавающей запятой
function FormatFloat(Fmt: String; Value:
Extended): String;
Возведение в
степень
function Power(Base, Exponent: Extended): Extended;
Возведение в
степень
function IntPower(Base: Extended; Exponent: Integer):
Extended;
Корень квадратный из суммы квадратов 2-х
чисел Sqrt(X**2
+ Y**2)
function Hypot(X, Y: Extended): Extended;
Возвращает минимальное значение из 2-х
величин
function Min(A,B: Extended): Extended;
Возвращает максимальное значение из 2-х
величин
function Max(A,B: Extended): Extended;
Возвращает знак аргумента
0 -> X=0;
-1 -> X<0; 1 -> X>0
function Sign(X:Extended):Integer;
Факториал
function Factorial(N : Cardinal):Cardinal;
Проверка целого числа на нечетность (true,
если N –
нечетное)
function Odd(N : Cardinal): boolean;
©
Sergey Popov, Usinsk, Komi, 2007