多點求多邊形面積(I)

程式編寫日期: 2006年1月20日

程式 (64 bytes)

Mem clear: ?→A: ?→B: A→X: B→Y: Lbl 0:

A→C: √M2 ÷ 2→A: B: ?→A: ?→B:

X Ans - YC + BC - Ans A+ YA - XBM+: Goto 0

 

例題1: 己知四點分別為(0,0),(3,4),(-1,7)及(- 4,3),求四邊形面積。

按 Prog 1 再按 0 EXE 0 EXE 3 EXE 4 EXE -1 EXE 7 EXE - 4 EXE 3 EXE (顯示面積為25)

計算完結請按AC終止程式。

注意: 輸入的點數多於3點,要依須時針或逆時針方向輸入,否則不能正確計算多邊形面積。

 

例題2: 己知三點分別為(2,3),(4,5)及(3,7),求三角形面積。

按 Prog 1 再按 2 EXE 3 EXE 4 EXE 5 EXE 3 EXE 7 EXE (顯示面積為3)

計算完結請按AC終止程式。

 

返回 fx-3650P及SC185程式集

 

Free Web Hosting