Работа с записями в типизированном файле Опции

[Михаил]

Как заполнить типизированный файл записями

[mvg]

Типа так

var F:file of integerl;
     i:longint;
Begin
assign (f,'Name.txt');
rewrite(f);
for i:=1 to 100 do write(f,i);
Close (f);
End.

В файл выведется integer-ы от 1 до 100