Basic Pascal Tutorial/Chapter 3/CASE/es

From Free Pascal wiki
Revision as of 20:52, 16 February 2010 by Arturom (talk | contribs) (Sentencia CASE)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigationJump to search

Case inicia una sentencia case. La sentencia case compara el valor de la expresión ordinal para cada elemento, que puede ser una constante, un subrango, o una lista de ellas separadas por comas. Los campos se separan de la acción mediante dos puntos ":"

Suponga que quiere ejecutar una acción si b es 1, 7, 2037, ó 5; y otra distinta en caso contrario. Puede hacer esto: <delphi> if (b = 1) or (b = 7) or (b = 2037) or (b = 5) then

 Sentencia1

else

 Sentencia2;

</delphi>

Pero en ese caso, sería más sencillo establecer la acción para la lista de números utilizando una sentencia case:

<delphi> case b of

 1,7,2037,5: Sentencia1;
 otherwise   Sentencia2

end; </delphi>

La forma general de uso de la sentencia case es:

<delphi> case selector of

 List1:    Sentencia1;
 List2:    Sentencia2;
 ...
 Listn:    Sentencian;
 otherwise Sentencia

end; </delphi>

La parte otherwhise es opcional. Cuando está disponible, es diferente entre compiladores. En algunos se usa la palabra else en vez de otherwise.

selector es cualquier variable o un tipo de dato ordinal. No se pueden usar números reales.

Tenga en cuenta que las listas deben consistir en valores literales. Es decir, debe utilizar constantes - no se pueden utilizar variables.

previous contents next