Решение задачи 1 из главы 12.2

Решение задачи 1 из главы 12.2

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

- Цыклом выводятся целые числа от 5 до 34.
- На экране будут выведены числа от 5 до 34 через пробел.
- Перепишите её, используя цикл while.

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

- Перепишите её, используя цикл repeat/until.

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