Назначение: Возвращает старший байт аргумента.
Описание: function Нi(x): Byte;
Примечания: Параметр x представляет собой выражение целого типа или слово. Функция Нi возвращает старший байт x в виде значения без знака.

Пример 22.1

VAR
 a: word;
BEGIN
 a:=Hi($1234);                       { a=$12 }
END.

Назначение: Возвращает старший байт аргумента.
Описание: function Нigh(x);
Примечания: Параметр x представляет собой идентификатор ссылочной переменной. Обозначенный x тип или тип переменной, обозначенной x, должен быть порядковым типом, массивом или строковым типом. Для порядкового типа High возвращает старшее значение в диапазоне индексного типа массива. Для строкового типа High возвращает описанный размер строки. Для открытого массива или строкового параметра High возвращает значение типа Word, показывая число элементов в фактическом параметре, минус 1.

Пример 22.2

VAR
 a:array[1..10]of byte;
BEGIN
 write(high(a));                     { 10 }
END.

Назначение: Увеличивает значение переменной.
Описание: procedure Inc(x [ ; n : longint ] );
Примечания: Параметр x представляет собой переменную перечислимого типа, а n - целочисленное выражение. Значение x увеличивается на 1 (или на n в случае явного задания n). То есть Inс(x) соответствует x:=x+1, а Inс(x,n) соответствует x:=x+n.

Функция Inс порождает оптимизированный код и особенно полезна в больших циклах.

Пример 22.3

VAR
 x: word;
BEGIN
 x:=10;
 Inc(x);                        { увеличить x на 1 (x=11) }
 Inc(x,3);                      { увеличить x на 3 (x=14) }
END.

Назначение: Включает элемент в множество.
Описание: procedure Include(var S: set of T; I: T);
Примечания: S - это переменная множественного типа, а I - выражение типа, совместимого с базовым типом S. Заданный I элемент включается в множество, заданное S.

Процедура Insert

Назначение: Вставляет в строку подстроку.
Описание: procedure Insert(St: String; var s: String; Indx: Integer);
Примечания: Параметр St представляет собой выражение строкового типа. Параметр s - переменная строкового типа любой длины. Параметр Indx является выражением целого типа. Данная процедура вставляет строку, задаваемую параметром St, в строку, задаваемую параметром s, начиная с позиции, определяемой параметром Indx. Если получившаяся в результате строка превышает 256 символов, то она усекается до 255 символов.

Пример 22.4

VAR
 s: string;
BEGIN
 s:='Honest Lincoln';
 Insert('Abe',s,8);             { Honest Abe Lincoln }
 writeln(s);
END.

Назначение: Возвращает целую часть аргумента.
Описание: function Int(x : Real): Real;
Примечания: Параметр x представляет собой выражение вещественного типа. Результатом будет целая часть x, то есть x округляется в сторону нуля.

Пример 22.5

VAR
 r: real;
BEGIN
 r:=Int(123.456);               {  123 }
 r:=Int(-123.456);              { -123 }
END.

Назначение: Возвращает целое значение, представляющее собой состояние последней выполненной операции ввода-вывода.
Описание: function IOResult: Integer;
Примечания: Чтобы перехватить ошибки ввода-вывода с помощью функции IORеsult, проверка ввода-вывода должна быть выключена (директива компилятора {$I-}). Если проверка ввода-вывода выключена и происходит ошибка ввода-вывода, то, пока выполняется обращение к функции IORеsult, все последующие операции ввода-вывода игнорируются. Обращение в функции IORеsult сбрасывает ее внутренний флаг ошибки.

Пример 22.6

VAR
 f: text;
 e: integer;
BEGIN
 {$I-}
 assign(f,'text.txt');
 reset(f);
 e:=IOResult;
 if e<>0 then
  writeln('Ошибка ввода-вывода = ',e)
  else writeln('Ошибки ввода-вывода не произошло.');
 close(f);
END.

Функция Length

Назначение: Возвращает динамическую длину строки.
Описание: function Length(s: String): Integer;
Примечания: Параметр s представляет собой выражение строкового типа. Результатом будет длина s.

Пример 22.7

VAR
 st: string;
BEGIN
 writeln('Введите строку:');
 readln(st);
 writeln('Вы ввели строку длиной = ', Length(st), ' сим.');
END.

Назначение: Возвращает натуральный логарифм аргумента.
Описание: function Ln(x: Real): Real;
Примечания: Параметр x является выражением вещественного типа. Результатом будет натуральный логарифм выражения x.

Пример 22.8

VAR
 a: real;
BEGIN
 a:=Ln(15);
 writeln(a:3:2);
END.

Назначение: Возвращает младший байт аргумента.
Описание: function Lо(x): Byte;
Примечания: Параметр x - это параметр целого типа или параметр длиной в слово. Функция Lо возвращает младший байт x в качестве беззнакового значения.

Пример 22.9

VAR
 a: word;
BEGIN
 a:=Lo($1234);                       { a=$12 }
END.

Назначение: Возвращает младшее значение в диапазоне аргумента.
Описание: function Low(X);
Примечания: Параметр X - это идентификатор типа или ссылка на переменную. Тип, обозначенный X, или тип переменной, обозначенный X, должен быть порядковым типом, типом массива или строковым типом. Для порядкового типа функция Low возвращает младшее значение в диапазоне типа. Для типа массива Low возвращает младшее значение в диапазоне индексного типа массива. Для строкового типа Low возвращает 0. Для открытого массива или строкового параметра Low возвращает 1.