Напишите программу, которая в последовательности натуральных чисел определяет сумму...

0 голосов
28 просмотров

Напишите программу, которая в последовательности натуральных чисел определяет сумму двухзначных чисел кратных 5. Программа получает на вход количество натуральных чисел, а затем и сами числа. Количество чисел не превышает 1000. Введённые числа не превышают 30000. Программа должна вывести одно число: сумму двухзначных чисел кратных 5.


Информатика (296 баллов) | 28 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

// PascalABC.NET 3.3
begin
  Print(
    ReadSeqInteger(ReadInteger)
      .Where(x -> (10 <= x) and (x <= 99) and (x mod 10 = 5))<br>      .Sum
  )
end.

Пример ввода:
7
5 7 10 12 14 20 22

Пример вывода:
30

(148k баллов)