Напишите программу которая в последовательности натуральных чисел определяет сумму чисел кратных 3 и оканчивающихся на 2. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число кратное 3 и оканчивающиеся на 2. Количество чисел не превышает 100. Введённые числа по модулю не превышают 300. Программа должна вывести отдел число: сумму чисел, кратных 3 и оканчивающихся на 2.
Входные данные:
4
12
25
12
9
Выходные:
24
Входные данные:
4
12
25
12
9
Выходные:
24
More Questions From This User See All
Answers & Comments
Verified answer
//PascalABC.NET//Версия 3.3.5, сборка 1650
begin
write(ReadSeqInteger(ReadInteger).Where(x->(x mod 3=0) and (x mod 10=2)).Sum);
end.