Mail

В этот день много лет назад...
5 апреля. В 1948 году (78 лет назад) - Около Берлина, Германия. Самолет DC-3 компании British European Airways сталкивается лоб в лоб с истребителем ВВС СССР Як-3, выполняющим фигуры высшего пилотажа. На рейсе Викерс Викинг погибает 14 человек, на Яке один. Столкновение произошло по вине пилота истребителя, который нарушал принятые правила пилотажа.

Turbo Pascal Documentation

Функция SeekEof

     Функция: Возвращает для файла статус "конец файла"
(end-of-file).
     Описание: SeeEof [ (var f : text) ]
     Тип результата: Булевский (boolean).
     Примечания: За исключением того, что функция SеекЕоf
пропускает  все пробелы, знаки табуляции и метки конца стро-
ки, она полностью соответствует функции Еоf. Ее полезно ис-
пользовать  при  считывании  числовых значений из текстового
файла.
     При указании директивы компилятора {I-} функция
IORеsult будет возвращать значение 0 в том случае, если опе-
рация завершилась успешно, и ненулевой код ошибки в  против-
ном случае.
     Ограничения: Функцию можно использовать только для тек-
стовых файлов. Файл должен быть открыт.
     Прочее: См. также функции Eof, SeekEoln.