第一步 賦值給a，b，c
第二步 計算區(qū)間（a，b）的中點x，
第三步 計算f（x）是否為0，滿足為0則c就是函數(shù)的零點，如果f（a）f（x）＜0，則令b=x，如果f（x）f（b）＜0，則令a=c，
第四步 判斷是否達到精確度，若滿足|a-b|＜c，則輸出a，否則重復第二、三、四步．
程序：a=1
b=1.5
c=0.001
DO
x=（a+b）/2
f（a）=a∧3-a-1
f（x）=x∧3-x-1
IF  f（x）=0  THEN
PRINT“x=”；x
ELSE
IF  f（a）*f（x）＜0  THEN
b=x
ELSE
a=x
END  IF
END  IF
LOOP  UNTIL  ABS（a-b）＜=c
PRINT“方程的一個近似解x=”；x
END