Resolução do Algoritmo

Solução do Felipe Figueiredo

algoritmo "Media Anual"
// Função :
// Autor :
// Data : 14/09/2011
// Seção de Declarações 
var
n1,n2,n3,n4,p1,p2,p3,p4,ma:real
inicio
// Seção de Comandos


   escreval ("Digite as Nota 1 e Peso 1: ")
   leia (n1,p1)
   escreval ("Digite as Nota 2 e Peso 2: ")
   leia (n2,p2)
   escreval ("Digite as Nota 3 e Peso 3: ")
   leia (n3,p3)
   escreval ("Digite as Nota 4 e Peso 4: ")
   leia (n4,p4)
   ma<-(n1*p1+n2*p2+n3*p3+n4*p4)/(p1+p2+p3+p4)
   escreval ("Sua media é: ",ma)

            se (ma >=4) e (ma <7) entao
            escreval ("Voce ira para prova final, estude")
            senao
            se ma >=7 entao
            escreval ("Voce esta Aprovado")
            escreval ("Parabens !")
            senao
            escreval ("Voce esta Reprovado")
            escreval ("Estude Mais")

            FIMSE

fimalgoritmo