Цикл while выполняет operator1 до

Урок 6. Операторы повторения с неизвестным заранее количеством итераций

Оператор WHILE

while (EXPR) {operator1} continue {operator2}

Цикл while выполняет operator1 до тех пор пока EXPR = true. Блок после continue выполняется всегда перед тем как вычисляется логическое выражение EXPR. Это подобно EXPR3 в предложении for, поэтому в этом блоке удобно изменять счетчики и флаги цикла.

Оператор Until

Этот оператор по синтаксису ничем не отличается от While, но работает пока EXPR = False.

Оператор do

do {operator} while (EXPR) do {operator} until (EXPR)

Оператор while/until проверяет условие в начале каждого цикла, до входа в него. Если результат проверки условия — "ложь", цикл не будет выполнен вообще.

Иногда возникает необходимость проверять условие не в начале, а в конце цикла. Для этого в Perl есть оператор do {} while, который очень похож на обычный оператор while, за исключением того, что он проверяет выражение только после однократного выполнения цикла.

* * * *

Приведенная ниже программа демонстрирует работу оператора While.

#!/usr/bin/perl #programm 7 print "Content-Type: text/html\n\n";

$i=1; while($i<9){ print "$i X 7 = ".$i*7; print "<BR>"; }continue{$i++}

* * * *

Модернизируйте программу, которая выводит таблицу Пифагора (Всё равно какую) так, чтобы вместо оператора For в ней использовались операторы While и Until.

Дополнительная информация: [Управляющие структуры ] [Управляющие структуры 2 ]

[Содержание] [Вступление] [необходимое для начала изучения] [урок 1] [урок 2] [урок 3] [урок 4] [урок 5] [урок 6] [урок 7] [урок 8] [урок 9] [урок 10] [урок 11] [урок 12] [урок 13] [урок 14] [урок 15] [урок 16] [урок 17] [урок 18] [урок 19] [урок 20] [урок 21] [урок 22] [урок 23] [урок 24] [урок 25] [урок 26] [урок 27] [урок 28] [правила хорошего тона] [приложение A] [приложение Б] [приложение В] [заключение] [благодарности]

Содержание раздела