Что делает следующая программа?

 

program Whatlslt;

var f: file of integer; i: integer;

begin

reset( f ); while not eof( f ) do begin read( f, i );

writeln( i );

end;

close(f);

end.

 

1) выводит в столбик числа, записанные в файле;

2) выводит в строку числа, записанные в файле;

3) записывает числа в новый файл;

4) дописывает числа в существующий файл.