一元二次方程(可顯示計算步驟)

一元二次方程(可顯示計算步驟)

程式編寫日期: 2008年1月20日

程式除了計算判別式及兩根的數值外，亦可顯示完整一般計算用的算式(判別式及二次公式)，而顯示的計算方法亦完全依照二次公式的編排。

注意 : 若果不想記存兩根，程式中綠色部份可以不輸入。

第一個程式 (50 / 46 bytes)

?→A: ?→B: ?→C: B² - 4AC→D◢

( - B + √( D ) ) ÷ ( 2A→X◢

( - B - √( D ) ) ÷ (2A→Y

第二個程式 (分數版，50 / 46 bytes)

?→A: ?→B: ?→C: B² - 4AC→D◢

( - B + √( D ) )┘( 2A→X◢

( - B - √( D ) ) ┘(2A→Y

例題1: 解 x² - 7x + 12 = 0

按 Prog 1 再按 1 EXE - 7 EXE 12 EXE

(顯示算式 B² - 4AC→D，即判別式D為B² - 4AC，而判別式為1)

EXE (顯示第一個根的二次公式 ( - B + √( D ) ) ÷ ( 2A ，而第一個實根為4)

EXE (顯示第二個根的二次公式 ( - B - √( D ) ) ÷ ( 2A ，而第二個實根為3)

∴ x = 4 或 x = 3

例題2: 解 x² + 6x + 25 = 0

假設程式是在comp模式中輸入

按 Prog 1 再按 1 EXE 6 EXE 25 EXE

(顯示算式 B² - 4AC→D，即判別式D為B² - 4AC，而判別式為 -64)

EXE (顯示 Math ERROR，表示方程無實解)

若果包含綠色程式碼，程式執行完成後，按 RCL X、RCL Y 及RCL D分別會顯示兩個根及判別式的數值。