Напишите программу, которая в последовательности натуральных чисел определяет сумму двухзначных чисел кратных 5. Программа получает на вход количество натуральных чисел, а затем и сами числа. Количество чисел не превышает 1000. Введённые числа не превышают 30000. Программа должна вывести одно число: сумму двухзначных чисел кратных 5.
Answers & Comments
Verified answer
// PascalABC.NET 3.3begin
Print(
ReadSeqInteger(ReadInteger)
.Where(x -> (10 <= x) and (x <= 99) and (x mod 10 = 5))
.Sum
)
end.
Пример ввода:
7
5 7 10 12 14 20 22
Пример вывода:
30