Código Delphi [-] x:=(-b + (SQRT(SQR(b) - 4*a*c))/(2*a)); y:=(-b - (SQRT(SQR(b) - 4*a*c))/(2*a));
x:=(-b + (SQRT(SQR(b) - 4*a*c))/(2*a)); y:=(-b - (SQRT(SQR(b) - 4*a*c))/(2*a));