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

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

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

var i:integer;
  begin
    i:=55;
    repeat
      writeln(i);
      i:=i+1;
    until (i>9236);

    readln();
  end.