Нужно сделать в Паскале:

Составьте программу, составьте программу, которая вычисляет произведение чисел от 1 до n. Где n вводится с клавиатуры.

Question

Информатика

Рена

2 июля, 11:25

Нужно сделать в Паскале:

Составьте программу, составьте программу, которая вычисляет произведение чисел от 1 до n. Где n вводится с клавиатуры.

+1

Ответы (1)

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

Лиана · Answer 1

Var p, i, n:integer;

begin

p:=1;

writeln ('Введи n') ;

readln (n) ;

if n>=1 then

begin

for i:=1 to n do

p:=p*i;

writeln (p) ;

end else writeln ('n>=1') ;

end.

Нужно сделать в Паскале:Составьте программу, составьте программу, которая вычисляет произведение чисел от 1 до n. Где n вводится с клавиатуры.

Нужно сделать в Паскале:

Составьте программу, составьте программу, которая вычисляет произведение чисел от 1 до n. Где n вводится с клавиатуры.