algoritmo "exer 6"
var
n1,n2,n3,n4,media,erro:real
quatalunos,i:inteiro
nome:caracter
inicio
escreval (" o numero de alunos ")
leia (quatalunos)
enquanto (i<=quatalunos) faca
i<-i+1
escreval (" o nome do aluno: ")
leia (nome)
escreval (" digite nota 1: ")
leia (n1)
escreval (" digite nota 2: ")
leia (n2)
escreval (" digite nota 3: ")
leia (n3)
escreval (" digite nota 4: ")
leia (n4)
media<-(n1+n2+n3+n4)/4
se (media>=6) e (media<=10) então
escreval ("o aluno ",nome," teve media de :",media," e está aprovado")
senao
se (media<6) e (media>=5)então
escreval ("o aluno ",nome," teve media de :",media," e está em recuperação")
senao
escreval ("o aluno ",nome," teve media de :",media," e está reprovado")
se (media > 10) então
escreval (media," media inválida digite novamente")
fimse
fimse
fimse
fimenquanto
fimalgoritmo
se a media der acima de 10 ele tem que começar do zero
mas tentei varias formas e não consegui se tiver alguém pra dar uma luz agradeço.
att: Alexsandro