阅读下一篇
[测绘]卡西欧计算器FX-4X00程序(不断增加)附闭合导线计算1、 源程序F1 A1L1 Defm 4N-2L2 N:A:B:Pol(C-A,D-B):W<0=>W=W+360?T=WL3 K=0=>M=T+180:E=C:F=D:GOTO 0: ≠>E:F:Pol(G-E,H-F):W<0=>W=W+360?M=WL4 Lbl 0:L=0:U=0:I=0:R=2:Z[1]=TL5 Lbl 1:{J}:Z[R]+360: ?R=N+1=>GOTO 2: ≠>R=R+1:GOTO 1
回帖成功
经验值 +10
全部回复(10 )
只看楼主 我来说两句回复 举报
回复 举报