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.