一元二次方程簡短版
編寫日期: 2007年11月11日 最新修改日期: 2009年10月11日
第一個程式 (32 bytes，由網友 yathimc提供程式)
?→A: ?→B: ?→C:
- 2C ÷ (B-√(B2 - 4AC◢ C÷AAns
第二個程式 (32 bytes，由網友 yuen提供程式)
?→A: ?→M: ?→C:
√(M2 - 4ACM+: - M ÷ 2A◢ C÷AnsA
第三個程式(32 bytes，由網友 kamkam提供程式)
程式需要在 REG Lin 模式下執行，因此在輸入程式前請先按 Mode Mode 2 1 進入REG Lin模式。
注意: 藍色的英文字為統計模式中的變數，x 按 Shift 2 1。
?→C: ?→B: ?→A:
- x┘2 - √(x2┘4 -A┘C◢ - x - Ans
第四個程式(30 bytes，由網友 kamkam提供程式)
程式需要在 REG Lin 模式下執行，因此在輸入程式前請先按 Mode Mode 2 1 進入REG Lin模式。
注意: 藍色的英文字為統計模式中的變數，x 按 Shift 2 1。
?→C: ?→A: ?→B: -A÷2C:
Ans + √( Ans2 - x◢ x÷Ans
例題: 解 x2 - 7x + 12 = 0
按 Prog 1 再按 1 EXE - 7 EXE 12 EXE (顯示第一個實數根為3) EXE (顯示第二個實數根為4)
∴ x = 4 或 x = 3
註1: 第一個程式的限制: 若其中一個根為0，程式會出現Math ERROR(第一個根或第二個根)。
註1: 第二個程式的限制: 若第一個根為０，顯示第二個根時會出現Math ERROR。
註2: 第一個及第二個程式若要計算一元二次方程的複數根，請在複數模式(CMPLX)輸入程式即可。
註3: 第三個程式只可以計算一元二次方程的實根，另外不能直接輸入分數係數，若要輸入分數，請使用除號(÷)代替分號(┘)輸入即可。
註4: 第四個程式的限制: (i) 若第一個根為０，顯示第二個根時會出現Math ERROR。(ii) 只可以計算一元二次方程的實根，另外不能直接輸入分數係數，若要輸入分數，請使用除號(÷)代替分號(┘)輸入即可。