Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Algoritmo Napster

Brincadeira da data de aniversário

Recommended Posts

Bom galera não é nem um exercicio dado pelo professor, simplesmente estou no primeiro periodo de Técnico em Informatica e também amando o curso, ai resolvi então tentar escrever um algoritimo para brincadeira de aniversário, porém não esta dando certo, gostaria de pedir ajuda ao forum. Bom ficou assim. No lugar do escolha também tentei o (se, entao), mas também não deu......

 

 

algoritmo "brincadeira do aniverssario"
// Função :
// Autor : Alex
// Data : 28/03/2011
// Seção de Declarações 
var
  dia,mes:inteiro

camiseta,branco,preto,rosa,vermelho,azul,verde,roxo,cinza,amarelo,laranja:caracter
inicio
  escreval ("Por favor digite o mes que você nasceu")
  leia (mes)
  escolha mes
  caso "1"
 escreval("Eu atirei em ")
 caso "2"
 escreval("Eu comi ")
caso "3"
 escreval("Eu soquei ")
 caso "4"
 escreval("Eu cantei para ")
 caso "5"
 escreval("Eu me apaixonei por ")
 caso "6"
 escreval("Eu matei ")
 caso "7"
 escreval("Eu dei o meu telefone para ")
 caso "8"
 escreval("Eu marquei um encontro com ")
 caso "9"
 escreval("Eu dancei com ")
 caso "10"
 escreval("Eu abracei ")
 caso "11"
 escreval("Eu casei com ")
 caso "12"
 escreval("Eu beijei ")
 outrocaso
 escreval("O mes digitado esta incorreto")
 fimescolha
  escreval ("Por favor digite o dia do mes em que você nasceu  ")
  leia (dia)
  escolha dia
   caso "1"
 escreval("um mendigo ")
 caso "2"
 escreval("a sua empregada ")
 caso "3"
 escreval("um garfo ")
 caso "4"
 escreval("um garfo ")
 caso "5"
 escreval("um(a) mexicano(a) ")
 caso "6"
 escreval("um gangster ")
 caso "7"
 escreval("um ninja ")
 caso "8"
 escreval("um ipod ")
 caso "9"
 escreval("o anmorado(a) do(a) meu(inha) melhor amigo(a)")
 caso "10"
 escreval("um bode ")
 caso "11"
 escreval("meu cachorro ")
 caso "12"
 escreval("meu pai ")
 caso "13"
 escreval("o computador ")
 caso "14"
 escreval("meu professor de ciências ")
 caso "15"
 escreval("minhas meias ")
 caso "16"
 escreval("eu mesmo ")
 caso "17"
 escreval("uma coca ")
 caso "18"
 escreval("uma lama ")
 caso "19"
 escreval("um pepino ")
 caso "20"
 escreval("um bichinho de pelucia ")
 caso "21"
 escreval("um marcador permanente ")
caso "22"
 escreval("um policial ")
 caso "23"
 escreval("um livro ")
 caso "24"
 escreval("uma bola de futebol ")
 caso "25"
 escreval("meu psquiatra ")
 caso "26"
 escreval("meu vizinho ")
 caso "27"
 escreval("minha cama ")
 caso "28"
 escreval("um jogador de futebol ")
 caso "29"
 escreval("um dvd player ")
 caso "30"
 escreval("um clipe de papel ")
 caso "31"
 escreval("um celular")
 outrocaso
 escreval("O valor digitado esta incorreto")
 fimescolha
  escreval ("Por favor digite a cor da camiseta que esta vestindo  ")
  leia (camiseta)
  escolha camiseta

 caso "branco"
 escreval("porque eu estava drogado ")
 caso "preto"
 escreval("porque eu estava bebado ")
 caso "rosa"
 escreval("Porque eu sou gay ")
 caso "vermelho"
 escreval("porque as vozes me mandaram ")
 caso "azul"
 escreval("porque eu nao sei me controlar ")
 caso "verde"
 escreval("porque eu me odeio ")
 caso "roxo"
 escreval("porque estou pelado ")
 caso "cinza"
 escreval("porque eu quis ")
 caso "amarelo"
 escreval("porque alguem me ofereceu r$ 1.000.000")
 caso "laranja"
 escreval("porque eu odeio a minha familia ")
 outrocaso
 escreval("voce cometeu algum erro")
fimescolha
fimalgoritmo

Compartilhar este post


Link para o post
Compartilhar em outros sites

Houve uma grande evolução desse código para o anterior. Lembre-se de retirar as "" das opções de mes e dia, pois ambos estão setadas como inteiras e quando se coloca entre aspas elas passam a ser caracter. ai vai dar um erro.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Houve uma grande evolução desse código para o anterior. Lembre-se de retirar as "" das opções de mes e dia, pois ambos estão setadas como inteiras e quando se coloca entre aspas elas passam a ser caracter. ai vai dar um erro.

 

 

 

 

 

 

 

Obrigado pelo o elogio e a dica vou tentar....Obrigado

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.