
Tyukabav
5 год назад
Составьте программу которая находит сумму чётных чисел и произведение чисел кратных 5, в диапозоне от 30 до 50. Очень нужна как можно скорее,заранее спасибо.

ОТВЕТЫ

Владимир
Oct 24, 2020
begin
Write(range(30,50,2).Sum);
Write(' ', range(30,50,5).Aggregate(1,(x,y)->(x*y)));
end.
942
Смежные вопросы: