Pascal - Bucle while-do

UN while-doLa declaración de bucle en Pascal permite cálculos repetitivos hasta que se satisfaga alguna condición de prueba. En otras palabras, ejecuta repetidamente una declaración de destino siempre que una condición dada sea verdadera.

Sintaxis

La sintaxis de un bucle while-do es:

while (condition) do S;

Dónde, condition es una expresión booleana o relacional cuyo valor sería verdadero o falso y S es una declaración simple o un grupo de declaraciones dentro del bloque BEGIN ... END.

Por ejemplo,

while number>0 do
begin
   sum := sum + number;
   number := number - 2;
end;

Cuando la condición se vuelve falsa, el control del programa pasa a la línea inmediatamente siguiente al ciclo.

Diagrama de flujo

Aquí, el punto clave del ciclo while es que es posible que el ciclo nunca se ejecute. Cuando se prueba la condición y el resultado es falso, se omitirá el cuerpo del bucle y se ejecutará la primera instrucción después del bucle while.

Ejemplo

program whileLoop;
var
   a: integer;

begin
   a := 10;
   while  a < 20  do
   
   begin
      writeln('value of a: ', a);
      a := a + 1;
   end;
end.

Cuando el código anterior se compila y ejecuta, produce el siguiente resultado:

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15
value of a: 16
value of a: 17
value of a: 18
value of a: 19