三點求圓(II)
程式更新日期: 2011年9月17日
程式由網友 roviury 提供。
若已知圓周上三點的座標，程式可以計算圓心及半徑。
程式需要在 CMPLX 模式下執行，因此在輸入程式前請先按 Mode 2。
程式 (48 bytes)
?→A: ?→B: ?→C: arg (A - C)-arg ( B - C:
A - ( . 5∠Ans)(B - A) i ÷ sin Ans◢ Abs ( A - Ans
注意: 座標以複數形式輸入及顯示答案，即是複數實數部為x座標，虛數部為y座標。
例題: 圓經過三點 (2,0)，(0,1) 及 (0,4)，求圓心, 半徑及圓的方程。
按 Prog 1 再按 2 + 0i EXE (以複數形式輸入座標)
0 + i EXE 0 + 4i EXE (顯示實數部為 2)
Shift Re<=>Im (顯示虛數部為 2.5 i, 即圓心為(2, 2.5))
EXE (顯示半徑為2.5)