Ciclo Repita-Hasta

Este ciclo es similar al haga-mientras, la diferencia esta en que en el bloque de acciones se ejecuta nuevamente si la condición evalúa a falso y no se ejecuta mas si evalúa a verdadero. Cabe resaltar que el bloque de acciones se ejecuta por lo menos una vez.
La forma general de este ciclo es:

repita            <bloque de instrucciones>   hasta(condición)

Donde, <bloque> es el bloque de acciones ejecutado y (condición) es la condición que determina si el bloque es ejecutado de nuevo no. Si la condición evalúa a falso el bloque es ejecutado de nuevo y si evalúa a verdadero no es ejecutado. Después de ejecutar el bloque de acciones se evalúa la condición. 

EJEMPLOS.

Ejemplo 1. Desarrollar un programa que lea una serie de datos hasta que se ingrese el dato 0 y calcule su suma.

DIALOGO:

Objetos Conocidos

Una serie de números.

Objetos Desconocidos

Un número.

Condiciones

El número buscado es la suma de los números conocidos, el último número leído debe ser cero (0.0).

ESPECIFICACIÓN:

Entradas

a1, a2, ..., an  Reales (aies el i-esimo número leído).

Salidas

resp  Reales, (resp es la suma de los números leídos).

Condiciones

resp = a1 + a2 + ...,. + an la suma de los números leídos  an = 0.0   El último número leído es cero.

DISEÑO:

Primera Iteración:

Iniciar resultado en cero

repita

1. Leer número

2. Acumular número

Hasta que número sea igual a cero.

escribir resultado

Iteración Final:

n: enterosuma: entero suma := 0 repita escribir(“Ingrese el número:”)leer( n )suma := suma + n hasta (n = 0 ) escribir(“La suma es:”, suma)