Write a Pascal program that outputs the number of two-digit numbers that are not multiples of 5.

a program that outputs the number of two-digit numbers that are not more than 5
first program
Var
i, a: integer;
begin
a: = 0;
for i: = 1 to 90 do
if i mod 5 <> 0 then
a: = a + 1;
writeln (‘The number of numbers is not a multiple of 5:’, a);
end.
the second way to calculate in the program
var i, c: byte;
begin
for i: = 10 to 99 do
if i mod 5> 0 then c + = 1;
writeln (c);
end.