Паскаль. найти все двузначные числа, такие, что сумма цифр равна a, а само число делится на b.

Begin
readln(a,b);
For i:=10 to 99 do
if (i mod 10 + i div 10=a) and (i mod b=0) then writeln(i);
end.