( 程式版本：1.0，最後更新日期 14 DEC 2007。)
程式分為兩部份，第一部份是函數 ( Function ) 程式，第二部份是正割法程式。
第一部份： FX ( 程式名稱可隨意輸入 )
X^(3) + 3X2 – 2X – 1 → Y 第二部份： SECANT ( 程式名稱可隨意輸入 )
( 注意：如果第一部份的程式不是命名為 FX，則下面程式中的 Prog "FX" 應作相應修改。)
? A : ? B : 0 → D : A → X ◢ Lbl 1 : Prog "FX" : Y → C : ( AD – BC ) ÷ ( D – C → X ◢ C → D : A → B : X → A : Goto 1 MODE 1 在執行程式前，請將計算機的角度量度單位轉至弧度 ( Rad ) 模式。先按 SETUP ( SHIFT MODE )，然後按 4。
例：用正割法 ( Secant Method ) 計算方程式 f(x) = x3 + 3x2 – 2x – 1 = 0 位於 0 和 1 之間的根。
按 MODE 5 進入 PRGM 模式，再按 2 選擇 RUN，或按 FILE。
在 Program List 中選擇程式 SECANT，按 EXE，此時計算機應出現 A?。
再按 0 EXE 1 EXE ( 輸入次序可倒轉，但計算結果可能不盡相同 )
顯示 0 ( a 的數值 )
再按 EXE 顯示 1 ( b 的數值 )
再按 EXE 顯示 0.5 ( 第一個近似值 First Approximation )
再按 EXE 顯示 0.764706 ( 第二個近似值 Second Approximation )
再按 EXE 顯示 0.873600 ( 第三個近似值 Third Approximation )
................................直至要求的準確度達到為止，要終止程式請按 AC。
注意：如想解其他方程式，只需修改褐色部分。( X 是函數變數，最後的 → Y 為必須 )
程式執行完成後，請按 MODE 1 將計算機轉回 COMP 模式。
分半法 ( Bisection Method )
試位法 ( False Position Method, or Regula Falsi )
迭代法 ( Iteration Method )
梅拿法 ( Muller's Method )