Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, оканчивающихся на 9. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 9.Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30000. Программа должна вывести одно число: количество чисел, оканчивающихся на 9.
var n,x,k,i:integer;
begin
readln(n);
for i:=1 to n do
begin
readln(x);
if x mod 10=9 then
k:=k+1;
end;
write('всего чисел которые оканчиваются на 9: ',k);
end.
Объяснение: