function [x1,x2]=f1ex5(a,b,c)
  % Raízes de uma equação do segundo grau
  % a, b, c: coeficientes do polinómio do 2º grau
  % o coeficiente a tem de ser dirente de zero
  % x1 e x2: raízes
  
  if a==0
    disp('a tem de ser diferente de zero!')
    return
  end 
    
  d=sqrt(b^2-4*a*c);
  x1=(-b-d)/(2*a);
  x2=(-b+d)/(2*a);
  
  endfunction