Оператор repeat выполняет список операторов, пока не будет достигнуто определенное условие. Список выполняться (в любом случае) хотя-бы один раз. Синтаксический прототип оператора repeat..until отображён на схеме
Оператор repeat
Этот оператор будет выполнять операторы между repeat и until до момента, когда выражение (expression) не примет значение True. Поскольку выражение вычисляется после выполнения операторов, они выполняются хотя-бы один раз.
Помните о том, что логическое выражение (expression) будет вычисляться по умолчанию посхеме короткого замыкания, а это означает, что вычисления будет остановлены в точке, где результат определён.
Ниже приведены допустимые операторы repeat
repeat
WriteLn ('I =',i);
I := I+2;
until I>100;
repeat
X := X/2
until x<10e-3;
Обратите внимание, что последний оператор перед ключевым словом until не нужно заканчивать точкой с запятой, но она допускается.
Для выхода из цикла или начала новой итерации оператора repeat..until могут быть использованы системные процедуры Break и Continue. Обратите внимание, что Break и Continue не зарезервированные слова, и поэтому могут быть перегружены.