求fx5800计算器 点到直线距离的程序!知道的麻烦说一下
答案:1 悬赏:50 手机版
解决时间 2021-04-25 18:08
- 提问者网友:萌卜娃娃
- 2021-04-24 19:34
求fx5800计算器 点到直线距离的程序!知道的麻烦说一下
最佳答案
- 五星知识达人网友:舊物识亽
- 2021-04-24 20:55
5800计算器线路、匝道中边桩万能程序彭赐明改编网上类似程序于河南高速郑漯8标LB1 1↙Cls : Fix 4 : Deg :"XZJ="?R◢ (输入置镜点X)"YZJ="?S◢ (输入置镜点Y)LB1 2↙"K="?K◢ (输入计算点里程)If K<第一线元终点里程 :THEN 线元起点X→A:线元起点Y→B:线元起点半径(直线起点终为10的45次方)→T:线元起点里程→D:线元起点方位角→E:线元终点半径(直线起终点为10的45次方)→U:线元终点里程→G:线元偏向(左偏-1右偏+1)→W:Goto 3:IfEnd↙………………………………(线元数据分段输入)LB1 3↙W*T→C:W*U→F:0→I:0→J:(C-F)/(2*C*F*(G-D))→H:K-D→X:E+(X/C+HX^2)×180/π→V:V<0=>V+360→V:"QXJ=":V→DMS◢(计算点切线方位角)A+∫(Cos(E+(X/C+HX^2)*180/π,0,X)→Z :B+∫(Sin(E+(X/C+HX^2)*180/π,0,X)→Y :"XI=":Z◢(计算点中心X)"YI=":Y◢(计算点中心Y)"PJ="?P◢(输入计算点边桩偏角左-右+)"PD="?Q◢(输入计算点边桩偏距)Rec(Q,V+P):Z+I→Z :Y+J→Y:"XP=":Z◢(计算点边桩X)"YP=":Y◢(计算点边桩Y)Pol(Z-R,Y-S):J<0=>J+360→J:"FYJ=":J→DMS◢(放样方位角)"FYD=":I◢(放样距离)Goto 2↙
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯