Цикл с предусловием

для оператора Whileдля оператора For

x=х1
x≤x2
Тело цикла x=x+x3
Выход из цикла

х=х1,х2,±1
Тело цикла
Выход из цикла

 

 

где Х – параметр цикла;

Х1 – начальное значение параметра цикла;

Х2 – конечное значение параметра цикла;

Х3 – шаг изменения параметра цикла;

Тело цикла - простой или составной оператор языка Pascal.

 

Оператор While Оператор For
a) For x:=x1 to x2 do оператор тела цикла;  
a)While логическое выражение do оператор тела цикла;  

 

 

б) While логическое выражение do begin оператор1; . . . oператор n end;  
б) For x:=x1 downto x2 do оператор тела цикла;  

     
в) For x:=x1 to x2 do begin оператор1; . . . oператор n end;

 

 

Работа оператора While Пока логическое выражение, записанное за While истинно (True), выполняется оператор тела цикла. Как только логическое выражение станет ложно (False) происходит выход из цикла и управление передается следующему оператору в программе.   Работа оператора For     Параметру цикла присваивается начальное значение ( прямо в заголовке). Параметр цикла сравнивается с конечным значением параметра цикла. Пока х≤x2 (при положительном шаге) / х≥х2 ( при отрицательном шаге) выполняется тело цикла. После окончания тела цикла происходит автоматически наращивание / уменьшение значения параметра цикла на величину шага (+1 /-1). To, downto – служебные слова, задающие величину шага (+1 или -1 ); Новое значение параметра цикла снова сравнивается с конечным значением. Выход из цикла осуществляется при х>х2 (при положительном шаге) / х<х2 (при отрицательном шаге). Параметры цикла (х, х1 и х2- только порядкового типа)

Repeat оператор1; . . . oператор   Until логическое выражение;  
Цикл с постусловием

 

х=х1
x>x2
Тело цикла
нет
Выход из цикла

 

    Логическое выражение –условие выхода из цикла; Тело цикла – любое количество операторов языка Pascal.
  Работа оператора Repeat Повторять операторы тела цикла пока логическое выражение, записанное за Until ложно (False). Когда логическое выражение станет истинно (True) произойдет выход из цикла.