扇形計算
程式編寫日期: 2007年12月21日
程式可以在已知扇形其中的最少兩個變數(半徑、中心角、弧長及面積)，計算未知變數。
程式 (97 bytes)
ClrMemory: ?→A: ?→B: ?→C: ?→D:
180÷π→X: A=0 => CD => 2D÷C→A◢
A=0 => XC÷B + √( 2XD÷B→A◢
B=0 => 2XD÷A² + A-1XC(D=0→B◢
C=0 => AB÷X→C◢ AC÷2→D
註1: 執行程式，輸入扇形變數的次序為半徑、中心角、弧長、面積，不輸入數值(必要)代表未知數，即直接按EXE即可，而答案會依照輸入未知數時(直接按EXE)的次序顯示。
註2: 注意本程式的中心角以度數為單位，計數機的角度單位設定(Deg、Rad、Gra)不會影響本程式。 若果你希望能夠以其它角度單位輸入及顯示答案，只要將程式第一行中的 180 改為 πr 即可，那麼輸入及輸出中心角的角度單位將會與計數機角度單位設定相同。
註3: 程式不能計算變數為0或負數的情況。
例題1: 扇形的半徑為25 cm，中心角為216°，求弧長及面積。
按 Prog 1 再按 25 EXE 216 EXE
EXE EXE (不輸入弧長及面積，顯示弧長為94.248 cm)
EXE (顯示面積為 1178.10 cm²)
例題2: 扇形的半徑為25 cm，弧長為30π cm，求中心角及面積。
按 Prog 1 再按 25 EXE EXE (不輸入中心角) 30π EXE
EXE (不輸入面積，顯示中心角為216°)
EXE (顯示面積為 1178.10 cm²)
例題3: 扇形的半徑為25 cm，面積為1178.10 cm²，求中心角及弧長。
按 Prog 1 再按 25 EXE EXE EXE (不輸入中心角及弧長)
1178.1 EXE (顯示中心角為216°)
EXE (顯示弧長為 94.248 cm)
計算完結後按 AC 終止程式
例題4: 扇形的中心角為216°，弧長為 94.2478 cm，求半徑及面積。
按 Prog 1 再按 EXE (不輸入半徑) 216 EXE 94.2478 EXE
EXE (不輸入面積，顯示半徑為25 cm)
EXE (顯示面積為 1178.10 cm²)
例題5: 扇形的中心角為216°，面積為 1178.10 cm²，求半徑及弧長。
按 Prog 1 再按 EXE (不輸入半徑) 216 EXE EXE (不輸入弧長)
1178.1 EXE (顯示半徑為25 cm)
EXE (顯示弧長為 94.2479 cm)
計算完結後按 AC 終止程式
例題6: 扇形的弧長為94.2478 cm，面積為 1178.10 cm²，求半徑及中心角。
按 Prog 1 再按 EXE EXE (不輸入半徑及中心角)
94.2478 EXE 1178.1 EXE (顯示半徑為25 cm)
EXE (顯示中心角為 216°)
計算完結後按 AC 終止程式
註: 程式執行完結後按 RCL A、RCL B、RCL C及RCL D可顯示半徑、中心角、弧長及面積的數值。
附錄程式: 程式較簡短，答案亦有記存，程式執行完結後按 RCL A、RCL B、RCL C及RCL D可顯示半徑、中心角、弧長及面積的數值，但答案的顯示形式與上面程式不同，即是將四個變數(包括兩個答案)依次序顯示出來，我個人認為這種較差一點，因為會重複顯示已知的變數，但有些網友可能 會覺得這樣較好。
附錄程式 (93 bytes)
ClrMemory: ?→A: ?→B: ?→C: ?→D:
180÷π→X: CD => 2D÷C→A:
A=0 => XC÷B + √( 2XD÷B→A:
B=0 => 2XD÷A² + A-1XC(D=0→B:
A◢ B◢ AB÷X→C◢ AC÷2→D
返回 CASIO fx-50FH 及 fx-50F PLUS 程式集