Média aritmética

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "semnome"
// Função : Calcular a média aritmética de quaro notas
// Autor : Lucas Fiuza
// Data : 19/06/2015
// Seção de Declarações 
var
// Declarar Variaveis
 ma, n1, n2, n3, n4: real
inicio
// Seção de Comandos 
 escreva("Digite a nota 1: ")
 leia (n1)
 escreva("Digite a nota 2: ")
 leia (n2)
 escreva("Digite a nota 3: ")
 leia (n3)
 escreva("Digite a nota 4: ")
 leia (n4)
// Fazer o calculo
 ma <- (n1+n2+n3+n4)/4
escreva ("")
escreva ("A media eh:", ma)
fimalgoritmo