algoritmo "Aventura na Floresta Sussurrante" // Função principal inicio inteiro caminho real pontuacao cadeia resposta inteiro escolha_ponte inteiro escolha_criatura pontuacao <- 0 // Introdução escreva("Você é um explorador corajoso em busca de tesouros na misteriosa Floresta Sussurrante.") escreva("\nVocê se depara com três caminhos diferentes:") escreva("\n1. O Caminho das Sombras") escreva("\n2. O Caminho da Luz") escreva("\n3. O Caminho das Criaturas") escreva("\nEscolha um caminho (1, 2 ou 3): ") leia(caminho) escolha caminho caso 1: // Caminho das Sombras escreva("\nVocê escolheu o Caminho das Sombras.") escreva("\nUm enigma aparece: 'Quem sou eu? Tenho olhos, mas não vejo. Tenho boca, mas não falo. O que sou?'") escreva("\nResposta: ") leia(resposta) se resposta = "caveira" entao escreva("\nVocê respondeu corretamente e encontrou um baú com uma gema preciosa!") pontuacao <- pontuacao + 100 senao escreva("\nResposta incorreta. Você não conseguiu passar pelo enigma.") fimse caso 2: // Caminho da Luz escreva("\nVocê escolheu o Caminho da Luz.") escreva("\nVocê encontra uma ponte quebrada sobre um rio turbulento.") escreva("\nDeseja atravessar a ponte (1) ou procurar um desvio seguro (2)?") leia(escolha_ponte) se escolha_ponte = 1 entao escreva("\nVocê conseguiu atravessar a ponte quebrada com sucesso e encontrou uma fonte mágica.") pontuacao <- pontuacao + 50 senao escreva("\nVocê optou por procurar um desvio e não encontrou recompensa.") fimse caso 3: // Caminho das Criaturas escreva("\nVocê escolheu o Caminho das Criaturas.") escreva("\nVocê se depara com uma criatura mágica