Написать программу, которая находит все двузначные числа которые делятся на n. pascal.

Var a,n:integer;
begin
writeln('Введите n');
readln(n);
for a:=10 to 99 do
if (a mod n =0)then writeln(a);
end.