Итерационные циклы с постусловием

Синтаксис:

repeat оператор; оператор;... оператор until выражение

Операторы между словами repeat и until повторяются, пока логическое выражение является ложным (False). Как только логическое выражение становится истинным (True), происходит выход из цикла.

Так как выражение оценивается после выполнения операторов, то в любом случае операторы выполнятся хотя бы один раз.

Пример.

repeat WriteLn('Введите положительное число'); ReadLn(x);until x>0;