Курсовые работы, лабораторные и дипломы по информатике.

>> Справочник по функциям Turbo Pascal 7.0.

Наши спонсоры:

Функция Read.

  • Объявление:

    Procedure Read(F , V1 [, V2,...,Vn ] );

  • Описание:

    Для типизированных файлов, считывает компонент файла в переменную. Для текстовых файлов, считывает одно или большее количество значений в одну или большее количество переменных

  • Замечания:

    Для строковых переменных:
    Read считывает все символы до (но не включая) следующего маркера конца строки или пока Eof(F) станет равным True. Read не переходит к следующей строке после чтения. Если полученная в результате строка длиннее, чем максимальная длина строковой переменной, то она усекается. После первого Read, каждые последующие вызовы Read будут видеть маркер конца строки и возвращать строку нулевой длины.
    Используйте несколько обращений к ReadLn, чтобы считать несколько строковых значений.
    Когда включена опция Extended Syntax, процедура Read может считывать строки с нулевым окончанием в нуль-основанные массивы символов.
    Для переменных типа Integer или Real:
    Read будет пропускать любые пробелы, метки табуляции или маркеры конца строки, предшествующие числовой строке. Если числовая строка не соответствует ожидаемому формату, происходит ошибка ввода/вывода, иначе переменной присваивается полученное значение. Следующий Read начнется с пробела, знака табуляции или маркера конца строки, которые завершали числовую строку.

  • Пример:

    { Пример программы для функции Read}
    uses Crt, Dos;
    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.



Вернуться к оглавлению справочника