Паскаль. "циклы с условием" факториалом натурального числа n называется произведение...

Question

Паскаль. "циклы с условием"
факториалом натурального числа n называется произведение n!=1*2*3*4*5*...*n . подсчитать чему равняется 7!

Answer 1

Var f,i:integer;
begin
i:=1;
f:=1;
while i<7 do<br> begin
 i:=i+1;
 f:=f*i;
 end;
writeln(i,'! = ',f);
end.

Результат:
7! = 5040