Напишите в Pascal программу: по заданному целому неотрицательному значению n вычислить n! = 123 * ... n.

Question

Иустин

Вчера, 06:54

+4

Ответы (1)

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

Фатьян · Answer 1

Var i, n, a : int64; beginreadln (n) ;

a:=1; for i : = 1 to n doa:=a*i; write (a) ; end.

Напишите в Pascal программу: по заданному целому неотрицательному значению n вычислить n! = 1*2*3 * ... n.