Стандартные математические функции. Функции преобразования типов.

Функция Тип аргументов Тип значения функции Действие функции Abs(x)integer, realкак у х Абсолютное значение х (модуль) Exp(x)real Значением функции будет е х Cos(x)real Косинус х, х – в радианах Sin(x)real Синус х, х – в радианах

Функция Тип аргументов Тип значения функции Действие функции Arctan(x)real Арктангенс х Ln(x)real Натуральный логарифм х Sqr(x)integer, realкак у хКвадрат х Sqrt(x)real Корень квадратный из х, х>=0

Функция Тип аргумен- тов Тип значения функции Действие функции Random(x)word real, word Если х не указан – значением функции является случайное число из диапазона [0;1]. Если х – типа word, то значением функции является случайное число из диапазона [0;x]. Pireal Число π. Odd(x)longintboolean Значение функции true, если х нечётен, и false – если х чётен.

Функция Тип аргументов Тип значения функции Действие функции Inc(x,n) x: перечисля- емый n: integer как у х Значением является х, увеличенное на n. Если n отсутствует, увеличение х происходит на 1, т.е. х:=х+1. Dec(x,n) x: перечисля- емый n: integer как у х Значением является х, уменьшенное на n. Если n отсутствует, уменьшение х происходит на 1, т.е. х:=х-1.

Функция Тип аргументов Тип значения функции Действие функции Int(x)real Целая часть х, но вещественного типа. Frak(x)real Дробная часть х. Trunc(x)reallongint Целая часть х. Х – в диапазоне longint. Round(x)reallongint Х, округлённое до следующего целого числа. Точнее, round(x)= trunc(x)+0,5, если х>0 и round(x)= trunc(x)-0,5, если х

Определите результаты операции: X:=odd(14); Y:=odd(21); X:=inc(5,6); Y:=inc(15,2); X:=dec(10,4); Y:=dec(12,11); X:=int(444.6); Y:=int(4.85); X:=frak(45.123); Y:=frak(145.1); X:=trunc(4.88); Y:=trunc(584.23); X:=round(4.75); Y:=round(6.23). X:=round(-5.4). Y:=round(-56.48).

Определите результат вычислений: h:=sqr(sin(0.25))+sqr(cos(0.25)); h:=sqr(cos(0.33))+sqr(sin(0.33)); h:=int(5.47)+round(5.47); h:=frak(10.47)+round(11.46).

Определите тип результата операции: x:=round(Pi); x:=3.15-frac(3.15); x:=int(Pi); x:=sqrt(4); x:=sqr(2); x:=1-cos(Pi); x:=random; x:=random(10).

Определите, почему не работает программа: x:=dec(x); inc(3); x:=rsndom(Pi); dec(x,2.1).

Проверить в среде Turbo Pascal работу следующих функций: 1. X:=inc(51,18); 2. X:=dec(111,45); 3. X:=int(444.6); 4. X:=trunc( ); 5. X:=round(15.75); 6. X:=round( ).

Пример Program Proverka; Var х, y: real, n: integer; Begin Clrscr; Write ('Введите значения переменной y: '); ReadLn(y); Write ('Введите значения переменной n: '); ReadLn(n); x:=inc(y,n); WriteLn ('Значение выражения: ', x : 12 : 6) End.

Подведение итогов Выставление оценок