计算器测量编程 教学课件 作者 冯大福 第9讲串列及面积计算程序.pptVIP

地质与测绘工程学院 地质与测绘工程学院 计算器编程 测量教研室 2014年2月 上周布置的作业 用本程序计算地形测量书中的相关例子？ 有什么问题？ 一、串列 MODE—REG—X列—Y列 引用方法： LIST X[I]→L （角度） LIST Y[I]→S （距离） n → N 清除串列： MODE-COMP-FUNCTION—CLR-STAT--CLRSTAT 二、支导线坐标计算（用串列） For 1→I to N F+LIST X[I] →F LIST Y[I] →S IF F180 THEN F+180 →F ELSE F-180 →F IfEnd “POINT NO=”：I ▲ F DMS▲ “X=”：X+S×cosF→X ▲ “Y=”：Y+S×sinF→Y ▲ NEXT “END” 程序： Deg：FreqOn “Unknown point”：n →N ▲ “XA=”?A：“YA=”?B “XB=”?C: “YB=”?D POL（C-A，D-B） “DAB=”:I▲ J→F F0 =F+360→F “FAB=”:F DMS▲ C→X：D→Y 三、支导线坐标计算（1） 已知数据： A（X，Y） B（X，Y） 观测数据： 水平角 X[I] 水平距 Y[I] 未知数据： 各边方位角F 各点坐标X、Y 三、程序说明 N——点号 XA——A YA——B XB——C YB——D I——点号 L——L 水平角（右角为-） S——S 水平距离 F——方位角 X——前视点X坐标 Y——前视点y坐标 四、归纳 1 转移语句 2 循环语句 3 支导线计算程序 4 在程序前加Deg可设置角度，加fix可设置小数取位 5 作业：用本程序计算地形测量书中的相关例子。 五、面积计算（串列） 1 面积公式： 2 用串列LIST 六、面积计算程序（串列） 程序2： FreqOn “point NUM”：n→N▲ 0→S LIST X[I] →A LIST Y[I] →B For 2→I to N LIST X[I] →C LIST Y[I] →D (AD-BC)÷2+S→S C→A：D→B NEXT LIST X[1] →C LIST Y[1] →D (AD-BC)÷2+S→S “S=”：S ▲ 程序1： FreqOn “point NUM”：n →N▲ 0→S For 1→Ito N LIST X[I]→A LIST Y[I]→B LIST X[I+1]→C LIST Y[I+1]→D (AD-BC)÷2+S→S NEXT “S=”：S ▲ 七、面积计算示例 坐标数据： 点号 X Y 1 24.140 132.160 2 45.218 180.927 3 79.215 169.586 4 91.681 127.170 5 59.270 95.188 本讲结束, 谢谢大家! 地质与测绘工程学院 地质与测绘工程学院