✔ 最佳答案
一元二次方程 ( 第一版 ) ( Quadratic Equations : Version 1 )
( 程式版本:1.2,最後更新日期 30 DEC 2005。)
程式一
程式組
41 bytes
1
? → A : ? → B : ? → C : B2 – 4AC → D :
2
( √D – B ) ÷ 2A → X ◢
3
-B ÷ A – X → Y
MODE MODE MODE 2
程式二(較短的版本,不儲存判別式及根。)
程式組
35 bytes
1
? → A : ? → B : ? → C : B2 – 4AC :
2
( √Ans – B ) ÷ 2A ◢
3
-B ÷ A – Ans
MODE MODE MODE 2
程式三(如果輸入的是整數,而根是有理數 ( Rational Number ),答案會以分數顯示。)
程式組
42 bytes
1
? → A : ? → B : ? → C : B2 – 4AC → D :
2
( √D – B ) ┘( 2A → X ◢
3
-B ┘A – X → Y
MODE MODE MODE 2
程式四(程式三的較短版本,不儲存判別式及根。)
程式組
36 bytes
1
? → A : ? → B : ? → C : B2 – 4AC :
2
( √Ans – B ) ┘( 2A ◢
3
-B ┘A – Ans
MODE MODE MODE 2
( ┘是分數,按 a b/c。)
如果是使用程式三或程式四,我建議首先將計算機設定為以假分數顯示。
程式五(程式一的較準確版本)
程式組
45 bytes
1
? → A : ? → B : ? → C : B2 – 4AC → D :
2
( √D – B ) ÷ 2A → X ◢
3
( -√D – B ) ÷ 2A → Y
MODE MODE MODE 2 MODE 1
程式六(程式五的較短版本,不儲存根)
程式組
41 bytes
1
? → A : ? → B : ? → C : B2 – 4AC → C :
2
( √C – B ) ÷ 2A ◢
3
( -√C – B ) ÷ 2A
MODE MODE MODE 2 MODE 1
例:解方程 ( Solve ) 2x2 + 3x – 2 = 0
按 Prog,再按 1 至 4 選擇輸入程式位置 ( 必須和輸入程式時選擇的位置相同,此時計算機出現 A? ),再按
2 EXE 3 EXE (-) 2 EXE
顯示 0.5 ( 第一個根 First Root ) ( 使用程式三或程式四會顯示 1 / 2 )
再按 EXE 顯示 –2 ( 第二個根 Second Root )
當答案出現時,可按 a b/c 嘗試將答案由小數轉為分數。
如出現 Math ERROR,則表示沒有實數根 ( No real root )。
如果是程式一、程式三或程式五,程式執行完成後,按 RCL D 會顯示判別式 ( Discriminant ) 的數值,RCL X 會顯示第一個根的數值,而 RCL Y 會顯示第二個根的數值。