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

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

Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, оканчивающихся на 8. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 8.
Количество чисел не превышает 1000. Введённые числа по модулю
не превышают 30 000.
Программа должна вывести одно число: количество чисел, оканчивающихся на 8.
Входные данные
3
18
28
24
Выходные данные
2


Информатика (31 баллов) | 36 просмотров
0

Паскаль

Дан 1 ответ
0 голосов
Правильный ответ
// PascalABC.NET 3.2, сборка 1504 от 09.07.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(ReadSeqInteger(ReadInteger).Where(x->x mod 10=8).Count)
end.

Пример
3
18
28
24
2
(150k баллов)