聯立二元一為一次及一為二次方程(I)精簡版

程式更新日期: 2010年7月16日

精簡版主要是沒有記儲答案的功能,另外若方程只有一組解答時(例如: 解聯立二元一次方程時),當顯示完第一組解答後,有可能不會自動終止程式,出現 Math ERROR(代表只有一組解答),這種情況不影響計算答案。

 

第一個程式精簡版 (128 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: 2M => (√(Y2 - 4MX) + Y)┘Ans→A◢

M=0 => X┘Y→A◢ C-DA◢ Y┘M - A◢ C-DAns

 

第二個程式精簡版 (140 bytes)

?→Y: ?→C: ?→D: ?→A: ?→X: ?→M:

AC2 - CXY + MY2→A: ?→B: CDX - 2MDY + BC2:

?→B: BCY - Ans→X: MD2 + BCD→M: ?→B:

BC2M-: 2A => (√(X2 - 4MA) + X)┘Ans→M◢

A=0 => M┘X→M◢ (D - MY)┘C◢

X┘A - M◢ (D - AnsY)┘C

第二個程式精簡版(答案不顯示分數) (137 bytes)

?→Y: ?→C: ?→D: ?→A: ?→X: ?→M:

AC2 - CXY + MY2→A: ?→B: CDX - 2MDY + BC2:

?→B: BCY - Ans→X: MD2 + BCD→M: ?→B:

BC2M-: 2A => Ans-1(√(X2 - 4MA) + X→M◢

A=0 => M┘X→M◢ C-1(D - MY◢

X┘A - M◢ C-1(D - AnsY

 

例題1: 解聯立方程:

按 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)

 

例題2: 解以下聯立二元一次方程

按 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.

 

註1: 第一個程式限制為第二個輸入的係數不可以是0,否則會出現Math error。

註2: 若果兩組的解相同,表示曲線與直線相切。

註3: 現時不少同類程式,會無法計算下列方程的情況(出現 Math error),這個程式沒有這方面的問題,其實這類程式必定可以同時計算聯立二元一次方程的問題,若果那個程式不能同時計算聯立二元一次方程,那麼很可能是設計欠嚴謹的程式,會得出錯 誤的答案(誤以為無解)。

按 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 程式集

Free Web Hosting