多點求多邊形面積(II)
更新日期: 2012年1月30日
這個版本的程式較第一版的簡短很多,不過計算N點多邊形面積時,與筆算的方法相似要輸入N+1點資料,較第一版的只要輸入N點資料煩複小許。
程式 (34 bytes)
ClrMemory: While 1: B: ?→A: ?→B:
BC - Ans AM+: A→C: Abs( M┘2→A: WhileEnd
例題1: 己知四點分別為(-1,7),(- 4,3),(0,0)及(3,4),求四邊形面積。
按 Prog 1 再按 -1 EXE 7 EXE - 4 EXE 3 EXE 0 EXE 0 EXE 3 EXE 4 EXE
-1 EXE 7 EXE (顯示面積為25)
計算完結請按AC終止程式。
注意1: 輸入的最後一點亦即是第一點的座標
注意2: 輸入的點數多於3點,要依須時針或逆時針方向輸入,否則不能正確計算多邊形面積。
例題2: 己知三點分別為(2,3),(4,5)及(3,7),求三角形面積。
按 Prog 1 再按 2 EXE 3 EXE 4 EXE 5 EXE 3 EXE 7 EXE 2 EXE 3 EXE (顯示面積為3)
計算完結請按AC終止程式。
注意1: 輸入的最後一點亦即是第一點的座標