Question

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

Answer 1

Ответ:

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.

Объяснение: