Curso Virtual Pascal Aula 18

Prévia do material em texto

02/06/2016 Curso Virtual Pascal ­ Aula 18
http://www.ufpa.br/sampaio/curso_de_icc/pascal/Aula_18_Pascal.htm 1/4
Aula 18: Programas c/ Decisão (continuação)  
Objetivos:
       Esta aula destina­se à apresentação dos comandos condicionais especialmente  a
estrutura condicional Case
Material de Referência:
Livro "Introdução à Ciência da Computação", Agosto de 1999, Antonio Benedito Coimbra Sampaio;
GOTTFRIED, Byron S. Programação em Pascal ­ 2a Edição Coleção Schaum. Lisboa, Portugal .: McGraw­Hill 1994.
Atividades da Unidade:
1. Registrar presença
2. Seguir Roteiro Abaixo:
Anterior.gif
(632
Comando Case Exercícios
 
1. Comando CASE
       O  comando CASE  permite  efetuarmos  um  desvio multidirecional  na  lógica  do  programa.  Ele  consiste  de  um
expressão  (chamada seletor ) e uma lista de comandos, cada um precedido por constantes ou subintervalos separados
por vírgulas (chamados rótulos de case ), de mesmo tipo do seletor, que pode ser qualquer escalar ordenado ( integer,
char, boolean, enumerated, faixa ).
Sintaxe número 1:
    Case <expressão ou variável> of
        <valor 1> : Comando_1;
        <valor 2> : Comando_2;
        . . .
        <valor n> : Comando_n;
    End;
    ou
    Case <expressão ou variável> of
           <valor 1> : Begin
            comando_1;
            comando_2;
            . . .
     End;
            <valor 2> : Begin
02/06/2016 Curso Virtual Pascal ­ Aula 18
http://www.ufpa.br/sampaio/curso_de_icc/pascal/Aula_18_Pascal.htm 2/4
            comando_1;
            comando_2;
            . . .
     End;
        . . .
            <valor n> : Begin
            comando_1;
            comando_2;
            . . .
     End;
End;
 
       A  expressão  ou  variável  no  comando  Case  deve  ser  do  tipo  simples,  normalmente  Char  ou  Integer. Após  a
avaliação  da  expressão,  seu  valor  ou  o  valor  da  variável  é  comparado  com os  diversos  valores  discriminados.  Se
houver algum que satisfaça, o comando subsequente será executado.
 
Sintaxe número 2:
Case <expressão ou variável> of
        <valor 1> : Comando_1;
        <valor 2> : Comando_2;
        . . .
        <valor n> : Comando_n
Else Comando;
End;
    Neste caso, se o resultado da expressão ou o valor da variável não satisfizer nenhum dos valores discriminados,
então o comando que estiver na frente da cláusula Else será executado.O comando case é extremamente importante
para estruturação de um programa que possua diversas opções de execução,  tomando­o bem  legível e estruturado,
evitando o uso repetido do if.
 
Exemplos:
Program EXEMPLO CASE;
var
    VALOR : integer;
begin
    write('DIGITE UM NÚMERO ENTRE 0 e 2 INCLUSIVE');
    readIn(VALOR);   
02/06/2016 Curso Virtual Pascal ­ Aula 18
http://www.ufpa.br/sampaio/curso_de_icc/pascal/Aula_18_Pascal.htm 3/4
case VALOR of
    0 : begin
    writeIn('NÚMERO DIGITADO = ZERO');
end;
    1 : begin
    writeIn('NÚMERO DIGITADO = UM');
end;
    2 : begin
    writeIn('NÚMERO DIGITADO = DOIS');
end;
end; {case)
end.
O comando case oferece uma opção de else (se não). Veja o exemplo abaixo:
Program Exemplo_2_case;
var
    VALOR : integer;
begin
    write('DIGITE UM NÚMERO ENTRE 0 E 2 INCLUSIVE');   
    readln(VALOR);
case VALOR of
    0 : begin
        writelnl'Número Digitado = zero');
    end;
    1 : begin
        writeln('Número Digitado = um');
    end;
    2 : begin
        writeln('Número Digitado = dois');
    end;
    else
    begin
        writeln('VOCÊ DIGITOU FORA DA FAIXA DE 0 A 2 ');
    end;
end; {case}
end.
 
02/06/2016 Curso Virtual Pascal ­ Aula 18
http://www.ufpa.br/sampaio/curso_de_icc/pascal/Aula_18_Pascal.htm 4/4
OBS: A variável do case pode ser de qualquer tipo até agora citado. Vejamos um exemplo do comando case com uma
variável de seleção do tipo char:
Program exemplo_3_Case;
var
    RESP : char;
begin
    readIn(RESP);
case RESP of
    'S' : begin
        writeln('vocÊ DIGITOU S');
    end;
    'N' : begin
        writeln('vocÊ DIGITOU N');
    end;
end; {case}
end.
 
OBS: A presença dos apóstrofos limitando as letras S e N indica que a comparação deve ser feita em relação a um
string.
 
Voltar ao inicio
Anterior.gif
(632