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

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

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

program Variant2;
var z, a: integer;
begin
  z := 55;
  repeat
    write(z, ' ');
    z := z + 1;

  until (z = 9237);

end.