Всякий раз,  когда требуется ввод с устройства или вывод  на
        него, функциями Readln, Read, Write, Writeln, Page, Eof, SeekEof,
        SeekEoln и Close вызывается функция InOut.

             Когда в поле  Моdе  установлено  значение  fnInput,  функция
        InOut считывает символы (объем ввода задается переменной BufSize)
        в BufPtr^ и возвращает число считанных символов в BufEnd, а также
        записывает 0 в BufPos. Если функция InOut в результате запроса на
        ввод возвращает в BufEnd значение 0,  то переменная Eоf для файла
        принимает значение Truе.

             Когда в  поле  Моdе  установлено значение fnOutput,  функция
        InOut записывает символы,  количество которых определяется  пере-
        менной BufРоs, из BufPtr^ и возвращает в BufРоs значение 0.