Вывести на экран значение n!, n – целое число, вводимое с клавиатуры.
Вывести на экран значение n!, n – целое число, вводимое с клавиатуры.
Гость
Ответ(ы) на вопрос:
Гость Var
i, n: integer;
nf: longint;
begin
readln(n);
nf := 1;
for i := 1 to n do
nf := nf * i;
writeln(nf);
end.
Не нашли ответ?
Похожие вопросы