Question

Задание в паскале:
Составить программу, вычисляющую N факториал (N вводится с клавиатуры).

Answer 1

var n,i,c:integer;
 begin
 c:=1;
 readln(n);
  for i:=1 to n do
  c:=c*i;
 writeln(c);
 end.