Учебник Turbo Pascal. Введение - Оператор цикла while...do...

Оператор цикла while...do...

Оператор цикла является важнейшим оператором и имеется в большинстве современных языков программирования (а сама идея цикла возникла еще в XIX веке!). Цикл позволяет многократно выполнить некоторое множество действий, задаваемых операторами, составляющими его тело. В Паскале имеется несколько разновидностей оператора цикла. Начнем с оператора цикла с предусловием. Данный оператор имеет вид

while  expression  do   statement;

При выполнении этого оператора вначале вычисляется значение логического выражения expression. Если это значение истинно, выполняется оператор statement, затем значение выражения проверяется вновь и т. д., до тех пор, пока выражение не примет значение «ложь». Если выражение принимает значение «ложь» при первой же проверке, то оператор statement не выполняется вообще. Особо отмечу частный случай:

while True do statement;

Здесь оператор statement будет выполняться бесконечно.

Пример оператора цикла с предусловием:

while Counter < 10 do 
begin
    write('Значение счетчика равно ', Counter);
    Writeln;
    Counter := Counter + 2; 
end: