Estructura de control de repetición REPEAT

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.



Ejemplo.
El mismo que con la sentencia WHILE.

Program escribeenteros;
Var
N,contador:integer;
Begin
Write ('Introduzca número máximo de enteros: ');
Readin (N);
Contador:= O;
Repeat
Contador:=contador+1;
Write (contador:5)
Until contador = N;
Writeln ('Fin de programa. Contador = ',contador)
End.

IMAGEN