Найти сумму целых положительных чисел, больших 20,меньших 120 и кратных 9 и не заканчивающих на 5
Найти сумму целых положительных чисел, больших 20,меньших 120 и кратных 9 и не заканчивающих на 5
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.2, сборка 1341 от 20.11.2016
begin
Writeln(Range(27,119,9).Where(x->x mod 10<>5).Sum)
end.
Результат
747
Не нашли ответ?
Похожие вопросы