Question

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

Answer 1

// 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

Answer 2

Вот пример программы на Python, которая решает данную задачу:

n = int(input("Введите количество чисел в последовательности: "))
count = 0

for _ in range(n):
    num = int(input("Введите число: "))
    if num % 10 == 8:
        count += 1

print("Количество чисел, оканчивающихся на 8:", count)

Программа сначала запрашивает у пользователя количество чисел в последовательности (`n`). Затем она в цикле запрашивает каждое число и проверяет, оканчивается ли оно на 8. Если число оканчивается на 8, увеличивается счетчик `count`. В конце программа выводит значение счетчика.

Например, при вводе следующих данных: ``` Введите количество чисел в последовательности: 3 Введите число: 18 Введите число: 28 Введите число: 24 ``` Программа выведет: ``` Количество чисел, оканчивающихся на 8: 2 ```

Примечание: Программа предполагает, что пользователь будет вводить числа по одному на каждой строке. Если вам нужно изменить формат ввода или вывода, вы можете адаптировать программу соответственно.

Источник