Составить программу вычисления произведения чисел от 10 до 15.
Составить программу вычисления произведения чисел от 10 до 15.
Гость
Ответ(ы) на вопрос:
Гостьvar p, i: integer;
begin
p := 1;
for i := 10 to 15 do
p := p * i;
write(p);
end.
Не нашли ответ?
Похожие вопросы