Exercicio portugol

[manobral 0]

Faça um algoritimo em portugal para ler a nota de cada um dos 5 alunos de uma turma e calcular a média da turma.

OBS: Imprima a média e quantos alunos tiveram notas acima da media da turma

 

 

*Até agora so consegui fazer a média da turma

*Não estou conseguindo imprimir quantos alunos tiveram notas acima da média da turma

*Estou usando o visalg

*Do jeito que ele esta, imprime a média e a última nota lida

*Agradeço desde já

 

var
nota, media, nota_acima, soma : real
cont : inteiro
inicio

  cont <- 0
  soma <- 0
        enquanto (cont <= 4) faca

            escreva ("informe a nota do aluno:")
               leia (nota)
                 cont <- cont + 1
                 soma <- nota + soma
 se (nota >= media) ent
        fimenquanto
        media <- soma/cont
        escreva ("A media é: ", media)

             se (nota >= media) entao
                     nota_acima <- nota
                 fimse
                 escreva (nota_acima)

fimalgoritmo

[Raphael_Suporte 0]

então, o que você fazer é o seguinte, coloca uma variável como inteira e inicia com 0.

 

toda nota que ele ler verifica se é maior que a média, caso seja, coloca ele no contador que criou, no final exibe o contador também.