какие есть двухзначные числа кратну 17

Pascal:
var
i,j:integer;
begin
for i:=10 to 99 do
if (i mod 17)=0 then
begin
j:=j+1;
writeln(j,'-e dvuzna4noe 4islo kratnoe 17 = ',i);
end;
readln;
end.

Ответ:
1-e dvuzna4noe 4islo kratnoe 17 = 17
2-e dvuzna4noe 4islo kratnoe 17 = 34
3-e dvuzna4noe 4islo kratnoe 17 = 51
4-e dvuzna4noe 4islo kratnoe 17 = 68
5-e dvuzna4noe 4islo kratnoe 17 = 85