ВУЗ:
Составители:
Рубрика:
Окончание таблицы 2.9
Procedure ReadLn(var F: TextFile; [VI [,
V2, ...,Vn]]);
Читает из текстового файла последова-
тельность символьных представлений
переменных Vi типа char, String, а также
любого целого или вещественного типа
с учетом границ строк
Function SeekEof(var F:Text): Boolean; Пропускает все пробелы, знаки табуля-
ции и маркеры конца строки eoln до
маркера конца файла eof или до первого
значащего символа и возвращает True,
если маркер eof обнаружен
Function SeekEoln (var F: TextFile): Boo-
lean;
Пропускает все пробелы и знаки табу-
ляции до маркера конца строки eoln или
до первого значащего символа и воз-
вращает True, если маркер обнаружен
Procedure Write(var F: Text; PI [, P2,...,
Pn] ) ;
Записывает символьные представления
параметров Pi в текстовый файл
Procedure WriteLn (var F: Text; [PI [,
P2, ..., Pn]]);
Записывает символьные представления
параметров Pi и признак конца строки
eoln в текстовый файл
Процедура Read предназначена для последовательного чтения из
текстового файла символьных представлений переменных Vi. При чте-
нии переменных типа char выполняется чтение одного символа и при-
сваивание считанного значения переменной. Если перед выполнением
чтения указатель файла достиг конца очередной строки, то результатом
чтения будет символ cr (код #13), а если достигнут конец файла, то сим-
вол eof (код #26). Процедуру Read не рекомендуется использовать для
ввода переменных типа string, т. к. она не способна “перепрыгнуть” че-
рез разделитель строк eoln и читает только первую строку текстового
файла. Для ввода последовательности строк нужно использовать проце-
дуру ReadLn.
При обращении к процедуре Read, за вводом очередного целого
или вещественного числа процедура “перескакивает” маркеры конца
строк, т. е. фактически весь файл рассматривается ею как одна длинная
строка, содержащая текстовые представления чисел. В сочетании с про-
веркой конца файла функцией eof процедура Read позволяет организо-
вать простой ввод массивов данных, например, так:
const
N = 1000; // Максимальная длина ввода
var
F : TextFile;
М : array [1..N] of Real;
82
Страницы
- « первая
- ‹ предыдущая
- …
- 80
- 81
- 82
- 83
- 84
- …
- следующая ›
- последняя »
