Pascal - declaração if then else

A if-then declaração pode ser seguida por um opcional else declaração, que é executada quando a expressão booleana é false.

Sintaxe

A sintaxe para a instrução if-then-else é -

if condition then S1 else S2;

Onde, S1 e S2 são declarações diferentes. Please note that the statement S1 is not followed by a semicolon. Nas instruções if-then-else, quando a condição de teste é verdadeira, a instrução S1 é executada e S2 é ignorada; quando a condição de teste é falsa, S1 é ignorado e a instrução S2 é executada.

Por exemplo,

if color = red then
   writeln('You have chosen a red car')

else
   writeln('Please choose a color for your car');

Se a expressão booleana condition for avaliado como verdadeiro, o bloco de código if-then será executado; caso contrário, o bloco de código else será executado.

Pascal assume quaisquer valores diferentes de zero e não nulos como verdadeiros e, se for zero ou nulo, será considerado um valor falso.

Diagrama de fluxo

Exemplo

Vamos tentar um exemplo completo que ilustraria o conceito -

program ifelseChecking;
var
   { local variable definition }
   a : integer;

begin
   a := 100;
   (* check the boolean condition *)
   if( a < 20 ) then
      (* if condition is true then print the following *)
      writeln('a is less than 20' )
   
   else
      (* if condition is false then print the following *) 
      writeln('a is not less than 20' );
      writeln('value of a is : ', a);
end.

Quando o código acima é compilado e executado, ele produz o seguinte resultado -

a is not less than 20
value of a is : 100

A instrução if-then-else if-then-else

Uma instrução if-then pode ser seguida por uma instrução else if-then-else opcional, que é muito útil para testar várias condições usando uma instrução if-then-else if única.

Ao usar instruções if-then, else if-then, else, há alguns pontos a serem considerados.

  • Uma instrução if-then pode ter zero ou mais um e deve vir depois de qualquer outro if.

  • Uma instrução if-then pode ter zero a muitos else if's e eles devem vir antes do else.

  • Assim que um else if for bem-sucedido, nenhum dos else if's ou else's restantes serão testados.

  • Nenhum ponto-e-vírgula (;) é fornecido antes da última palavra-chave else, mas todas as instruções podem ser compostas.

Sintaxe

A sintaxe de uma instrução if-then-else if-then-else na linguagem de programação Pascal é -

if(boolean_expression 1)then 
   S1 (* Executes when the boolean expression 1 is true *)

else if( boolean_expression 2) then 
   S2 (* Executes when the boolean expression 2 is true *)

else if( boolean_expression 3) then 
   S3 (* Executes when the boolean expression 3 is true *)

else 
   S4; ( * executes when the none of the above condition is true *)

Exemplo

O exemplo a seguir ilustra o conceito -

program ifelse_ifelseChecking;
var
   { local variable definition }
   a : integer;

begin
   a := 100;
   (* check the boolean condition *)
   if (a = 10)  then
      (* if condition is true then print the following *)
      writeln('Value of a is 10' )
   
   else if ( a = 20 ) then
      (* if else if condition is true *)
      writeln('Value of a is 20' )
   
   else if( a = 30 ) then 
      (* if else if condition is true  *)
      writeln('Value of a is 30' )
   
   else
      (* if none of the conditions is true *)
      writeln('None of the values is matching' );
      writeln('Exact value of a is: ', a );
end.

Quando o código acima é compilado e executado, ele produz o seguinte resultado -

None of the values is matching
Exact value of a is: 100