Question

СРОЧНО, 40 БАЛЛОВ!!! Напишите программу, которая в последовательности натуральных чисел определяет количество чисел K, оканчивающихся на 4. Программа получает на вход количество чисел в последовательности N, а затем сами числа. Программа должна вывести одно число - количество чисел K, оканчивающихся на 4. Язык программирования - Паскаль!

Answer 1

var

 k,n,i:integer;

begin

 k:=0;

 readln(n);

 for i:=1 to n do

   begin

     readln(n);

     if n mod 10 = 4 then

       inc(k);

   end;

 writeln(k);

end.

Если моё решение вам помогло, отметьте его как лучшее. Спасибо! Удачи!