Найти 10 первых...

Найти 10 первых натуральных чисел,оканчивающихся на цифру 7 кратных числу 9 и находящихся в интервале левая граница которого равна 100 по информатике!!!Срочно пожалуйста !!!!

 

117, 207, 297, 387, 477, 567, 657, 747, 837, 927
моя первая программа на паскале (у меня работает правильно)
program MyHelloWorld(output);
var i, v : integer;
begin
v:=99;
    for i := 1 to 10 do begin
        while true do begin
            Inc(v);
            if ((v - 7) mod 10 = 0) And (v mod 9 = 0) then begin
                writeln(v);
                break;
            end;
        end;
    end
end.