Exame Especial

augustofilho — Dec 17, 2013, 10:52 PM

e2p45=function(n1,n2,n3){
  media=mean(c(n1,n2,n3))
  cat("A media das notas obtidas pelo aluno foi de",round(media,2),"pontos")
  if(media>=0 && media<3)
    cat("\nO aluno foi Reprovado")
  if(media>=3 && media<7)
    {
    cat("\nO aluno foi convidado a fezer o exame especial. ")
    cat("\nO aluno deverah tirar",round(12-media,2),"pontos no Exame especial.")
    }
  if(media>=7 && media<10)
    cat("\nO aluno foi Aprovado")
}


e2p45(10,5,4)

A media das notas obtidas pelo aluno foi de 6.33 pontos
O aluno foi convidado a fezer o exame especial. 
O aluno deverah tirar 5.67 pontos no Exame especial.