Оператор повтора repeat (оператор с постусловием)
Формат описания оператора Repeat <ОПЕРАТОР 1>; <ОПЕРАТОР 2>; . . . <ОПЕРАТОР N>; тело цикла until <логическое выражение>;
Работа оператора repeat • выполняется тело цикла • проверяется значение логического выражения • если значение логического выражения ложно то управление передается к началу оператора repeat и снова выполняется тело цикла • и так до тех пор пока логическое выражение не станет истинным тогда управление передается оператору следующему за repeat
Требования для оператора While • в теле цикла оператора repeat необходимо предусмотреть изменения значений входящих в логическое выражение иначе цикл будет бесконечным • тело цикла выполняется хотя бы один раз не зависимо от значения логического выражения • нет ограничений на досрочный выход из цикла и недопустим вход в тело цикла минуя заголовок
Способы изображения оператора repeat в блок-схемах <операторы> <логическое выражение> ложь истина
Начало блока repeat <оператор 1> <оператор N> Until <логическое выражение> Конец блока
Пример: найти сумму четных чисел от 1 до 100 Фрагмент программного кода Var n, i: integer; s: real; Begin n: =strtoint(edit 1. text); S: =0; i: =1; Repeat if i mod 2=0 then s: =s+i; i: =i+1; Label 2. caption: =‘сумма равна’+inttostr(S); Until i>=100; end;