Процедура Read Pascal-Паскаль
Описание
Read:
- Для типизированных файлов, считывает компонент файла в переменную.
- Для текстовых файлов, считывает одно или большее количество значений в одну или большее количество переменных
| Объявление: | Типизированные файлы: Procedure Read(F , V1 [, V2,...,Vn ] ); Текстовые файлы: Procedure Read( [ Var F : Text; ] V1 [, V2,...,Vn ] ); |
|---|---|
| Режим: | Windows, Real, Protected |
Замечания:
Для строковых переменных:
Read считывает все символы до (но не включая) следующего маркера конца строки или пока Eof(F) станет равным True. Read не переходит к следующей строке после чтения. Если полученная в результате строка длиннее, чем максимальная длина строковой переменной, то она усекается. После первого Read, каждые последующие вызовы Read будут видеть маркер конца строки и возвращать строку нулевой длины.
Используйте несколько обращений к ReadLn, чтобы считать несколько строковых значений.
Когда включена опция Extended Syntax, процедура Read может считывать строки с нулевым окончанием в нуль-основанные массивы символов.
Для переменных типа Integer или Real:
Read будет пропускать любые пробелы, метки табуляции или маркеры конца
строки, предшествующие числовой строке. Если числовая строка не
соответствует ожидаемому формату, происходит ошибка ввода/вывода, иначе
переменной присваивается полученное значение. Следующий Read начнется с
пробела, знака табуляции или маркера конца строки, которые завершали
числовую строку.
Var F : Text;
Ch : Char;
Begin
{Получаем имя файла из командной строки}
Assign(F, ParamStr(1));
Reset(F);
While Not EOF(F) Do
Begin
Read(F, Ch);
Write(Ch); { Выводим содержимое файла на экран }
End;
End.
- Readln
- Write
- Writeln