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

Задача 1 Урок 12.1:

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

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