Напишите программу,которая...

Андрей23 · 4 янв 2010

Напишите программу,которая в последовательности натуральных чисел определяет количество чисел,оканчивающихся на 3 Входныеданные:3,13,23,24.

Водитель баржы · 4 янв 2010

program Z1;
var a,n,i,m: integer;
begin
readln(n);
m:=0;
for i:=1 to n do
begin
readln(a);
if a mod 10=3, then m:=m+1
end;
writeln(m);
end.