Напишите программу на Паскале,в которой выдается количество двузначных чисел,не кратных 5

программка, выдающая количество двухзначных чисел, которые не больше 5
1-ая программка
Var
i , a : integer;
begin
a : = 0 ;
for i : = 1 to 90 do
if i mod 5 lt; gt; 0 then
a : = a + 1 ;
writeln (Количество чисел не кратных 5 : , a ) ;
end.
2-ой способ вычисления в программе
var i , c : byte;
begin
for i : = 10 to 99 do
if i mod 5 gt; 0 then c + = 1 ;
writeln ( c ) ;
end.