как данные программным образом записать в текстовый файл

Здравствуйте. Решаю задачку. помогите пожалуйста. Чего то не хватает. не могу понять чего.

программа в ИСР Pascal для создания массива из 10 элементов типа запись (ввод полей осуществляется с клавиатуры). Запись для каждого студента должна содержать следующие поля: номер по порядку, фамилия, имя, группа, оценка. Эти данные нужно программным образом записать в текстовый файл, а затем осуществить чтение и форматный вывод информации из этого файла на экран.

Сам файл не создается. Вот код:

Type stu=record
Surname, name,gruppa:string;
x1,x2,x3:byte;
A:real;
End;
Var z:stu;
i,b,d:integer;
begin
d:=0; b:=0;
for i:=1 to 10 do
begin
writeln(‘Порядковый номер:’);
write(‘surname:’);
readln(z.name);
write(‘gruppa’);
readln(z.gruppa);
write(‘ocenki:’);
readln(z.x1,z.x2,z,x3);
z.a:=(z.x1+z.x2+z.x3)/3;
if z.a=5 then b:=b+1 else
if z.a>=4 then d:=d+1;
readln;
end;
end.