eq2grau.R

augustofilho — Apr 28, 2013, 3:04 AM

eq=function(a,b,c){
  if(a==0)
    print("A equação não é de segundo grau")
  else{
    delta=(b*b)-(4*a*c)
    if(delta<0)
      print("Não existe raiz real")

    if(delta>0){
      print("Existem duas raizes reais e diferentes")
      x1=(-b+sqrt(delta))/(2*a)
      x2=(-b-sqrt(delta))/(2*a)
      return(c(x2,x1))
              }
    if(delta==0){
      print("Existem duas raizes reais e iguais")
      x1=(-b+sqrt(delta))/(2*a)
      return(x1)
    }

  }  
}