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

Урок 12.2 Задача 1:

Имеется программа:

var i: integer;
begin
  for i:=5 to 34 do
    write(i, ' ');
 
  readln();
end. 

Ответьте на вопросы/выполните задания

Что в ней происходит?
Что будет на экране после её выполнения?
Перепишите её, используя цикл while.
Перепишите её, используя цикл repeat/until.

{В программе работает цикл. 
 Программа выводит на экран числа от 5 до 34 включительно.
 Выводимые числа представляют собой значения счетчика цикла на каждом витке.
 Применяется цикл for, который подразумевает увеличение значения счетчика на единицу,
 поэтому отдельная команда увеличения счетчика в программе отсутствует}
var i: integer;
begin
  for i:=5 to 34 do   //  начальное и конечное значение указаны в заголовке цикла for
    write(i, ' ');    //  числа выводятся в одну строку через пробел
  readln();
end. 

var i: integer;
begin
  i :=5; //указываем начальное значение счетчика, нижнюю границу диапазона
  while (i<=34) do // счетчик будет работать, пока не превысит верхнюю границу диапазона
    begin
    write(i, ' '); // выводим на экран значение счетчика
    i := i+1;      // увеличиваем значение счетчика на 1
    end; 
  readln();
end.

var i: integer;
begin
  i :=5;   //указываем начальное значение счетчика, нижнюю границу диапазона
  repeat
    write(i, ' '); // выводим на экран значение счетчика
    i := i+1;      // увеличиваем значение счетчика на 1
  until (i>34);   // счетчик будет работать, пока не превысит верхнюю границу диапазона
  readln();
end.