Вопрос 40. Циклы с неявно заданным числом повторений

Это такие циклы, число повторений которых заранее не известно. Выход из них происходит при достижении определенного условия, а на каком шаге это произойдет заранее сказать невозможно.

В Visual Basic для реализации циклов с неявно заданным числом повторений можно использовать оператор Do … Loop.

В зависимости от того, когда состоится проверка условия на прекращение многократного выполнения действий, различают два вида циклов:

1) С предусловием	2) С постусловием
Цикл с предусловием предусматривает проверку условия перед последовательностью повторяемых действий. В таком цикле возможна ситуация, когда эта последовательность действий ни разу не выполнится.	В цикле с постусловием условие проверяется после того, как выполнятся действия, предусмотренные в теле цикла. Такой цикл в любом случае хотя бы один раз обязательно выполнится.
1–й вариант: Пока условие - верно, выполнять тело цикла.
Синтаксис оператора:
Do While условие [операторы] Loop	Do [операторы] Loop While условие
2–й вариант: Пока условие - неверно, выполнять тело цикла.
Синтаксис оператора:
Do Until условие [операторы] Loop	Do [операторы] Loop Until условие

Пример:

Написать процедуру ввода экзаменационных оценок в диалоговом окне. Ввод завершить, если в диалоговом окне будет нажата кнопка Cancel. Вычислить среднюю оценку для введенной группы оценок.