Предмет: Информатика,
автор: dashoostik
Напишите программу, которая в последовательности натуральных чисел определяет сумму двухзначных чисел кратных 5. Программа получает на вход количество натуральных чисел, а затем и сами числа. Количество чисел не превышает 1000. Введённые числа не превышают 30000. Программа должна вывести одно число: сумму двухзначных чисел кратных 5.
Ответы
Автор ответа:
0
// PascalABC.NET 3.3
begin
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
begin
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
Интересные вопросы
Предмет: Информатика,
автор: HAckedHack
Предмет: Физика,
автор: Mojojojojojojo
Предмет: Геометрия,
автор: anik200579
Предмет: Математика,
автор: MsRess