求个卡西欧5800P直线坐标正反算的程序

就是正反算只是一个程序,可以条件选择的?比如输入0进行正算程序!输入1进行反算程序这样的,之前4850的有一个。现在4850坏了,买了个5800又要重新输了。要有注解的哦~~

油香[email protected] 谢谢

CASIO fx—5800计算器 工程测量与公路测量程序
1、坐标正算
”X0=〃?X:”Y0=〃?Y:”I=〃?I:”J=〃?J
X+ICos(J)→U:Y+ISin(J)→V
”X=〃:U (待求点的X坐标)
”Y=〃:V (待求点的Y坐标)
说明:X0 Y0:已知点坐标I:两点的距离J:方位角
2、坐标反算
Lbl 0
”X1=〃?X:”Y1=〃?Y:”X2=〃?U:”Y2=〃?V
Pol(U-X,V-Y):
J<0 J+360→J
”I=〃:I
”J=〃:J DMS
GOTO 0
说明:X1Y1:第一点的坐标,X2Y2第二点的坐标,I:两点的距离,J:方位角
温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-10-01
已按要求编写好并发送到你的邮箱,请查收本回答被提问者采纳