2.2 Alternativa simple ( de nuevo la instrucción if )

Una instrucción alternativa simple (o simplemente alternativa simple) es una variante (más sencilla) de una instrucción alternativa doble. En Pascal, para escribir una alternativa simple se utiliza la sintaxis:

   if
<expresión_lógica> then

   begin

   <bloque_de_instrucciones>

 end

Ejemplo: Se quiere escribir un programa que:

1º) Pida por teclado la nota (dato real) de una asignatura.
2º) Muestre por pantalla:

"APROBADO", en el caso de que la nota sea mayor o igual que 5.

Introduzca nota (real): 7.5

APROBADO

Obsérvese que, en este problema, no se va a mostrar por pantalla "SUSPENDIDO" en el caso de que la nota sea menor que 5, como sí se hacía en el problema del apartado anterior.

Introduzca nota (real): 3.5

Para resolver el problema del ejemplo se puede escribir:

program EJE12031;

uses Crt;

var Nota : Real;

begin
   ClrScr;
   GotoXY( 4, 2 );
   Write( 'Introduzca nota (real): ' );
   Read( Nota );

   if ( Nota >= 5 ) then
      begin
         GotoXY( 4, 4 );
         Write( 'APROBADO' )
      end
end.

Programa (.PAS): Calificación según nota (Versión 2)

Fíjese que, en este caso, si hemos escrito las palabras reservadas begin y end, que enmarcan al <bloque_de_instrucciones> de la alternativa simple. Sin embargo, cuando el bloque de instrucciones sólo contenga una instrucción, dichas palabras reservadas serán opcionales.

Ejercicios Recomendados: