Teste de Einstein Portugol studio

02/06/2019

18

Boa tarde!
Estou com o desafio de lógica , que para falar a verdade estou até progredindo bem , porém queria a ajuda de vocês para o desenvolvimento do código!
O código se resume ao teste de Einstein , que tem que ser escrito em Portugol! Já consegui escrever em Java . Porém ao rescreve-lo não tive o êxito.
Link do teste :https://rachacuca.com.br/teste-de-einstein/
Responder

Posts

Posta o código em Java, para podermos te ajudar.
Responder

03/06/2019

Devide

Posta o código em Java, para podermos te ajudar.

Estou com problema nele em Portugol!
Responder

05/06/2019

Devide

Posta o código em Java, para podermos te ajudar.

programa
{

funcao inicio()
{
cadeia testeUsuario[5][5], testePronto[][] = {{"AMARELO","AZUL","VERMELHA","VERDE","BRANCA"},{"NORUEGUÊS","DINAMARQUÊS","INGLÊS","ALEMÃO","SUECO"},{"ÁGUA","CHÁ","LEITE","CAFÉ","CERVEJA"},{"DUNHIL","BLENDS","PALL MALL","PRINCE","BLUEMASTER"},{"GATOS","CAVALOS","PÁSSAROS","PEIXES","CACHORROS"}}, atributo[] = {"COR ","NACIONALIDADE","BEBIDA ","CIGARRO ","ANIMAL "}
inteiro opcao, desistir = 0
logico venceu = falso

faca{
escreva ("--------------------------------------------------------------------\\n")
escreva (" TESTE DE EINSTEIN \\n")
escreva ("--------------------------------------------------------------------\\n")
escreva ("\\t\\t| Casa 1 |\\t| Casa 2 |\\t| Casa 3 |\\t| Casa 4 |\\t| Casa 5 |\\t\\n\\n")

para (inteiro l=0; l < 5; l++){
escreva (atributo[l],"\\t")
para (inteiro c=0; c < 5; c++){
escreva ("| ",testeUsuario[l][c]," |\\t")
}
escreva ("\\n\\n")
}

escreva ("--------------------------------------------------------------------\\n")
escreva (" DICAS \\n")
escreva ("--------------------------------------------------------------------\\n")
escreva (" 01. O Norueguês vive na primeira casa;\\n 02. O Inglês vive na casa Vermelha;\\n 03. O Sueco tem Cachorros como animais de estimação;\\n 04. O Dinamarquês bebe Chá;\\n 05. A casa Verde fica do lado esquerdo da casa Branca;\\n 06. O homem que vive na casa Verde bebe Café;\\n 07. O homem que fuma Pall Mall cria Pássaros;\\n 08. O homem que vive na casa Amarela fuma Dunhill;\\n 09. O homem que vive na casa do meio bebe Leite;\\n 10. O homem que fuma Blends vive ao lado do que tem Gatos;\\n 11. O homem que fuma Blends vive ao lado do que tem Gatos;\\n 12. O homem que fuma BlueMaster bebe Cerveja;\\n 13. O Alemão fuma Prince;\\n 14. O Norueguês vive ao lado da casa Azul;\\n 15. O homem que fuma Blends é vizinho do que bebe Água.\\n")

escreva ("--------------------------------------------------------------------\\n")

escreva("Escolha uma casa: ")
leia(opcao)

escolha (opcao){
caso 1: //CASA 1
escreva("\\n1) COR \\n")
escreva("2) NACIONALIDADE \\n")
escreva("3) BEBIDA \\n")
escreva("4) CIGARRO \\n")
escreva("5) ANIMAL \\n\\n")

escreva("Escolha um atributo: ")
leia(opcao)

escolha (opcao){
caso 1: // COR
escreva("\\n1) AMARELA \\n")
escreva("2) AZUL \\n")
escreva("3) VERMELHA \\n")
escreva("4) VERDE \\n")
escreva("5) BRANCA \\n\\n")

escreva("Escolha uma COR para a casa 1: ")
leia(opcao)

escolha (opcao){
caso 1:
testeUsuario[0][0] = "AMARELA"
pare // Impede que as instruções do caso 2 sejam executadas
caso 2:
testeUsuario[0][0] = "AZUL"
pare // Impede que as instruções do caso 3 sejam executadas
caso 3:
testeUsuario[0][0] = "VERMELHA"
pare // Impede que as instruções do caso 4 sejam executadas
caso 4:
testeUsuario[0][0] = "VERDE"
pare // Impede que as instruções do caso 5 sejam executadas
caso 5:
testeUsuario[0][0] = "BRANCA"
pare // Fim
}

pare // Impede que as instruções do caso 2 sejam executadas

caso 2: // NACIONALIDADE
escreva("\\n1) ALEMÃO \\n")
escreva("2) DINAMARQUÊS \\n")
escreva("3) INGLÊS \\n")
escreva("4) NORUEGUÊS \\n")
escreva("5) SUECO \\n\\n")

escreva("Escolha uma NACIONALIDADE para a casa 1: ")
leia(opcao)

escolha (opcao){
caso 1:
testeUsuario[1][0] = "ALEMÃO"
pare // Impede que as instruções do caso 2 sejam executadas
caso 2:
testeUsuario[1][0] = "DINAMARQUÊS"
pare // Impede que as instruções do caso 3 sejam executadas
caso 3:
testeUsuario[1][0] = "INGLÊS"
pare // Impede que as instruções do caso 4 sejam executadas
caso 4:
testeUsuario[1][0] = "NORUEGUÊS"
pare // Impede que as instruções do caso 5 sejam executadas
caso 5:
testeUsuario[1][0] = "SUECO"
pare // Fim
}
pare // Impede que as instruções do caso 3 sejam executadas

caso 3: // BEBIDA
escreva("\\n1) ÁGUA \\n")
escreva("2) CAFÉ \\n")
escreva("3) CERVEJA \\n")
escreva("4) CHÁ \\n")
escreva("5) LEITE \\n\\n")

escreva("Escolha uma BEBIDA para a casa 1: ")
leia(opcao)

escolha (opcao){
caso 1:
testeUsuario[2][0] = "ÁGUA"
pare // Impede que as instruções do caso 2 sejam executadas
caso 2:
testeUsuario[2][0] = "CAFÉ"
pare // Impede que as instruções do caso 3 sejam executadas
caso 3:
testeUsuario[2][0] = "CERVEJA"
pare // Impede que as instruções do caso 4 sejam executadas
caso 4:
testeUsuario[2][0] = "CHÁ"
pare // Impede que as instruções do caso 5 sejam executadas
caso 5:
testeUsuario[2][2] = "LEITE"
pare // Fim
}
pare // Impede que as instruções do caso 4 sejam executadas

caso 4: // CIGARRO
escreva("\\n1) BLENDS \\n")
escreva("2) BLUEMASTER \\n")
escreva("3) DUNHIL \\n")
escreva("4) PALL MALL \\n")
escreva("5) PRINCE \\n\\n")

escreva("Escolha um CIGARRO para a casa 1: ")
leia(opcao)

escolha (opcao){
caso 1:
testeUsuario[3][0] = "BLENDS"
pare // Impede que as instruções do caso 2 sejam executadas
caso 2:
testeUsuario[3][0] = "BLUEMASTER"
pare // Impede que as instruções do caso 3 sejam executadas
caso 3:
testeUsuario[3][0] = "DUNHIL"
pare // Impede que as instruções do caso 4 sejam executadas
caso 4:
testeUsuario[3][0] = "PALL MALL"
pare // Impede que as instruções do caso 5 sejam executadas
caso 5:
testeUsuario[3][0] = "PRINCE"
pare // Fim
}
pare // Impede que as instruções do caso 5 sejam executadas

caso 5: // ANIMAL
escreva("\\n1) CACHORROS \\n")
escreva("2) CAVALOS \\n")
escreva("3) GATOS \\n")
escreva("4) PÁSSAROS \\n")
escreva("5) PEIXES \\n\\n")

escreva("Escolha um ANIMAL para a casa 1: ")
leia(opcao)

escolha (opcao){
caso 1:
testeUsuario[4][0] = "CACHORROS"
pare // Impede que as instruções do caso 2 sejam executadas
caso 2:
testeUsuario[4][0] = "CAVALOS"
pare // Impede que as instruções do caso 3 sejam executadas
caso 3:
testeUsuario[4][0] = "GATOS"
pare // Impede que as instruções do caso 4 sejam executadas
caso 4:
testeUsuario[4][0] = "PÁSSAROS"
pare // Impede que as instruções do caso 5 sejam executadas
caso 5:
testeUsuario[4][0] = "PEIXES"
pare // Fim
}
}
pare // Impede que as instruções do caso 2 sejam executadas

caso 2: // CASA 2
escreva("\\n1) COR \\n")
escreva("2) NACIONALIDADE \\n")
escreva("3) BEBIDA \\n")
escreva("4) CIGARRO \\n")
escreva("5) ANIMAL \\n\\n")

escreva("Escolha um atributo: ")
leia(opcao)

escolha (opcao){
caso 1: // COR
escreva("\\n1) AMARELA \\n")
escreva("2) AZUL \\n")
escreva("3) VERMELHA \\n")
escreva("4) VERDE \\n")
escreva("5) BRANCA \\n\\n")

escreva("Escolha uma COR para a casa 2: ")
Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar