Среди всех двухзначных чисел вывести на экран ,которые при делении на 15 остаток два. заранее !

Var
i:integer;
begin
for i:=10 to 99 do begin
if i mod 15=2 then
writeln(i);
end;
readln;
end.