Оператор DO…LOOP
Оператор do…loop чем-то похож на оператор while…wend, но возможности его применения несколько шире – проверяемое условие может быть использовано не только в начале оператора, но и в конце.
Поэтому возможны четыре различные формы написания оператора.
Первая форма:
DO UNTIL условие тело_цикла LOOP
Вторая форма:
DO WHILE условие тело_цикла LOOP
Третья форма:
DO тело_цикла LOOP UNTIL условие
Четвертая форма:
DO тело цикла LOOP WHILE условие
Если используется ключевое слово until, цикл будет выполняться, только когда условие имеет значение "ложь".
При указании ключевого слова while цикл будет выполняться до тех пор, пока условие будет иметь значение "истина".
Размещение условий в начале или конце цикла приводит к разным результатам: при проверке условия в конце оператора цикла, конструкции, составляющие его тело, будут исполняться хотя бы один раз, в то время как при проверке условия в начале возможен вариант, что цикл исполняться вообще не будет. Например:
к=0 ? "Значение К в начале цикла равно"; К DO WHILE К < 10 К=К+1 LOOP? "Значение К в конце цикла равно"; К
Кстати, чему же будет равно значение к в конце цикла?
220. Напишите программы – одну с оператором do… loop while, а другую с do… loop until, – которые бы выводили на экран расположенные по диагонали экрана круги, закрашенные цветами с 1 по 6 (рис. 1.64). Параметр цикла – номер цвета.
Рис. 1.64. Разноцветные круги