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

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

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

var a: integer;

begin
  a:=55;
  repeat
    write (a, ' ');
    a:=a+1;
  until (a>9236);
  writeln();writeln();
  writeln('<<Konec>>');
  readln();
end.