задача 3 урок 12.1

задача 3 урок 12.1

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

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