四次方程

	Statement	Bytes
1.	? → A :
2.	? → B :
3.	? → C :
4.	? → D :	16
5.	B － 3 A 2 8 → M :
6.	B 6 → B :
7.	B3 － A B C 8 + C2 16 － D M 6→ X :
8.	A C 12 － D3 － B2 :
9.	ANS3 + X2 → Y :	75
10.	0 > ANS GOTO 1 :
11.	3√ ( X + √ Y ) － 5 M 6 + 3√ ( X －√ Y → X :	104
12.	GOTO 2 :
13.	Lbl 1 :
14.	Pol ( X , √ -Y :
15.	2 3√X COS Y 3 － 5 M 6 → X :
16.	Lbl 2 :
17.	A 4 → A :
18.	( X + M ) 2 + A C － D － A2 ( M + 3 A2 → D :
19.	0 > D D > -10-9 0 → D :
20.	√ D → D :	184
21.	1→ Y :
22.	2A :
23.	ANS3 － 6 ANS B + C :
24.	ANS > 0 -1 → Y :
25.	X M+ :
26.	X + M → C :
27.	0 > C C> - 10-9 0 → C :
28.	C － 4 M + 4 D → B :
29.	0 >B B > - 10-9 0 → B :	258
30	B － 8 D → M :
31.	0 > M M > -10-9 0 → M :
32.	Y√ C 4 － A → X :	290
33.	-2A － X → Y :
34.	X + √ B 4 → A :
35.	ANS ▲	309
36.	X － √ B 4 → B :
37.	ANS ▲
38.	Y + √ M 4 → C :
39.	ANS ▲
40.	Y － √ M 4 → D :
41.	ANS	341

若嫌這個程式太長，第19, 26, 28, 30句 statement 可以刪去，程式仍可運作，但也有可能因而引起錯誤。

範例一

解 x⁴ － 10x³ + 35x² － 50x + 24 = 0。

輸入

首先顯示方程的其中一個根 4，

再按 EXE 鍵，顯示另一個根 3，

再按 EXE 鍵，顯示另一個根 2，

再按 EXE 鍵，顯示另一個根 1。

已分別儲入A, B, C, D中。

範例二

解 3x⁴ － x³ － 3x + 1 = 0。

A?	-1 3
B?	0
C?	-1
D?	1 3

首先顯示方程的其中一個根 1，

再按 EXE 鍵，顯示另一個根 0.33333333，

再按 EXE 鍵， Math ERROR，表示另外二個不是實數根。

範例三

解 x⁴ + 2x³ + 3x² + 2x + 1 = 0。

Math ERROR，表示四個都不是實數根。

範例四( 解二次方程 )

解 2x² － 13x + 21= 0 ,

可把方程寫成 2x⁴ － 13x³ + 21x²= 0，其中 x = 0 要 reject 。

A?	-13 2
B?	21 2
C?	0
D?	0

首先顯示方程的根 3.5 , 3 , 0(rejected) , 0(rejected)

二次方程的根為 3.5 , 3 。