Помогите с информатикой 8 класс

составте программу которая вычисляет произведения натуральных чисел от 5 до 10 используя цикл while

Question

Тоня

26 июля, 08:16

+1

Ответы (1)

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

Атя · Answer 1

Var

i, p: integer;

begin

p : = 1;

i : = 5;

while i < = 10 do

begin

p : = p * i;

i : = i + 1;

end;

writeln (p) ;

end.

Помогите с информатикой 8 класссоставте программу которая вычисляет произведения натуральных чисел от 5 до 10 используя цикл while