fx-5800P的复数编程计算
    复数(complex number)早出现在解方程中，由于负数无法开根号，所以很多方程无法解，但这些方程确实不能说是没有意义，引进复数概念后，方程就可以解了。后来在几乎所有需要数学的领域都有应用，复数就像负数一样将数集进一步扩展，现在复数依然是大的数集。
    以前，人们很少在测量中使用复数计算，其实，使用复数编程进行测量坐标计算，无论是变量输入还是计算公式都比使用实数计算要简便得多，尤其是进行坐标变换计算。
Deg:Fix 3    设置角度单位与数值显示格式
Lbl 0: "START PO(X+Yi)="?A   以x+yi复数形式输入起点坐标
"END PO(X+Yi)="?B  以x+yi复数形式输入端点坐标
Abs(B-A)→D       计算起点→端点边长复数的模———水平距离
Arg(B-A) → C:       计算起点→端点边长复数的幅角———方向角
C<0  C+360→C:      判断方向角———变成方位角
"DIST(m)=":D◢　显示起点→端点的水平距离
"BEAR(DMS)=":C　 DMS◢    显示起点→端点的方位角
Goto 0
　　下面为运行上述程序，计算任意两点边长与方位角的案例。