jogo bobo testando com case

Publicado por NewLinuxer 14/12/2005

[ Hits: 5.074 ]

Download exemplo19.pas




Programa de teste que de quem descobriu o Brasil e diz se o usuário acertou, usando Case

  



Esconder código-fonte

Program exemplo;

{Programa de teste que ede quem descobriu o Brasil
e diz se o usu rio acertou, usando Case}

uses crt;

Var
  resposta:char;

Begin
  clrscr;

  Writeln('Quem descobriu o Brasil?');

  Writeln('a - Silvio Santos');
  Writeln('b - Cabral');
  Writeln('c - Pl cido Domingos');

  Readln(resposta);

  Case resposta of
    'a': writeln('Resposta Errada');
    'b': writeln('Resposta Certa');
    'c': writeln('Resposta Errada');
    else writeln('Op‡Æo Inv lida');
  End;

  readkey;

end.

Scripts recomendados

Função Fatorial Recursiva em Ada 95

Maior e menor

palindroma

Menu

Extenso em dll, com parâmetros adicionais


  

Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts