资源预览内容
第1页 / 共12页
第2页 / 共12页
第3页 / 共12页
第4页 / 共12页
第5页 / 共12页
第6页 / 共12页
第7页 / 共12页
第8页 / 共12页
第9页 / 共12页
第10页 / 共12页
亲,该文档总共12页,到这儿已超出免费预览范围,如果喜欢就下载吧!
资源描述
计算器编程,测量教研室 2014年2月,上周布置的作业:根据经度计算带号,6度带公式 带号=INT(L6)+1 3度带公式 带号=INT(L+1.5)3) 如果知道6度带带号,L66n-3 如果知道3度带带号,L33n 如果编程 ?,程序: =LN= “L”?L “6”:INT(L/6)+1 “3”:INT(L+1.5)/3),一、转移语句,句法: Goto n lb1 n ,示例: ?A lb1 1 ?B AB2 Goto 1,成对出现 数字一样即可,0,1,2,二、循环语句,句法: For 表达式 初值变量 TO 终值 STEP步长NEXT,例子: For 1A TO 100 STEP 3:A3 B:BNEXT 简化: For 1A TO 100 :A3 B:BNEXT,三、支导线坐标计算(1),已知数据: A(X,Y) B(X,Y) 观测数据: 水平角 XI 水平距 YI 未知数据: 各边方位角F 各点坐标X、Y,三、支导线坐标计算(2),公式: POL(C-A,D-B) F=F+L-180 X=P+SCOSF Y=Q+SSINF,三、支导线坐标计算(3)-程序说明,XAA YAB XBC YBD LL 水平角(右角为-) SS 水平距离 J上一条边的方位角 F方位角 P上一点的X坐标 Q上一点的Y坐标 K判断,负值向前推算 X前视点X坐标 Y前视点y坐标 推算路线为:A-B-1-2-3-4,三、支导线坐标计算(4),程序: Deg “XA=”?A: “YA=”?B “XB=”?C: “YB=”?D POL(C-A,D-B) “DAB=”:I JJ+360J “FAB=”:J DMS AP:B Q Lb1 0 “L=”?L:“S=”?S J+L-180 F FF+360F F DMS P+ScosF X Q+SsinF Y “K=”?K K0 = GOTO 0 XP:YQ:FJ Goto 0,四、归纳,1 转移语句 2 循环语句 3 支导线计算程序(注意右角为负) 4 在程序前加Deg可设置角度,加fix可设置小数取位,加DMS可直接变成度分秒的形式。 5 作业:用本程序计算地形测量书中的相关例子。,本讲结束, 谢谢大家!,
收藏 下载该资源
网站客服QQ:2055934822
金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号