Написать программу, которая вычисляет факториал числа.

Question

Информатика

Донара

26 марта, 22:58

Написать программу, которая вычисляет факториал числа.

+3

Ответы (2)

Знаете ответ на вопрос?

Петруся · Answer 1

Var n, f, i: integer;

begin

write ('n = ') ;

readln (n) ;

f:=1;

for i:=1 to n do f:=f*i;

writeln (n,'! = ', f) ;

end.

Пример:

n = 6

6! = 720

Федюля · Answer 2

Program E9;

var p, i, n: integer;

begin

write ('введите целое n = ') ;

readln (n) ;

p: = 1;

for i: = 1 to n do

p: = p * i;

write (n, '! = ', p) ;

readln

end.