x2=(-b+sqrt(dr))(2a)

rtf(“x1=2f x2=2f\n“，x1，x2)

}

if(dr==0)

{

x1=(-b+sqrt(dr))(2a)

rtf(“x=2f\n“，x1)

}

if(dr0)

{

x1=(-b-sqrt(dr))(2a)

x2=(-b+sqrt(dr))(2a)

rtf(“(x1=2f，y1=2f)“，x1，a1ow(x1，3)+b1ow(x1，2)+cx1+d1)

rtf(“(x2=2f，y2=2f)\n“，x2，a1ow(x2，3)+b1ow(x2，2)+cx2+d1)

}

if(dr==0)

{

x1=(-b+sqrt(dr))(2a)

rtf(“(x=2f，y=2f)\n“，x1，a1ow(x1，3)+b1ow(x1，2)+cx1+d1)

}