Задача 1 урок 12.1

Выведите на экран, все числа от 55 до 9236.

program Project121;
var i : integer;
begin
  i:=55;
  repeat
    write(i,' ');
    i := i + 1;
  until (i > 9236) ;
  readln();
end.