三角形垂心

程式編寫日期: 2006年8月9日

已知三角形三頂點的坐標,程式可計算三角形垂心的坐標。另外若果輸入數據為整數(或分數),答案會以分數形式表示,建議將計數機預先設定為假分數形式表示(按六次 Mode,再按 1 2 EXE )。

注意 : 若果不想記存兩根,程式中綠色部份可以不輸入。

程式一 (75 bytes)

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

(X-C) ┘ (Y-D→M: Y - B: C + Ans( MA+B-MC-D ) ┘ 

( A+AnsM-X
→X◢ B+AM-AnsM→Y 
 

程式二由網友 roviury 提供。

程式二需要在 CMPLX 模式下執行,因此在輸入程式前請先按 Mode 2。

程式二 (41 bytes)

?→A: ?→B: ?→C:  arg (A - C) - arg ( B - C:

B + C - A + ( 1∠Ans )(B - A) i ÷ sin Ans◢

 

例題: A、B及C三點的坐標分別為(4 , 3)、(0 , 0) 及 (4 , 0),求三角形ABC的垂心的坐標。

程式一按法:

按 Prog 1 再按 4 EXE 3 EXE 0 EXE 0 EXE 4 EXE 0

EXE (顯示4) EXE (顯示0,所以垂心=(4, 0))

 

程式二按法:

按 Prog 1 再按 4 + 3 i EXE (以複數形式輸入座標)

0 + 0 i EXE 4 + 0 i EXE (顯示實數部為4)

Shift Re<=>Im (顯示虛數部為 0i,所以垂心=(4, 0))

 

註1: 程式一若頭尾兩點的y坐標相同,程式有可能出現Math ERROR,可以嘗試改變點的先後次序。

註2: 使用程式二時,要注意若答案的x坐標為0(實數部),答案會直接先顯示y坐標的值(虛數部(有 i字))

 

返回 fx-3650P及SC-185程式集

 

 

 

Free Web Hosting