a=1.0 b=1.5 f=sym(‘x^4-x-2‘) e=eps(realmin).*10 while (b-a)>0.0001 c=(a+b)/2 if sign(subs(f,‘x‘,c))==sign(subs(f,‘x‘,a)) a=c else b=c end end a = 1 b = 1.5000 f = x^4 - x - 2 e = 4.9407e-323 c = 1.2500 a = 1.2500 c = 1.3750 b = 1.3750 c = 1.3125 a = 1.3125 c = 1.3438 a = 1.3438 c = 1.3594 b = 1.3594 c = 1.3516 a = 1.3516 c = 1.3555 b = 1.3555 c = 1.3535 b = 1.3535 c = 1.3525 a = 1.3525 c = 1.3530 a = 1.3530 c = 1.3533 b = 1.3533 c = 1.3531 a = 1.3531 c = 1.3532 b = 1.3532
原文:http://www.cnblogs.com/mubu/p/6074186.html