3.5. Стандартные функции

Для выполнения часто встречающихся вычислений и преобразований язык Delphi предоставляет программисту ряд стандартных функций. Значение функции связано с ее именем. Поэтому функцию можно исполь­зовать в качестве операнда выражения, например в инструкции присваива­ния. Так, чтобы вычислить квадратный корень, достаточно записать k:=sqrt(n), где Sqrt – функция вычисления квадратного корня,

n – пере­менная, которая содержит число, квадратный корень которого надо вычис­лить.

Функция характеризуется типом значения и типом параметров. Тип пере­менной, которой присваивается значение функции, должен соответствовать типу функции. Точно так же тип фактического параметра функции, т. е. параметра, который указывается при обращении к функции, должен соот­ветствовать типу формального параметра. В противном случае компилятор вы­водит сообщение об ошибке.

3.5.1.Математические функции

Математические функции (табл. 3.6) позволяют выполнять различные вы­числения.

Таблица 3.6

Математические функции

Функция	Описание	Аргумент
Abs(X)	Абсолютное значение	Целое или действительное выражение
Arctan(X)	Арктангенс X
Cos (X)	Косинус X	Аргумент X – угол в радианах
Exp(x)	экспонента	Действительное выражение
Frac(x)	Дробная часть аргумента X-Int(x)	Действительное выражение
Int(x)	Целая часть аргумента	Действительное выражение
IntPower(X, E)	Возведение X в целую степень E	Выражения Extended и Integer
Ln(X)	Натуральный логарифм от X	Действительное выражение
Log10(X)	Десятичный логарифм от X	Extended
Max(A, B)	Максимум двух чисел	Выражения Integer,Int64, Single, Double, Extended
Min(A,B)	Минимум двух чисел	Выражения Integer,Int64, Single, Double, Extended
Pi	Число: 3.1415926535897932385
Random (Range)	Генерирует последовательность целых или действительных случайных чисел	Параметр Range не является обязательным. Если параметр не задан, то функция возвращает случайные действительные числа X, равномерно распределённые в интервале 0 < = X < 1. Если задан, например, Random (101) то можно получить последовательность чисел от 0 до 100
Power(X, E)	Возведение X в произвольную степень E	Выражения Extended
Round (X)	Ближайшее целое аргумента	Действительное выражение
Sign (X)	Определяет знак аргумента	Действительные и целые выражения
Sqr (X)	Квадрат аргумента: X*X	Выражение Extended
Sqrt (X)	Квадратный корень	Выражение Extended
Sin (X)	Синус X	Аргумент X – угол в радианах

Величина угла тригонометрических функций должна быть выражена в ра­дианах. Для преобразования величины угла из градусов в радианы использу­ется формула

(а* 3.1415256) /180, где: а – величина угла в градусах. Вместо дробной константы 3.1415926 можно исполь­зовать стандартную именованную константу pi. В этом случае выражение пересчета угла из градусов в радианы будет выглядеть так: a*pi/180.

3.5.2. Функции преобразования

Функции преобразования (табл. 3.7) наиболее часто используются в инст­рукциях, обеспечивающих ввод и вывод информации. Например, для того чтобы вывести в поле вывода (компонент Label) диалогового окна значение переменной типа real, необходимо преобразовать число в строку символов, изображающую данное число. Это можно сделать при помощи функции FloatToStr, которая возвращает строковое представление значения выраже­ния, указанного в качестве параметра функции. Например, инструкция

Label1.Caption := FloatToStr (x)

выводит значе­ние переменной х в поле Label 1.

Таблица 3.7

Функции преобразования

Функция	Значение функции
Chr(n)	Символ, код которого равен n
IntToStr(k)	Строка, являющаяся изображением целого k
FloatToStr (n)	Строка, являющаяся изображением вещественного n
FloatToStrF(n,f,k,m)	Строка, являющаяся изображением вещественного n. При вызове функции указывают: f — формат (способ изображения); к - точность (нужное общее количество цифр); m — количество цифр после десятичной точки
StrToInt(s)	Целое, изображением которого является строка s
StrToFloat(s)	Вещественное, изображением, которого является строка s

Обычно функции используют в качестве операндов выражений. Параметром функции может быть константа, переменная или выражение соответствую­щего типа. Ниже приведены примеры использования стандартных функций и функций преобразования.

n := Round((x2-xl)/dx);

xl:= (-b + Sqrt(d)) / (2*а);

m := Random(10);

cena := StrToInt(Editl.Text);

Edit2.Text := IntToStr(100);

mes := 'xl=' + FloatToStr(xl);