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

Primary tabs

Submitted by avast36 on Wed, 03/30/2022 - 11:44

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

Решение:

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