Question

Помогите решить Информатика

Answer 1

Ответ:

program z1;

var n,i,a,k: integer;

begin  

k:=0;

readln(n);

for i:=1 to n do

begin

read(a);

if a mod 10 = 9 then k:=k+1

end;

writeln (k)

end.

Объяснение:

Ввод количества чисел в последовательности

Цикл со счётчиком:

1) ввод числа

2) проверка условия

Вывод количества чисел, оканчивающихся на 9