一元二次方程(可顯示計算步驟)
程式除了計算判別式及兩根的數值外,亦可顯示完整一般計算用的算式(判別式及二次公式),而顯示的計算方法亦完全依照二次公式的編排。
注意 : 若果不想記存兩根,程式中綠色部份可以不輸入。
第一個程式 (46 / 44 bytes)
?→A: ?→B: ?→C: B2 - 4AC→D◢
( - B + √D ) ÷ 2A→X◢
( - B - √D ) ÷ 2A→Y
第二個程式 (分數版,48 / 46 bytes)
?→A: ?→B: ?→C: B2 - 4AC→D◢
( - B + √D )┘( 2A→X◢
( - B - √D ) ┘(2A→Y
例題1: 解 x2 - 7x + 12 = 0
按 Prog 1 再按 1 EXE - 7 EXE 12 EXE
(顯示算式 B2 - 4AC→D,即判別式D為B2 - 4AC,而判別式為1)
EXE (顯示第一個根的二次公式 ( - B + √D ) ÷ 2A ,而第一個實根為4)
EXE (顯示第二個根的二次公式 ( - B - √D ) ÷ 2A ,而第二個實根為3)
∴ x = 4 或 x = 3
例題2: 解 x2 + 6x + 25 = 0
假設程式是在comp模式中輸入
按 Prog 1 再按 1 EXE 6 EXE 25 EXE
(顯示算式 B2 - 4AC→D,即判別式D為B2 - 4AC,而判別式為 -64)
EXE (顯示 Math ERROR,表示方程無實解)
若果包含綠色程式碼,程式執行完成後,按 RCL X、RCL Y 及RCL D分別會顯示兩個根及判別式的數值。
附錄程式: 以下程式為計算複數根的版本,但要注意由於複數模式沒有D記憶,所以使用M代表D(判別式)。
注意輸入程式時,要先進入複數模式(先按Mode 2),否則程式不能計複數根(複數根時會出現Math error)。
附錄程式 (44 bytes)
?→A: ?→B: ?→C: B2 - 4AC→M◢
( - B + √M ) ÷ 2A◢
( - B - √M ) ÷ 2A