Написать программу в паскаль абс создающий файл и записывающий в него 5 целых чисел

Вопрос школьника по предмету Информатика

Написать программу в паскаль абс создающий файл и записывающий в него 5 целых чисел

Ответ учителя по предмету Информатика

Ответ:

program z1;

var

f:text;

i,a:integer;

begin

assign (f,’D:file.txt’);

rewrite (f);

for i:=1 to 5 do

begin

a:=random (10);

writeln (f, a);

end;

close (f);

end.