Pascal. Задача 6-2

Вывести в консоль, записанные в файл C:\PABCWork.NET\mydata.dat целые числа.

Решение

var
  f : file of integer;
  t : integer;
begin
  Assign(f, 'C:\PABCWork.NET\mydata.dat');
  Reset(f);
  while not Eof(f) do begin
    Read(f, t);
    Write(t, ' ');
  end;
  Writeln;
  Close(f);
end.