Чтение из файла на языке Pascal

Ниже приведён пример чтения данных из текстового файла MyFile.txt, расположенного в той же директории, что и запускаемая программа. В файле через пробел записаны целые числа типа integer.

program ReadFile;

var

   f: Text; {f - логический текстовый файл}

   d: integer;

begin

   Assign(f,'MyFile.txt'); {Связь логического файла с физическим MyFile.txt}

   Reset(f);               {Открытие файла на чтение}

   while not eof(f) do     {Пока не будет достигнут конец файла}

      Readln(f,d);         {Чтение очередного числа из файла и сохранение значения в переменную d}

end.