procedure Val(s: string; var value: byte; var err: integer);
Преобразует строковое представление s целого числа к числовому значению и записывает его в переменную value. Если преобразование успешно, то err=0, иначе err0
procedure Val(s: string; var value: word; var err: integer);
Преобразует строковое представление s целого числа к числовому значению и записывает его в переменную value. Если преобразование успешно, то err=0, иначе err0
procedure Val(s: string; var value: longword; var err: integer);
Преобразует строковое представление s целого числа к числовому значению и записывает его в переменную value. Если преобразование успешно, то err=0, иначе err0
procedure Val(s: string; var value: uint64; var err: integer);
Преобразует строковое представление s целого числа к числовому значению и записывает его в переменную value. Если преобразование успешно, то err=0, иначе err0
procedure Val(s: string; var value: real; var err: integer);
Преобразует строковое представление s вещественного числа к числовому значению и записывает его в переменную value. Если преобразование успешно, то err=0, иначе err0
procedure Val(s: string; var value: single; var err: integer);
Преобразует строковое представление s вещественного числа к числовому значению и записывает его в переменную value. Если преобразование успешно, то err=0, иначе err0
procedure Str(i: integer; var s: string);
Преобразует целое значение i к строковому представлению и записывает результат в s
procedure Str(r: real; var s: string);
Преобразует вещественное значение r к строковому представлению и записывает результат в s
function IntToStr(a: integer): string;
Преобразует целое число к строковому представлению
function IntToStr(a: int64): string;
Преобразует целое число к строковому представлению
function FloatToStr(a: real): string;
Преобразует вещественное число к строковому представлению
Подпрограммы для работы с файлами через файловые переменные
procedure Assign(f: FileType; name: string);
|
Связывает файловую переменную f с именем файла name |
|
procedure AssignFile(f: FileType; name: string); Связывает файловую переменную f с именем файла name |
|
procedure Reset(f: Text); Открывает текстовый файл f на чтение |
|
procedure Reset(f: file of T); Открывает типизированный файл f на чтение и запись |
|
procedure Reset(f: file); Открывает нетипизированный файл f на чтение и запись |
|
procedure Rewrite(f: Text); Открывает текстовый файл f на запись, обнуляя его содержимое. Если файл существовал, он обнуляется |
|
procedure Rewrite(f: file of T); Открывает типизированный файл f на чтение и запись, обнуляя его содержимое. Если файл существовал, он обнуляется |
|
procedure Rewrite(f: file); Открывает нетипизированный файл f на чтение и запись, обнуляя его содержимое. Если файл существовал, он обнуляется |
|
procedure Append(f: Text); Открывает текстовый f файл на дополнение |
|
function OpenRead(fname: string): Text; Возвращает текстовый файл с именем fname, открытый на чтение |
|
function OpenWrite(fname: string): Text; Возвращает текстовый файл с именем fname, открытый на запись |
|
function OpenAppend(fname: string): Text; Возвращает текстовый файл с именем fname, открытый на дополнение |
|
procedure Close(f: FileType); Закрывает файл f |
|
procedure CloseFile(f: FileType); Закрывает файл f |
|
function Eof(f: FileType): boolean; Возвращает True, если достигнут конец файла f |
|
procedure Flush(f: FileType); Записывает содержимое буфера файла на диск |
|
procedure Erase(f: FileType); Удаляет файл, связанный с файловой переменной f |
|
procedure Rename(f: FileType; newname: string); Переименовывает файл, связаный с файловой переменной f, давая ему имя newname |
|
function Eoln(f: Text): boolean; Возвращает True, если достигнут конец строки в текстовом файле f |
|
function SeekEof(f: Text): boolean; Пропускает пробельные символы, после чего возвращает True, если достигнут конец текстового файла f |
|
function SeekEoln(f: Text): boolean; Пропускает пробельные символы, после чего возвращает True, если достигнут конец строки в текстовом файле f |
|
procedure Truncate(f: file of T); Усекает типизированный файл f, отбрасывая все элементы с позиции файлового указателя |
|
procedure Truncate(f: file); Усекает нетипизированный файл f, отбрасывая все элементы с позиции файлового указателя |
|
function FilePos(f: file of T): int64; Возвращает текущую позицию файлового указателя в типизированном файле f |
|
function FilePos(f: file): int64; Возвращает текущую позицию файлового указателя в нетипизированном файле f |
|
function FileSize(f: file of T): int64; Возвращает количество элементов в типизированном файле f |
|
function FileSize(f: file): int64; Возвращает количество байт в нетипизированном файле f |
|
procedure Seek(f: file of T; n: int64); Устанавливает текущую позицию файлового указателя в типизированном файле f на элемент с номером n |
|
procedure Seek(f: file; n: int64); Устанавливает текущую позицию файлового указателя в нетипизированном файле f на байт с номером n |
Функции для работы с последовательностями
function Range(a,b: integer): sequence of integer;
|
Возвращает последовательность целых от a до b |