✔ 最佳答案
可以看看以下網址的兩個程式
1. 聯立二元一次方程可以看:
http://hk.geocities.com/kl_cheuk/3650P/simultaneous1.htm
內容如下:
聯立二元一次方程(I)
程式編寫日期: 2005年10月28日
程式 (53 bytes)
?→A: ?→B: ?→C: ?→D: ?→X: ?→Y:
AX - DB→M: M-1(CX - YB→X◢ M-1(AY - DC→Y
分數版程式 (55 bytes)
精簡版程式 (49 bytes)
例題: 解聯立方程 :
圖片參考：
http://hk.geocities.com/kl_cheuk/3650P/Image76.gif
按 Prog 1 再按 1 EXE 1 EXE 7 EXE 1 EXE - 1 EXE 1 EXE (顯示4) EXE (顯示3)
因此解答為 x = 4 及 y = 3.
程式執行完成後，按 RCL X 、RCL Y及RCL M分別顯示x的值、y的值及方程組行列式的值。
返回 fx-3650P 程式集
圖片參考：
http://geo.yahoo.com/serv?s=382076083&t=1181921131&f=hk-w77
若果想計聯立一個方程為一次另一個方程為二次可以看以下網址:
http://hk.geocities.com/kl_cheuk/3650P/simultaneous5.htm
內容如下:
聯立二元一次及二次方程
程式編寫日期: 2005年12月22日
這兩個程式可解聯立二元一次及二次方程，亦可以解聯立二元一次方程。另外若果輸入係數為整數/分數及最後答案為有理數時，答案會以分數形式表示，建議將計數機預先設定為假分數形式表示(按六次 Mode，再按 2 EXE )。 第一個程式較簡短，不過線性方程輸入的係數若為小數，準確度有可能會減小一點。
第一個程式 (139 bytes)
?→A: ?→B: A┘B→D: ?→A: A┘B→C: ?→M: ?→Y:
?→X: ?→A: XD2 - DYM+: ?→B: BD - CY + 2CDX - A→Y:
?→A: XC2 + BC - A→X: M => (√(Y2 - 4MX) + Y)┘(2M→A◢
M => C-DA→B◢ M => Y┘M - A→X◢ M=0 => X┘Y→X◢
C-DX→Y
第一個程式的精簡版 (129 bytes)
第二個程式 (152 bytes)
?→Y: ?→C: ?→D: ?→M: ?→X: ?→A:
MC2 - CXY + AY2→M: ?→B: CDX - 2ADY + BC2:
?→B: BCY - Ans→X: AD2 + BCD: ?→B:
Ans - BC2→A: M => (√(X2 - 4AM) + X)┘(2M→A◢
M => (D - AY)┘C→B◢ M => X┘M - A→X◢
M=0 => A┘X→X◢ (D - XY)┘C→Y
第二個程式的精簡版 (141 / 138 bytes)
例題1: 解聯立方程:
圖片參考：
http://hk.geocities.com/kl_cheuk/3650P/Image87.gif
按 Prog 1 再按 3 EXE 5 EXE 8 EXE 3 EXE 4 EXE 5 EXE 3 EXE 5 EXE 20
EXE (顯示1) EXE (顯示1，即第一組的解答為 x=1, y=1)
EXE (顯示1/3) EXE (顯示7/5，即第一組的解答為 x=1/3, y=7/5)
程式執行完成後，按 RCL A 及 RCL B分別顯示第一組解答案的x及y的值，按 RCL X 及 RCL Y分別顯示第二組解答案的x及y的值。
例題2: 解以下聯立二元一次方程
圖片參考：
http://hk.geocities.com/kl_cheuk/3650P/Image76.gif
按 Prog 1 再按 1 EXE 1 EXE 7 EXE 0 EXE 0 EXE 0 EXE
1 EXE -1 EXE 1 EXE (顯示4) EXE (顯示3)
因此解答為 x = 4 及 y = 3.
程式執行完成後，按 RCL X 及 RCL Y分別顯示解答案的x及y的值。
註1: 程式限制為第二個輸入的係數不可以是0，否則會出現Math error。
註2: 若果兩組的解相同，表示曲線與直線相切。
註3: 若果只計算出一組解答時(非兩組相同的情況)，答案只記存在X及Y的記憶。
註4: 現時不少同類程式，會無法計算下列方程的情況(出現 Math error)，這個程式沒有這方面的問題，其實這類程式必定可以同時計算聯立二元一次方程的問題，若果那個程式不能同時計算聯立二元一次方程，那麼很可能是設計欠嚴謹的程式，會能得出錯答的答案(誤以為無解)。
圖片參考：
http://hk.geocities.com/kl_cheuk/3650P/Image164.gif
按 Prog 1 再按 3 EXE 4 EXE 7 EXE 15 EXE 8 EXE - 16 EXE
1 EXE 1 EXE 9 EXE (顯示1) EXE (顯示1)
因此解答為 x = 1 及 y = 1.
返回 fx-3650P 程式集
