Помогите с информатикой 8 класссоставте программу которая вычисляет произведения натуральных чисел от 5 до 10 используя цикл while
Помогите с информатикой 8 класс
составте программу которая вычисляет произведения натуральных чисел от 5 до 10 используя цикл while
Гость
Ответ(ы) на вопрос:
Гостьvar
i, p: integer;
begin
p := 1;
i := 5;
while i <= 10 do
begin
p := p * i;
i := i + 1;
end;
writeln(p);
end.
Не нашли ответ?
Похожие вопросы