Estructura de control de repetición REPEAT

SENTENCIA REPEAT UNTIL
Ejecuta las sentencias comprendidas entre las palabras reservadas REPEAT y UNTIL hasta que la expresión o variable sea verdadera.
Formato:

REPEAT
begin
(Sentencia);
(Sentencia);
...
end;

UNTIL condición;

Características del bucle REPEAT:
Se ejecutan siempre una vez, por lo menos, y la terminación del bucle se produce cuando el valor de la expresión lógica o condición de salida es verdadera. Se ejecuta hasta que la expresión es verdadera, es decir, se ejecuta mientras la expresión sea falsa.