Question

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


Пример работы программы:

Входные данные

3

16

26

24

Выходные данные

2
на паскаль

Answer 1

program kol_chisel_na_6;

var

n,x,k,i:integer;

begin

read(n);

k:=0;

for i :=1 to n do

begin

read(x);

if x mod 10=6 then

inc(k)

end;

write(k)

end.