PASCAL задача )))

[Лина59]

помогите ,пожалуйста, решить задачу на зачет.
Задача.Записать в файл факториалы первых n целых чисел.Так-то задача не трудная ,но я не понимаю ,как записать ее в файл .

[GetMax]

Var
  i,n:Byte;
  Fct:LongInt;
  f:Text;
begin
  Readl(n);
  Assign(f,'C:\Faktorial.txt');
  Rewrite(f);
  For i:=1 to n do
  Begin
    //посчитали факториал(в данном случае это переменная Fct)
    Writeln(f,Fct) // записали его в файл
  End;
  Close(f)
End.

[xakkkkker]

Var
  i,n:Byte;
  Fct:Integer;
  f:Text;
  
Function Fact(n:integer):integer;
var
 k:integer;
 begin
  if n=0 then Fact:=1 else
   Fact:=n*Fact(n-1);
 end;
begin
  Readln(n);
  Assign(f,'C:\Faktorial.txt');
  Rewrite(f);
  For i:=1 to n do
  Begin
    Readln(Fct);
	Fct:=Fact(Fct);

        Writeln(f,Fct)   End;
  Close(f)
End.

Дополненный вариант.
1 вводим у скольких чисел надо вычислить факториал
2 вводим сами числа

[Лина59]

честно ,то когда я ввожу программы ни одна из них не работает

[Alex11223]

Вероятно потому что вы не создали файл по указанному пути (а в 1 варианте не написали функцию вычисления факториала).

[GetMax]

честно ,то когда я ввожу программы ни одна из них не работает

Если вы просто скопипастили программу xakkkkkera, то знайте в ней допущена небольшая неточность(это вам повод немного подумать самостоятельно). В своей же программе, я не считал факториал с той же самой целью.