Вопрос пользователя:
Написать программу вычисления N! (факториал числа N). Факториал вычисляется по формуле (см. рисунок).
Протестировать программу для N=0, N=2 N=4.
Илюха отвечает:
var n,f,i: integer;
begin
readln(n);
if n<0 then exit;
f:=1;
for i:=1 to n do f:=i*f;
writeln(f);
end.