L3-Exercício 12-Escreva um algoritmo que leia as notas das três provas de um aluno (p1, p2 e p3), calcule sua média aritmética e escreva-a. As notas devem estar no intervalo [0,10].


algoritmo "semnome"
// Função :
// Autor :
// Data : 22/09/2010
// Seção de Declarações
var
p1,p2,p3,m:real

inicio
// Seção de Comandos
 escreva("Entre com a primeira nota ")
 leia(p1)
 escreva("Entre com a segunda nota ")
 leia(p2)
 escreva("Entre com a terceira nota ")
 leia(p3)

 se((p1>=0) e (p1<=10) e(p2>=0)e(p2<=10) e (p3>=0)e (p1<=10)) entao
  m<-(p1+p2+p3)/3
  escreva("A média é: ",m)
 senao
  escreva("Dados Inválidos, a nota deve ser maior ou igual a 0 e menor ou igual a 10)
 fimse

fimalgoritmo