Процедура 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 начнется с пробела, знака табуляции или маркера конца строки, которые завершали числовую строку.

Пример процедуры Read
Uses WinCrt, WinDos;
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