Предмет: Информатика,
автор: neto4ka1987
Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, оканчивающихся на 8. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 8.
Количество чисел не превышает 1000. Введённые числа по модулю
не превышают 30 000.
Программа должна вывести одно число: количество чисел, оканчивающихся на 8.
Входные данные
3
18
28
24
Выходные данные
2
neto4ka1987:
Паскаль
Ответы
Автор ответа:
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
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ReadSeqInteger(ReadInteger).Where(x->x mod 10=8).Count)
end.
Пример
3
18
28
24
2
Похожие вопросы
Предмет: Литература,
автор: derzed
Предмет: Биология,
автор: suprudkoartem6
Предмет: Окружающий мир,
автор: dimkapetrov673
Предмет: Алгебра,
автор: kdenki
Предмет: Алгебра,
автор: tanja62milana