Написать программу на языке Pascal используя операторы цикла. Задача: Задать случайным образом N Напечатать значение N! = 1234 ... * N

Question

Информатика

Февронья

9 октября, 00:50

Написать программу на языке Pascal используя операторы цикла. Задача: Задать случайным образом N Напечатать значение N! = 1234 ... * N

+1

Ответы (1)

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

Лавреня · Answer 1

Program n1;

var

n, i: integer;

p: real;

begin

randomize;

n:=random (15) + 1;

p : = 1;

for i : = 2 to n do

p : = p * i;

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

end.

Написать программу на языке Pascal используя операторы цикла. Задача: Задать случайным образом N Напечатать значение N! = 1*2*3*4 * ... * N

Написать программу на языке Pascal используя операторы цикла. Задача: Задать случайным образом N Напечатать значение N! = 1234 ... * N