Методичка Фролов

Функция / Процедура

Описание

Модуль

Pi;

Возвращает значение числа Пи

System

Poly( X: Extended; const Coefficients:

Вычисляет однородный полином

Math

array of Double ): Extended;

Power( X,Y: Extended ): Extended;

Возводит X в степень Y

Math

Round( X: Extended ): Int64;

Округляет число к ближайшему

System

целому

Sqr( X: Extended ): Extended;

Вычисляет квадрат аргумента Х

System

Sqrt( X: Extended ): Extended;

Вычисляет квадратный корень

System

аргумента Х

Trunc( X: Extended ): Int64;

Отсекает дробную часть числа

System

Тригонометрические функции и процедуры

ArcCos( X: Extended ): Extended;

Вычисляет арккосинус аргумента

Math

ArcCosh( X: Extended ): Extended;

Вычисляет гиперболический

Math

арккосинус аргумента

ArcSin( X: Extended ): Extended;

Вычисляет арксинус аргумента

Math

ArcSinh( X: Extended ): Extended;

Вычисляет гиперболический

Math

арксинус аргумента

ArcTan( X: Extended ): Extended;

Вычисляет арктангенс аргумента

Math

ArcTanh( X: Extended ): Extended;

Вычисляет гиперболический

Math

арктангенс аргумента

Cos( X: Extended ): Extended;

Вычисляет косинус аргумента

System

Cosh( X: Extended ): Extended;

Вычисляет гиперболический

Math

косинус аргумента

Cotan( X: Extended ): Extended;

Вычисляет котангенс аргумента

Math

Hypot( X, Y: Extended ): Extended;

Вычисляет длину гипотенузы

Math

прямоугольного треугольника

Sin( X: Extended ): Extended;

Вычисляет синус аргумента

System

SinCos( Angle: Extended; var Sin, Cos:

Вычисляет одновременно синус и

Math

Extended ): Extended;

косинус аргумента

Sinh( X: Extended ): Extended;

Вычисляет гиперболический синус

Math

аргумента

111

Функция / Процедура

Описание

Модуль

Tan( X: Extended ): Extended;

Вычисляет тангенс аргумента

Math

Tanh( X: Extended ): Extended;

Вычисляет гиперболический тангенс

Math

аргумента

Генерирование случайных чисел

RandG( Mean, StdDev: Extended ):

Генерирует случайное число с от-

Math

Extended;

клонением по Гауссу

Random ( Range: Integer );

Генерирует случайное число в за-

System

данном диапазоне

Randomize;

Инициализирует генератор случай-

System

ных чисел. Если не инициализиро-

вать генератор случайных чисел с

помощью данной процедуры, то при

каждом запуске программы будет

генерироваться одна и та же после-

довательность чисел

Преобразование тригонометрических единиц измерений

DegToRad( Degrees: Extended ):

Преобразовывает значение аргумен-

Math

Extended;

та из градусов в радианы

RadToDeg( Radians: Extended ):

Преобразовывает значение аргумен-

Math

Extended;

та из радианов в градусы

Функции и процедуры для

работы с данными перечислимого типа

Dec( var X, N: Longint );

Уменьшает значение переменной X

System

на величину N или на 1, если пара-

метр N опущен

Inc( var X, N: Longint );

Увеличивает значение переменной X

System

на величину N или на 1, если

параметр N опущен

Odd( X: LongInt ): Boolean;

Определяет четность аргумента.

System

Возвращает True, если аргумент

представляет собой нечетное

значение и False, если четное

112

Функция / Процедура

Описание

Модуль

Функции и процедуры для работы со строками

Chr ( X: Byte ): Char;

Возвращает символ соответствую-

SysUtils

щий указанному коду ASCII

CompareStr ( const S1, S2: string ): In-

Сравнивает строки S1 и S2 с учетом

SysUtils

teger;

регистра, но не учитывая языковые

особенности текущей локализован-

ной версии Windows. Если S1>>S2,

то результат функции >0, если

S1<S2, то результат <0, а при S1=S2,

результат =0

CompareText ( const S1, S2: string ):

Сравнивает две строки без учета ре-

SysUtils

Integer;

гистра и установок языкового драй-

вера Windows. Если S1>S2, то ре-

зультат функции >0, если S1<S2, то

результат <0, а при S1=S2, результат

=0

Concat ( S1, S2,…, Sn : string ): string;

Объединяет несколько строк в одну

System

Copy ( S, Index, Count: Integer ):

Возвращает подстроку или сегмент

System

string;

массива размером Count, начиная с

элемента S[Index]

Delete ( var S: string; Index, Count:

Удаляет подстроку, содержащую

System

Integer );

Count символов из строки S. Под-

строка начинается в S[Index]. Пара-

метр Index определяет индекс перво-

го символа удаляемой подстроки.

Insert ( Source: string; var S: string;

Вставляет подстроку, определенную

System

Index: Integer );

в параметре Source, в позицию Index

строки S (первый символ в строке

имеет индекс 1)

Функция / Процедура

Описание

Модуль

Length ( S ): Integer;

Возвращает фактическое количество

System

символов в строке или количество

элементов массива

Pos ( Substr: string; S: string ): Inte-

Находит подстроку Substr в строке S

System

ger;

и возвращает индекс первого симво-

ла найденной подстроки. Если S не

содержит указанную подстроку, то

функция возвращает 0

Функции и процедуры для работы с файлами

AssignFile( var File : file; FileName :

Устанавливает ассоциативную связь

System

string );

между файловой переменной File и

внешним файлом, имя которого оп-

ределено параметром FileName

Reset( var File : file; RecSize: Word );

Процедура открывает существую-

System

щий файл и устанавливает указатель

в начало файла. RecSize – необяза-

тельный параметр, указывающий

размер записи файла. Когда пара-

метр RecSize опущен, размер записи

принимается по умолчанию 128 байт

Rewrite( var File : file; RecSize:

Процедура создает новый файл и от-

System

Word );

крывает его. RecSize – необязатель-

ный параметр, указывающий размер

записи файла. Когда параметр Rec-

Size опущен, размер записи прини-

мается по умолчанию 128 байт

Read( File, V1 [, V2, …, Vn ] );

Читает информацию из файла, ассо-

System

циированного с файловой перемен-

ной File, в переменную(ые) Vn

Write( File, V1,…,Vn );

Записывает данные в типизирован-

System

ный файл

114

Функция / Процедура

Описание

Модуль

Eof( var File): Boolean;

Определяет, стоит ли указатель те-

System

кущей позиции в конце файла. Если

указатель стоит на последнем сим-

воле файла, или файл не содержит

данных, то функция возвращает

True, а иначе – False

FilePos( var File): LongInt;

Возвращает текущую позицию ука-

System

зателя в файле (файл должен быть

предварительно открыт. Данная

функция не может быть применена к

текстовым файлам

Seek( var File; N: Longint );

Устанавливает файловый указатель в

System

заданную позицию файла. Индекс

позиции, в которую будет установ-

лен указатель, определяется пара-

метром N. Первая позиция в файле

имеет индекс 0

IOResult: Integer;

Возвращает статус ошибки послед-

System

ней выполненной операции вво-

да/вывода. Если шибки не произош-

ло, возвращается значение 0

CloseFile( var File);

Разрывает ассоциативную связь ме-

System

жду файловой переменной и внеш-

ним файлом, при этом, файл обнов-

ляется и закрывается