一元二次方程 ( 第三版 ) ( Quadratic Equations : Version 3 )

注意：此程式只能在 HP-32SII 上使用。

此程式可計算實數及複數根 ( Complex Roots )。

LBL A	R/S	STO A	R/S	+/-	STO E
STO F	x2	2	STO ×A	RCL ×A	R/S
×	－	STO D	R/S	x ≧ 0?	GTO B
RCL D	+/-	√x	STO F	XEQ C	GTO E
LBL B	RCL D	√x	STO +E	STO –F	XEQ C
GTO E	LBL C	RCL A	STO ÷E	STO ÷F	RCL E
R/S	RCL F	RTN	LBL E	PRGM	60 bytes

( 程式連同數字記憶共使用 92 bytes。)
( 如果日後想繼續輸入其他程式，則請在離開 PRGM 模式前按 RTN。)

例一：解方程 ( Solve ) 2x² + 3x – 2 = 0

按 XEQ A，再按  2 R/S  3 R/S  2 +/-  R/S

顯示  25  ( 判別式 Discriminant，正數或 0 表示兩根是實數 )
再按 R/S      顯示  0.5  ( 第一個根 First Root )
再按 R/S      顯示  –2  ( 第二個根 Second Root )

例二：解方程 ( Solve )  x² – 4x + 13 = 0

按 XEQ A，再按  1 R/S  4 +/- R/S  13 R/S

顯示  –36  ( 判別式 Discriminant，負數表示兩根是複數 )
再按 R/S      顯示  2  ( 實數部份 Real Part )
再按 R/S      顯示  3  ( 虛數部份 Imaginary Part )

亦即是說方程式的根是 2 ± 3i

程式執行完成後，按 RCL D 會顯示判別式 ( Discriminant ) 的數值 ，RCL E 會顯示第一個根或根的實數部份的數值，而 RCL F 會顯示第二個根或根的虛數部份的數值。

一元二次方程 ( 第一版 ) ( Quadratic Equations : Version 1 )

一元二次方程 ( 第二版 ) ( Quadratic Equations : Version 2 )

返回選擇程式頁

返回頁首