begin case
(tab)case boolean_expr
(tab)(tab)statement(s)
(tab)case boolean_expr
(tab)(tab)statement(s)
(tab)else
(tab)(tab)statement(s)
end case
La estructura CASE (Proceso por casos), permite al programador crear una estructura que prueba distintas condiciones. Sólo la primera condición verdadera se ejecuta y todas las demás se saltan. Si existe un else opcional como la última condición (caso) este se ejecutará si previamente no se ha ejcutado otro caso.
The case structure allows the programmer to create a structure to test multiple conditions. Only the first true condition is executed and all of the other conditions are skipped. If there is an optional else as the last condition this will be executed if no other conditions are met.
for t = 1 to 10 begin case case t < 3 print t + " es menor de 3" case t < 7 print t + " es menor de 7 pero mayor o igual a 3" else print t + " es 7 o mayor" end case next t
Visualizará:
1 es menor de 3 2 es menor de 3 3 es menor de 7 pero mayor o igual a 3 4 es menor de 7 pero mayor o igual a 3 5 es menor de 7 pero mayor o igual a 3 6 es menor de 7 pero mayor o igual a 3 7 es 7 o mayor 8 es 7 o mayor 9 es 7 o mayor 10 es 7 o mayor
1.0.0.9