Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ



begin
Write(range(30,50,2).Sum);
Write(' ', range(30,50,5).Aggregate(1,(x,y)->(x*y)));
end.

942
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам