Question

卡西欧5800求一点到一直线的垂距程序

Answer 1

Deg:Fix3

Lbl 0

“XA=”?X:”YA=”?Y:“XB=”?U:”YB=”?V

“XC=”?T:”YC=”?W

(Y-V)÷(X-U)→M:(M×X+T÷M-Y+W)÷(M+1÷M)→C:Y+M×(C-X) →D

√((T-C)2+(W-D)2) →L

pol((C-X),(D-Y)):J＜0ÞJ+360→J

Cls:Norm 1:“JULI=“Locate6,1,L:““:“Z-H“:Locate 6,3,I◢

Goto 0

 

注释：

依次输入直线上已知两点的坐标(XA,YA)、(XB,YB)

直线外一点的坐标(XC,YC)

程序计算出C点在距中线的偏距“JULI=”直线上的桩号 “Z-H=” 

追问

怎么会出错呢在D
√((T-C)2+(W-D)2) →L括号处出错

追答

请检查括号是否成对、是否与遗漏