Паскаль. Можно ли записать в файл массив из чисел?

[Женька Good]

Можно ли записать в файл массив из 100 чисел?
т.е. можно ли записать не одним массивом, как в этом примере(при выполнении такого программного кода записывается массив из 100 чисел):

Procedure RecOd(f1:myfile);
Var i,j:integer;
Begin
  Randomize;
  Assign(f1,'h:\OdMassiv');
  rewrite(f1);
  For i:=1 to 100 do
    c1.a[i]:=round(10+random*(100-10));
  write(f1,c1);
  close(f1);
end;

а так, чтобы каждое число, как бы было отдельно.
Т.е. при выполнении функции WriteLn('',FileSize(f1)); было написано 100.
Т.е. у меня бы сформировалось не 100 массивов по 100 чисел, а 100 массивов по 1 числу.

[BDA]

uses CRT;

var
  f:file of integer;
  i:integer;

begin
  assign(f,'in.txt');
  rewrite(f);
  for i:=1 to 100 do
    write(f,i);
  close(f);
end.