四階伴隨矩陣及行列式

程式編寫日期: 2008年4月3日

程式需要在 REG Lin 模式下執行，因此在選擇新程式位置後，按 5 1 選用REG Lin模式。

注意: 藍色的英文字為統計模式中的變數(Σx 按 Shift 1 2，Σy 按 Shift 1 → 2，Σxy 按 Shift 1 → 3)。

程式(669 bytes)

ClrStat: ?→A: ?→B: ?→C: 1 ; 2^-1(A+B-2C DT:

- 1 ; 2^-1(A-B DT: 1 , 1 , C DT: ?→D:

E-50 , 1 ; E50(D-C DT: ?→X: 0 , 1 ; - Σy DT: ?→Y:

; Y DT: , E-50 ; E50(X - Y DT: ?→A: ?→B: ?→C:

E-34 , 0 ; E68(C-Σx² DT: E-50 ; - E50Σx DT:

; E50B DT: 0 ; -n DT: ; A DT: ?→A: ?→B: ?→C:

?→D: ?→X: ?→Y: ?→M: Σy²BM - Σy²CY - AnM +

AΣxY + XnC - XΣxB ; 0 DT: AnsΣx⁴ + ΣyΣx³(CY - BM) +

ΣyA(Σx²yM - ΣxyY) + ΣyX(ΣxyB - Σx²yC) +

Σx²Σx³(nM - ΣxY) + Σx²Σy²(ΣxyY - Σx²yM) +

Σx²X(Σx²yΣx - Σxyn) + DΣx³(ΣxB - nC) +

DΣy²(Σx²yC - ΣxyB) + DA(Σxyn - Σx²yΣx◢ ; 0 DT: Ans◢

Σx³CY - Σx³BM + AΣx²M - AΣxyY - XΣx²yC + XΣxyB◢

Σx³nM - Σx³ΣxY - Σy²Σx²yM + Σy²ΣxyY + XΣx²yΣx - XΣxyn◢

Σx³ΣxB - Σx³nC + Σy²Σx²yC - Σy²ΣxyB - AΣx²yΣx + AΣxyn◢

ΣyCY - ΣyBM + Σx²nM - Σx²ΣxY - DnC + DΣxB◢

Σx⁴BM - Σx⁴CY - Σx²Σx²yM + Σx²ΣxyY + DΣx²yC - DΣxyB◢

Σx⁴ΣxY - Σx⁴nM + ΣyΣx²yM - ΣyΣxyY - DΣx²yΣx + DΣxyn◢

Σx⁴nC - Σx⁴ΣxB - ΣyΣx²yC + ΣyΣxyB + Σx²Σx²yΣx - Σx²Σxyn◢

ΣyAM - ΣyCX - Σx²Σy²M + Σx²ΣxX + DΣy²C - DΣxA◢

Σx⁴CX - Σx⁴AM + Σx²Σx³M - Σx²ΣxyX - DΣx³C + DΣxyA◢

Σx⁴Σy²M - Σx⁴ΣxX - ΣyΣx³M + ΣyΣxyX + DΣx³Σx - DΣxyΣy²◢

Σx⁴ΣxA - Σx⁴Σy²C + ΣyΣx³C - ΣyΣxyA - Σx²Σx³Σx + Σx²ΣxyΣy²◢

ΣyBX - ΣyAY + Σx²Σy²Y - Σx²nX - DΣy²B + DnA◢

Σx⁴AY - Σx⁴BX - Σx²Σx³Y + Σx²Σx²yX + DΣx³B - DΣx²yA◢

Σx⁴nX - Σx⁴Σy²Y + ΣyΣx³Y - ΣyΣx²yX - DΣx³n + DΣx²yΣy²◢

Σx⁴Σy²B - Σx⁴nA - ΣyΣx³B + ΣyΣx²yA + Σx²Σx³n - Σx²Σx²yΣy²

例題: 計算下列矩陣的伴隨矩陣及逆矩陣。

按 Prog 1  再按 2 EXE 3 EXE 4 EXE 5 EXE 9 EXE 3 EXE 1 EXE 2 EXE

4 EXE 7 EXE 6 EXE 3 EXE 5 EXE 9 EXE 8 EXE 7 EXE (顯示行列式為192)

EXE (顯示 36) EXE (顯示24) EXE (顯示 36) EXE (顯示 - 48)

EXE (顯示 - 153) EXE (顯示 - 6) EXE (顯示 - 105) EXE (顯示 156)

EXE (顯示 161) EXE (顯示 - 10) EXE (顯示 177) EXE (顯示 - 188)

EXE (顯示 - 13) EXE (顯示2) EXE (顯示 - 93) EXE (顯示 76)

所以

返回 CASIO fx-50FH 及 fx-50F PLUS 程式集