Albeliano Lacerda

algoritmo "quizz de Química" //nome da aplicação //comandos utilizados na aplicação: // Função : Jogo de Perguntas e Respostas // Autor : albeliano Junior // Seção de Declarações var erros,acertos,pontuacao,cont,op,a,b : inteiro //variaveis para armazenar acertos e erros opcao : caractere //variavel para armazenar opção de resposta nome,aux : caractere vetnome : vetor[1..20] de caractere vetpontos : vetor[1..20] de inteiro ranking : vetor[1..20,1..4] de caractere inicio // Seção de Comandos // verifica o tempo de execução do programa cont := 1 repita // para jogar varias vezes limpatela //cronometro on escreval(" ",cont," Rodada") Escreval("------------------------------------------------------") Escreval("| MENU DE opções |") Escreval("------------------------------------------------------") Escreval("| 0 - SAIR DO quis |") Escreval("| 1 - INICIAR quis |") Escreval("| 2 - RANKING |") //selecionar o que deseja fazer Escreval("------------------------------------------------------") Escreva("O QUE DESEJA FAZER ? ") leia(opcao) se (opcao = "0")ENTÃO Escreval("Finalizando quis") op := 1 fimse se (opcao = "1") ENTÃO limpatela Escreval("Digite o seu nome: ") leia (nome) // o comando escreva tem o objetivo de exibir na tela Escreval("--------------------------------------------------------") Escreval("| quis |") Escreval("| Primeira Pergunta |") Escreval("--------------------------------------------------------") Escreval("1 - Ocorre a fusão quando?") Escreval("a) Quando passa do estado liquido para o sólido") Escreval("b) Quando passa do estado Liquido para o gasoso ") Escreval("c) Quando passa do estado solido pro liquido") Escreval("d) Quando passa do estado Liquido para o gasoso") Escreval("Resposta:") leia(opcao) //comando "leia" tem o objetivo de ler a opção escolhida //comando "se" é um comando que indica condição e faz um comparação se(opcao = "c")ENTÃO acertos <- acertos + 1 pontuacao <- pontuacao +100 senao erros <- erros + 1 pontuacao <- pontuacao +0 fimse // Comando para limpar a tela limpatela Escreval("--------------------------------------------------------") Escreval("| quis |") Escreval("| Segunda Pergunta |") Escreval("--------------------------------------------------------") Escreval("2 - O que é Inercia?") Escreval("a) A matéria tem de ocupar um lugar no espaço") Escreval("b) Dois corpos não podem ocupar, simultaneamente o mesmo lugar no espaço ") Escreval("c) Consiste em ter volume reduzido quando submetida a determinada pressão") Escreval("d) A matéria permanece na situação em que se encontra, seja em movimento, seja em repouso") Escreval("Resposta:") leia(opcao) se(opcao = "d")ENTÃO acertos <- acertos + 1 pontuacao <- pontuacao +100 senao erros <- erros + 1 pontuacao <- pontuacao +0 fimse // Comando para limpar a tela limpatela Escreval("--------------------------------------------------------") Escreval("| quis |") Escreval("| Terceira Pergunta |") Escreval("--------------------------------------------------------") Escreval("3 - São exemplos de propriedades Gerais da matéria?") Escreval("a) Extensão, Inércia, Impenetrabilidade, Compressibilidade, Elasticidade, Divisibilidade e Indestrutibilidade") Escreval("b) Dureza, Brilho, Maleabilidade, Ductilidade, Densidade é Magnetismo") Escreval("c) Propriedades organolépticas e Ponto de fusão e ebulição") Escreval("d) Todas estão errada") Escreval("Resposta:") leia(opcao) se(opcao = "a")ENTÃO acertos <- acertos + 1 pontuacao <- pontuacao +100 senao erros <- erros + 1 pontuacao <- pontuacao +0 fimse // Comando para limpar a tela limpatela Escreval("--------------------------------------------------------") Escreval("| quis |") Escreval("| Quarta Pergunta |") Escreval("--------------------------------------------------------") Escreval("4 - Existem 2 tipos de propriedades da matéria. Quais são elas?") Escreval("a) Propriedades Normais e anormais") Escreval("b) Propriedades Simples e raras") Escreval("c) Propriedades Gerais e especificas") Escreval("d) Propriedades antigas e atuais") Escreval("Resposta:") leia(opcao) se(opcao = "c")ENTÃO acertos <- acertos + 1 pontuacao <- pontuacao +100 senao erros <- erros + 1 pontuacao <- pontuacao +0 fimse // Comando para limpar a tela limpatela Escreval("--------------------------------------------------------") Escreval("| quis |") Escreval("| Obrigado por particpar!! |") Escreval("--------------------------------------------------------") Escreval("") Escreval("********") Escreval("* Parabens: ", nome," *") Escreval("* Você acertou: ", acertos," *") Escreval("* Você errou: ", erros," *") Escreval("* Você fez: ", pontuacao," pontos *") Escreval("********") Escreval("") Escreval("########################################################") Escreval("# #") Escreval("# Autor: albeliano junior #") Escreval("# #") Escreval("# Versão Aprendizado #") Escreval("# #") Escreval("########################################################") //cronometro off ranking[cont,1]:=nome ranking[cont,2]:=numpcarac(acertos)//passar de numero para caractere ranking[cont,3]:=numpcarac(erros) ranking[cont,4]:=numpcarac(pontuacao) cont:=cont+1 escreval escreval(" Tecle Enter") leia(opcao) fimse //mostra o ranking se (opcao = "2")ENTÃO para a de 1 ate cont-1 faca //para organizar em ordem decescente aux:=ranking[a,4] // aux pega a pontuação do jogador para b de a+1 ate cont faca // b aponta para o próximo jogador no vetor se ranking[b,4]>aux ENTÃO //se pontuação do próximo jogador maior que a do anterior ranking[a,4]:=ranking[b,4]//coloca o maior primeiro ranking[b,4]:=aux //coloca o menor depois aux:=ranking[a,1]//troca os outros dados do jogador, aqui é nome ranking[a,1]:=ranking[b,1] ranking[b,1]:=aux aux:=ranking[a,2] //aqui é acertos ranking[a,2]:=ranking[b,2] ranking[b,2]:=aux aux:=ranking[a,3] // aqui é erros ranking[a,3]:=ranking[b,3] ranking[b,3]:=aux fimse fimpara fimpara se cont = 1 ENTÃO b:=cont senao b := cont-1 fimse para a de 1 ate b faca escreva("nome -> ",ranking[a,1]," acertou ",ranking[a,2]) escreval(" Errou ",ranking[a,3]," Pontuação ",ranking[a,4]) fimpara pontuacao:= 0 acertos := 0 erros := 0 escreval("Tecle Enter") leia(opcao) fimse ate op = 1 fimalgoritmo

Como posso colocar gabarito nesses algoritmos aí em cima?

Como posso colocar um gabarito nesse algoritmo? [Código ilegível removido pela moderação]