Cinema

Um cinema possui capacidade de 100 lugares e está sempre com ocupação total. Certo dia, cada espectador respondeu a um questionário, no qual constava:

• sua idade;
• sua opinião em relação ao filme, segundo as seguintes notas:

Nota Significado
A Ótimo
B Bom
C Regular
D Ruim
E Péssimo

Elabore um algoritmo que, lendo estes dados, calcule e imprima:

• a quantidade de respostas ótimo;
• a média de idade das pessoas que responderam ruim;
• a percentagem de respostas péssimo e a maior idade que utilizou esta opção

algoritmo "semnome"
// Função :
// Autor : Vergil
// Data : 13/04/2007
// Seção de Declarações 
var
   idade, contar, somaidade, respostasA, respostasD, maioridade : inteiro
   nota : caracter
   media : real
inicio
          respostasA <- 0
          respostasD <- 0
          somaidade <- 0
          maioridade <- 0

          para contar de 1 ate 10 faca
                   // Recebe os valores do usuário
                   escreva("Digite a idade do ", contar, " espectador: ")
                   leia(idade)
                   escreva("Digite a nota do ", contar, " espectador: ")
                   leia(nota)
                   
                   // Pegar a quantidade de pessoas que responderam "ótimo"
                   se nota = "a" entao
                          respostasA <- respostasA + 1
                   senao se nota = "d" entao // Pegar a quantidade de pessoas que responderam "ruim"
                          respostasD <- respostasD + 1
                          somaidade <- somaidade + idade
                          
                          // Pegar a maior idade
                          se idade > maioridade entao
                                 maioridade <- idade
                          fimse
                   fimse
          fimpara

          // Média de idades de pessoas que responderam "d"
          media <- somaidade / respostasD
          
          escreva("Quantidade de pessoas que avaliaram o filme como otimo: ", respostasA)
          escreva("Media de idades das pessoas que responderam 'ruim': ", media)
          escreva("A maior idade de quem respondeu 'ruim': ", maioridade)
fimalgoritmo