Question

Задание 3 Кумир
-
Напишите программу, которая в последовательности натуральных чисел определяет
количество чисел, кратных Зи оканчивающихся на 5. Программа получает на вход
количество чисел в последовательности, а затем сами числа.
Входные данные:
9, 25, 15
Выходные данные:
1

Answer 1

var k,n,i,x:integer;

begin

readln(n);

for i:=1 to n do begin

  readln(x);

  if(x mod 3 = 0) and (x mod 10 = 5) then

    k:=k+1;

end;

writeln(k);

end.