Инструкция REPEAT
repeat
begin
{ Инструкции } end until Условие;
Выполняются инструкции, находящиеся между begin и end (инструкции цикла), после этого проверяется значение выражения Условие. Если оно равно False (т. е. условие не выполняется), то инструкции цикла выполняются еще раз. И так продолжается до тех пор, пока Условие не станет истинным. Таким образом, после слова until записывается условие завершения цикла.
Примечание
Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.
