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

Question

Информатика

Римма

1 октября, 17:15

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

+1

Ответы (2)

Знаете ответ?

Марго · Answer 1

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.

Мстислав · Answer 2

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