三階伴隨矩陣/逆矩陣及行列式(II)
程式參考了網友roviury意見進行修改。
更新日期: 2010年4月5日
這個版本的程式可以計算三階行列式、逆矩陣(預設值)或伴隨矩陣(包括非奇異(non-singular)的伴隨矩陣)。逆矩陣的顯示形式與第一版的不同,程式亦較長,另外若果輸入的數值為整數,答案會以分數形式表示, 建議將計數機預先設定為假分數形式表示(按 SHIFT SETUP → → 2 )。若果不用計算三階伴隨矩陣,可以使用三階逆矩陣及行列式程式。
程式需要在 REG Lin 模式下執行,因此在選擇新程式位置後,按 5 1 選用REG Lin模式。
注意: 藍色的英文字為統計模式中的變數(maxX 按 shift 2 2 2,maxY 按 shift 2 2 → 2,Σx 按 Shift 1 2,Σy 按 Shift 1 → 2,n 按 Shift 1 3),FreqOn 按 Shift MODE ← ← 1。
第一個程式(可以顯示分數答案 148 bytes)
FreqOn: ?→A: ?→B: ?→C: ?→D: ?→X: ?→Y:
?→M: B , C ; D DT: ?→B: ?→C: ACX + BΣy +
YMmaxX - ABY - CΣx - XMmaxY→D: ?→D: 1┘D→D:
D(XC - BY◢ D(BmaxY - CmaxX◢ D(YmaxX - XmaxY◢
D(YM - Cn◢ D(AC - MmaxY◢ D(Σy - AY◢
D(Bn - XM◢ D(MmaxX - AB◢ D(AX - Σx
第二個程式(不顯示分數答案 147 bytes)
FreqOn: ?→A: ?→B: ?→C: ?→D: ?→X: ?→Y:
?→M: B , C ; D DT: ?→B: ?→C: ACX + BΣy +
YMmaxX - ABY - CΣx - XMmaxY→D: ?→D: D-1→D:
D(XC - BY◢ D(BmaxY - CmaxX◢ D(YmaxX - XmaxY◢
D(YM - Cn◢ D(AC - MmaxY◢ D(Σy - AY◢
D(Bn - XM◢ D(MmaxX - AB◢ D(AX - Σx
只計算三階逆矩陣及行列式版本 (142 / 141 bytes)
例題1: 計算下列矩陣的逆矩陣。
按 Prog 1 再按 2 EXE 1 EXE 3 EXE 7 EXE 4 EXE 6 EXE
8 EXE 9 EXE 7 EXE (這時顯示?→D及行列式的值 40) EXE
(不輸入數值表示計逆矩陣,顯示 -13/20) EXE (顯示 1/2) EXE (顯示 -3/20) EXE
(顯示 -1/40) EXE (顯示 -1/4) EXE (顯示 9/40) EXE
(顯示 31/40) EXE (顯示 -1/4) EXE (顯示 1/40)
因此,
計算完結後,請按Mode 1返回正常模式。
例題2: 計算下列矩陣的伴隨矩陣。
按 Prog 1 再按 2 EXE 1 EXE 3 EXE 7 EXE 4 EXE 6 EXE
8 EXE 9 EXE 7 EXE (這時顯示?→D及行列式的值 40) 1 EXE
(輸入1表示計算伴隨矩陣,顯示 -26) EXE (顯示 20) EXE (顯示 -6) EXE
(顯示 -1) EXE (顯示 -10) EXE (顯示 9) EXE
(顯示 31) EXE (顯示 -10) EXE (顯示 1)
因此,
計算完結後,請按Mode 1返回正常模式。
返回 CASIO fx-50FH、fx-3650P II、fx-50FH II及fx-50F PLUS 程式集
程式舊版
程式更新日期: 2008年3月15日
這個版本的程式可以計算三階行列式、逆矩陣(預設值)或伴隨矩陣(包括非奇異(non-singular)的伴隨矩陣)。逆矩陣的顯示形式與第一版的不同,程式亦較長,另外若果輸入的數值為整數,答案會以分數形式表示, 建議將計數機預先設定為假分數形式表示(按 SHIFT SETUP → → 2 )。若果不用計算三階伴隨矩陣,可以使用三階逆矩陣及行列式程式。
程式需要在 REG Lin 模式下執行,因此在選擇新程式位置後,按 5 1 選用REG Lin模式。
注意: 藍色的英文字為統計模式中的變數(maxX 按 shift 2 2 2,maxY 按 shift 2 2 → 2,n 按 Shift 1 3)。
第一個程式(可以顯示分數答案 164 bytes)
ClrStat: ?→A: ?→B: ?→C: ?→D: ?→X: ?→Y:
?→M: B , C ; D DT: ?→B: ?→C: ACX + BDmaxY +
YMmaxX - ABY - CDmaxX - XMmaxY→D: ?→D:
(XC - BY)┘D◢ (BmaxY - CmaxX)┘D◢ (YmaxX - XmaxY)┘D◢
(YM - Cn)┘D◢ (AC - MmaxY)┘D◢ (n maxY - AY)┘D◢
(Bn - XM)┘D◢ (MmaxX - AB)┘D◢ (AX - n maxX)┘D
第二個程式(不顯示分數答案 155 bytes)
ClrStat: ?→A: ?→B: ?→C: ?→D: ?→X:
?→Y: ?→M: B , C ; D DT: ?→B: ?→C: ACX + BDmaxY +
YMmaxX - ABY - CDmaxX - XMmaxY→D: ?→D:
D-1(XC - BY◢ D-1(BmaxY - CmaxX◢ D-1(YmaxX - XmaxY◢
D-1(YM - Cn◢ D-1(AC - MmaxY)◢ D-1(n maxY - AY◢
D-1(Bn - XM◢ D-1(MmaxX - AB◢ D-1(AX - n maxX