Ó Тверской государственный технический университет, 2015
Тема 4.
Стандартные процедуры и функции.
· SYSTEM
USES
· DOS
MS DOS
· CRT
· GRAPH
· OVERLAY
· PRINTER
Математические функции.
| Имя функции
| Назначение функции
| Tип результата
|
| Abs(X)
| Абсолютное значение (модуль) аргумента
Abs(-3.5)=3.5
| Совпадает с типом Х
|
| ArcTan(X)
| Арктангенс аргумента в радианах
ArcTan(1)=7.8539816340E-01
| Real
|
| Cos(X)
| Косинус аргумента в радианах
Сos(PI/3)=5.0000000000E-01
| Real
|
| Exp(X)
| Экспонента аргумента (E в степени X)
Exp(1)=2.7182818285E+00
| Real
|
| Ln(X)
| Натуральный логарифм
Ln(10)=2.3025850930E+00
| Real
|
| PI
| Значение числа p PI=3.1415926536E+00
(более точно 3.1415926535897932385)
| Real
|
| Random
| Случайное число из диапазона от 0 до 1
| Real
|
| Random(X)
| Случайное число из диапазона от 0 до Х
| Word
|
| Sin(X)
| Синус аргумента в радианах
Sin(PI/3)=8.6602540378E-01
| Real
|
| Sqr(X)
| Квадрат аргумента
Sqr(-12)=144
| Совпадает с типом Х
|
| Sqrt(X)
| Квадратный корень аргумента
Sqrt(841)=2.9000000000E+01
| Real
|
tg(X)= Sin(X)/Cos(X)
lg(X)= Ln(X)/Ln(10)
Xn= Exp(n*Ln(X))
Random Random(X) Randomize
Функции округления и преобразования типов.
| Имя функции
| Тип аргумента
| Тип результата
| Назначение функции
|
| Round(X)
| Real
Round(-1.2)=-1
Round(-1.5)=-2
Round(1.2)=1
Round(1.5)=2
| LongInt
| Округление до ближайшего целого
|
| Trunc(X)
| Real
Trunc(-1.2)=-1
Trunc(-1,5)=-1
Trunc(1.2)=1
Trunc(1.5)=1
| LongInt
| Отбрасывание дробной части
|
Функции и процедуры порядкового типа.
A. Функции порядкового типа.
| Имя функции
| Назначение функции
|
| Odd(X)
| Проверяет, является ли аргумент нечетным числом
Odd(0)=false
Odd(1)=true
Odd(2)=false
Odd(-1)=true
|
| Pred(X)
| Возвращает предшествующее значение аргумента
Pred(10)=9
Pred(-10)=-11
|
| Succ(X)
| Возвращает последующее значение аргумента
Succ(10)=11
Succ(-10)=-9
|
B. Процедуры порядкового типа.
| Имя процедуры
| Назначение процедуры
|
| Dec(X [,dx])
| Уменьшает значение переменной Х на величину dx (если параметр dx не задан, то на –1)
k:=5; Dec(k)=4
Dec(k,2)=3
Dec(k,-2)=7
|
| Inc(X [,dx])
| Увеличивает значение переменной Х на величину dx (если параметр dx не задан, то на +1)
k:=5; Inc (k)=6
Inc (k,2)=7
Inc (k,-2)=3
|
Строковые процедуры и функции
А. Строковые функции.
| Имя функции
| Назначение функции
|
| Concat(<строка1>,<строка2>,..)
| Сцепление строк
Сoncat(‘A’,’BC’,’_1’)=’ABC_1’
|
| Copy(<строка>,<позиция>,<количество>)
| Копирование части строки с заданной позиции
Copy (‘INFORMATION’,3,5)=’FORMA’
|
| Length(<строка>)
| Определение текущей длины строки
Length('строка’)=6
|
| Pos(<подстрока>,<строка>)
| Определение позиции первого вхождения подстроки в строку
Pos(‘e’,‘Определение’)= 4
Pos(‘к’,‘Определение’)= 0
|
b. Строковые процедуры.
| Имя процедуры
| Назначение процедуры
|
| Delete(<строка>,<позиция>,<количество>)
| Удаление части строки с заданной позиции
1) S:=’abcdefgh’;
Delete(S,2,4);
Результат: S=’afgh’
2) S:=’abcdefgh’;
Delete(S,2,10);
Результат: S=’a’
|
| Insert(<подстрока>,<строка>,<позиция>)
| Вставка подстроки в строку с заданной позиции
S:=’abcdefgh’;
Insert(‘XXL’,S,3);
Результат: S=’abXXLcdefgh’
|
| Str(<число>,<строка>)
| Преобразование числового значения в строку символов
1) Str(567,A);
Результат: A=’567’
2))B:=567; {B:integer}
Str(B:5,A);
Результат: A=’_ _567’
3) B:=5.67E+3; {B:real}
Str(B:8:0,A);
Результат: A=’_ _ _ _5670’
|
| Val (<строка>,<число>,<код>)
| Преобразование строки в числовое значение (если нет ошибки, то < код>=0)
1)A:=’135’;
Val(A,R,Code);
Результат: R=135; Code=0
2)A:=’_135’;
Val(A,R,Code);
Результат: R=не определено; Code=1
3)A:=’2.5Е+4’;
Val(A,R,Code);
Результат: R=25000; Code=0
|
