一个通用的E500曲线坐标计算程序
一、主程序
5 RADIAN
10 INPUT “N=”;N
20 DIM X(N),Y(N),A(N),DK(N),R(N)
25 REM A1,B1,XX,YY,X1,Y1,U,V,P,Q,W,I1,J,AK1,PK,SK,M1,N1,S1,
S2,C,D,E,F,G,H,H1
30 INPUT “XA=”;X(0)
31 INPUT “YA=”;Y(0)
32 INPUT “CA=”;A(0):AA1=A(0)</
一个通用的E500曲线坐标计算程序
一、主程序
5 RADIAN
10 INPUT “N=”;N
20 DIM X(N),Y(N),A(N),DK(N),R(N)
25 REM A1,B1,XX,YY,X1,Y1,U,V,P,Q,W,I1,J,AK1,PK,SK,M1,N1,S1,
S2,C,D,E,F,G,H,H1
30 INPUT “XA=”;X(0)
31 INPUT “YA=”;Y(0)
32 INPUT “CA=”;A(0):AA1=A(0)</