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

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

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

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

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

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

1) Цикл For выводит на экран числа от 5 до 34
2) На экране будет последовательность чисел от 5 до 34

3) С использованием while:

var i: integer;
begin
  i:=5;
  while i<=34 do
  begin
    write(i, ' ');
    i:=i+1;
  end;
  readln();
end.       

4) С использованием repeat/until:

var i: integer;
begin
  i:=5;
  repeat
    write(i, ' ');
    i:=i+1;
  until i=35;
  readln();
end.