👤

program pascal care calculeaza valoarea expresiei p=1*2*3*...*n

Răspuns :

PROGRAM n_factorial;
var i,p,n:integer;
begin
   readln(n);
   p:=1;
   for i:=1 to n do
   p:=p*i;
   write(p);
end.