Вывести на экран значение n! , n – целое число, вводимое с клавиатуры.

натали200652 натали200652    3   09.08.2019 17:30    1

Ответы
BoGDAn4iK2015 BoGDAn4iK2015  04.10.2020 07:44
Var
    i, n: integer;
    nf: longint;

begin
    readln(n);
    nf := 1;
    for i := 1 to n do
        nf := nf * i;
    writeln(nf);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика