Сколько раз исполнится следующий цикл:
i:=21;
Repeat
i:=i-5
Until i>21;

Цикл Repeat ... Until выполняется хотя бы один раз, а затем проверяет условие. Если условие ложно, цикл повторяется.

Проследим шаги:

i := 21
1-й шаг: i := 21 - 5 = 16, условие 16 > 21 — ложь, идём дальше.
2-й: i := 16 - 5 = 11, 11 > 21 — ложь.
3-й: i := 11 - 5 = 6, 6 > 21 — ложь.
4-й: i := 6 - 5 = 1, 1 > 21 — ложь.
5-й: i := 1 - 5 = -4, -4 > 21 — ложь.
6-й: i := -4 - 5 = -9, -9 > 21 — ложь.
... и так далее.

Переменная i постоянно уменьшается на 5 и никогда не станет больше 21. Условие i > 21 всегда будет ложным, поэтому цикл никогда не завершится. Ответ: бесконечное количество раз (зацикливание).

0 0 Пожаловаться