var cont, notaacima : inteiro nota : vetor[1..5] de real media : real inicio para cont de 1 ate 5 faca Escreval("Digite a ", cont, "ª nota: ") leia(nota[cont]) media <- media + nota[cont] fimpara media <- media / 5 para cont de 1 ate 5 faca se (nota[cont] > media) entao notaacima <- notaacima+1 fimse fimpara Escreval("A média da turma é: ", media) Escreval(notaacima, " alunos tiraram nota acima da média.")
dgt's Content
There have been 1 items by dgt (Search limited from 03/05/2023)