卡西欧5800编程实例

‘壹’ 求卡西欧5800轴线偏移程序的实例

例如，①轴偏移到②轴

提示输入起点的坐标（A,B）就是P点的坐标；起点方位角、轴线偏移距 D,E如图

‘贰’ 卡西欧5800计算器的详细编程

其实就是将公式代码化，然后设定参数和计算步奏，最后加以整合，进行运算，一般最简单的，编程步奏就是1、设定参数（单位、小数位、数据库建立）2、设定计算式，显示结尾（回车结尾不显结果、直角三角显结果）3最后以END结束，这是基本的，往后就相应的添加就行了
我以ABC，给你讲一下，要算A+B=C,在计算器中就输入
FiX 3："A="?A:"B="?B↙
"C=":A+B->C◢
"END"↙

‘叁’ 卡西欧fx5800程序怎么编

你好，casio5800编程其实很简单！

给你举个例子：

[原创] CASIO fx-5800P FWJ方位角和距离计算程序

说明：本程序可计算两坐标点之间距离和方位角。

主程序名:FWJ（程序名称）
Lbl 1（接收命令）
Deg:Fix 3（基本设置）
"Z(X)"?A:"Z(Y)"?B:"Q(X)"?C:"Q(Y)"?D（变量名称）
Pol(C-A,D-B):I→E:If J<0:Then J+360→F:Else J→F:IfEnd（计算公式）
Cls:"F=":Locate 3,1,F°:"S=":Locate 3,2,E◢（显示结果）
Goto 1（转移命令）

核对数据：
Z(X)?=3368058.403
Z(Y)?=462435.035
Q(X)?=3368085.544
Q(Y)?=462417.008
F=326°24ˊ28.67″
S=32.582

如果你有不懂的可以在网络搜索“ FFFSKY BLOG ”进入该站即可找到许多计算器程序。
希望对你有帮助！

‘肆’ 怎样学习卡西欧5800编程啊

1，一般5800自带的程序，说明书里都有说明，研究一下就知道了。
2，但,要用到别的程序，比如道路坐标计算、道路高程之类的程序，就要需要编程，编好后，直接运行主程序就OK了。
3，如想知道如何更进一步编程，请另外向高手提问。
【资料】
《卡西欧fx-5800P计算器与道路施工放样程序》详细介绍了卡西欧fx-5800P编程计算器的基本操作、编程方法与技巧，汇总了道路坐标计算的相关
计算理论和公式，编制了分别适用于道路主线、立交匝道的平面坐标放样计算程序，以及一套比较实用的道路施工放样综合程序。书中的程序吸收了目前最新的编程
方法与技巧，内容从易到难、从简到繁，程序功能从单一到综合，层层递进。书中最后的道路施工放样综合程序已经具备了路线三维参数查询、坐标反算、平面放样
计算、路基填挖施工放样计算、隧道超欠挖计算等多种功能，适用于道路、立交匝道、桥梁涵洞、隧道以及其它道路构造物的现场放样计算。

‘伍’ 卡西欧5800测量程序

可以登陆亦文轩文具网免费下载测量程序

Fx-5800价格和fx-4850相当，但程序不能共享，Fx-5800的编程语言更接近BASIC程序语言。
2、5800变量输入语句改为?，赋值语句改为—＞。程序中和1850一样，除可以使用26个字母变量A~Z存储数据和独立于字母变量存储器的额外变量存储器Z[1]，Z[2]，Z[3]，Z[4]……外，另外可以使用统计串行存储器List X，List Y，List Freq。
3、程序命令由4850的16个增加到了34个，取消了⊿、≠=>、｛｝命令，使得由⊿、≠=>、｛｝等重要程序命令构成的fx-4850程序无法在5800上运行。
同时，5800的条件语句修改为更易于使用的If~Then~Else~IfEnd形式，新增For~To~Step~Next循环、条件循环Do~LpWhile与While~WhileEnd语句。
4、5800增加了数据通讯功能，使用SB-62数据线连接好两台机器的3Pin通讯口可方便地传输程序与数据，避免了4850只能以手工输入的方式录入程序，容易出现程序输入错误的弊端。
5、5800有矩阵计算功能，可以编写严密平差程序时组成与解算法方程，能够满足测量专业测量平差编程的计算要求。同时字母变量除了可以输入26个大写英文字母外，还能用小写英文字母、希腊字母。
现在购买的可以送大礼包，
FX-5800P计算器大礼包说明：
1.FX-5800P计算器
2.SB-62(与fx-5800配套进口的数据线)
3.<<casioFX-4800P/4850P与FX-5800P编程计算器功能比较与程序转换>>覃辉编着 同济大学出版社（与书配套程序）全路段主线坐标正反算（正交/斜交）
匝道全段坐标正反算（正交/斜交) 全路段中边桩高程（带超高，加宽）
有电子版的范例，初学者使用简单，快捷.让你短时间成为一个熟练的测量者
4.FX-5800P与FX-4800P/FX-4850P语言的对比及特点说明

‘陆’ 卡西欧5800计算器如何编程

公路平/竖曲线放样、坐标反算桩号GL.3－25PHF程序fx-5800p
F1 GL.3－25PHF （K+，XY ≠ 0?）输入其他进入反算。输入0时进入测站点、后视点坐标(X0,Y0,H0)、(X1,Y1)输入及两点距离(D0)、方位角(T0)输出。H0=0时，不计算竖曲线。
L1 Z［1→Q:Lbl 8:“GL.3-25PHF=”？Q:Q→Z［1］:IF Q<3 Or Q>25:Then Goto 8:IfEnd:0→V:0→N:“K，X≠0”？V:V≠0=>Goto 0:“X0”？C:“Y0”？D:“H0”？H:“X1”？E:E－C→I:“Y1”？F:F－D→J:Prog“1”:“T0O=”:J▲DMS◢“D0=”:I◢ 放样点桩号(Kp+)斜交角(ApO)距离(Sp)输入 143
L2 Lbl 0:Z［1→Q:If V=0:Then 90→Z:“Kp+”？K:“ApO”？Z:“Sp”？B:Goto 4:IfEnd:If N≠－2:Then“Xp”？C:“Yp”？D:1T→P:1→G:IfEnd:Lbl 7:C－Z［4+G→I:D－Z［Q+4+G→J:Prog“1”:If N=－2:Then I→P:J→Z:G→B:Goto 4:IfEnd:If P－I>0:Then I→P:J→Z:G→B:IfEnd:If G<Q-2:Then G+1→G:Goto 7:IfEnd:Lbl 4:1→G:Z［3］→W:Lbl 5:Z［1→Q
L3 Q-2→N:Z［3→A:Z［4+G→X:Z［Q+4+G→Y:Z［2Q+3+G→R:R=0 =>1μ→R:Z［3Q+1+G→L:Z［3+G］－X→I:Z［Q+3+G］－Y→J:Prog“1”:J→O:Z［5+G］－X→I:Z［Q+5+G］－Y→J:Prog“1”:J→U:Prog“P”
L4 If V≠0:Then If G<B:Then G+1→G:W+I－2T+S→W:Goto 5:IfEnd:Prog“F”:Goto 0:IfEnd:N=0=> Goto 0:N=－1=>Goto 5:H=0=>Goto 0:1→G:Lbl 6:Z［1→Q
L3 Q-2→N:Z［4Q+1→A:Z［4Q+G→W:Z［5Q+G→U:Z［6Q-1+G→R:Z［5Q-1+G］－U→I:Z［4Q-1+G］－W→J:Prog“1”:J→O:Z［5Q+1+G］－U→I:Z［4Q+1+G］－W→J:Prog“1”:Prog“H”:N=－1=>Goto 6:Goto 0
F2 CS.3－25PHF （参数输入完成时，可取消此子程序） I?输入0时进入转点号N?(N－P为平曲线、N－H为竖曲线，均输入1至8、15、25的整数)及其参数的输入(平曲线K?、X?、Y?、R？、L?)、（竖曲线K?、H?、R?）输入桩号、坐标或高程、园半径、缓和曲线长度。
L1 ？I:If I=0:Then 172→DimZ:1→N:IfEnd:Z［1→Q:Lbl 8:“GL.3-25PHF=”？Q:Q→Z［1］:IF Q<3 Or Q>25:Then Goto 8:IfEnd:While N≤Q:“N－P”？N:N＞Q=>Goto 1:If N=2:Then ？K:K→Z［3］:IfEnd:？X:X→Z［3+N］:？Y:Y→Z［Q+3+N］:N=1 Or N=Q=>Goto 0:？R:R→Z［2Q+2+N］:？L:L→Z［3Q+N］:Lbl 0:WhileEnd:Lbl 1:1→N
L2 While N≤Q:“N－H”？N: N＞Q=>Goto 8:？K: K→Z［4Q-1+N］:？H:H→Z［5Q-1+N］:N=1 Or N=Q=> Goto 2:？R:R→Z［6Q-2+N］:Lbl 2:WhileEnd
F3 P
L1 Prog“2”:If M=180:Then 0→T:Goto 1:IfEnd:L÷2－L^3÷240÷R2+(L2÷24÷R+R)tan(.5M→T:Lbl 1:RMπ÷180+L→S:V≠0=>Goto 0:If K<A－T:Then“K+!”:K◢0→N:Goto 0:IfEnd:If G≥N And K>W－T+S:Then“K+!”:K◢0→N:Goto 0:IfEnd:If K>W－T+S:Then G+1→G:W+I－2T+S→W:－1→N:Goto 0:IfEnd:Prog“5” 警告桩号(K+!)的输入已超出范围。 测站点、放样点间的距离(Dp)、方位角(TpO)输出。放样点的坐标(Xp,Yp,Hp0)输出。
L2 X+TA－MA+NJ→X:Y +TJ－MJ－NA→Y:X－C→I:Y－D→J:Prog“Z1”:“TpO=”:J▲DMS◢“Dp=”:I◢“Xp”:X◢“Yp”:Y◢1→N:Lbl 0
F4 1
L1 If I=0 And J=0:Then 180→J:Else Pol(I,J:J<0=>J+360→J:IfEnd
F5 2
L1 O－J→M:M<0=>M+360→M:If M<180:Then 180－M→M:1→Q:Else M－180→M:－1→Q:IfEnd
F6 3
L1 90(2I－L)÷π÷R→A:RsinA+L÷2－L∧(3)÷240÷R2→M:L2÷24÷R+R(1－cosA→N:A－J→A:M－QBcosA→M:QN－BsinA→N
F7 4 (缓和段计算：可适当选取2至6项，当无缓和曲线时，可仅选1项，以减少字节。)
L1 RL→A:I－I∧(5)÷40÷A2+ I∧(9)÷3456÷A∧(4)－I∧(13)÷599040÷A∧(6)+I∧(17)÷175472640÷A∧(8)－I∧(21)÷78033715200÷A∧(10→M
L2 I∧(3)÷6÷A－I∧(7)÷336÷A∧(3)+I∧(11)÷42240÷A∧(5)－I∧(15)÷9676800÷A∧(7)+I∧(19)÷350096640÷A∧(9)－I∧(23)÷1880240947200÷A∧(11→N: 90I2÷π÷A－J→A:M－Qbcos(A→M:QN－Bsin(A→N
F8 5
L1 K－W+T→I:Z→J:If I<S－L:Then If I≤0:Then I+Bcos(Z→M:BsinZ→N:Goto 2:IfEnd:Q=1=>180－Z→J:If I≤L:Then Prog“4”:Else Prog“3”:IfEnd:Lbl 2:O→J:Goto 3:IfEnd:S－I→I
L2 If I≤0:Then I－Bcos(Z→M:－Bsin(Z→N:Else Q≠1=>180－Z→J:Prog“4”:－N→N:IfEnd:U→J:Lbl 3:cos(J→A:sin(J→J
F9 H （不需要计算中桩高程时，可取消此子程序） 警告桩号(K+!)的输入已超出范围
L1 Prog“2”:If M=180:Then 0→T:Goto 1:IfEnd:Rtan(.5M→T:Lbl 1:If K< Tsin(O+A:Then“K+!”:K◢Goto 0:IfEnd:If G≥N And K>W－Tsin(O:Then“K+!”:K◢Goto 0:IfEnd:If K>W－Tsin(O:Then G+1→G:－1→N:Goto 0:IfEnd
L2 U+Tcos(O+Rcos(O－90Q→M:W+Tsin(O+Rsin(O－90Q→N:K－W－Tsin(O→L:If L≤0:Then U+(T+L÷sin(O))cos(O→H:“Hp0=”:H◢Goto 0:IfEnd:M+Q√(R2－(K－N)2)→H:“Hp0=”:H◢Lbl 0 中桩高程输出（Hp0=）
F10 F （不需要反算时，可取消此子程序） 转点半径为0时可能输出的两种桩号、偏离距离（K1+=、K2+=、Sp1=、Sp2=）情况
L1 Z－O→I:U－Z→J:IF Abs(I≤90:Then If T≤Pcos(I:Then W－Pcos(I→K:－Psin(I→B:If Abs(J≥90:Then Goto 9:Else“K1+=”:K◢“Sp1=”:B◢IfEnd:IfEnd:IfEnd:IF Abs(J≤90:Then If T≤Pcos(J:Then W－2T+S+ Pcos(J→K:－Psin(J→B:If Abs(I≥90:Then Goto 9: Else“K2+=”:K◢“Sp2=”:B◢Goto 0:IfEnd:IfEnd:IfEnd:If Pol(C－X－Tcos(O)，D－Y－Tsin(O))<Pol(C－X－Tcos(U)，D－Y－Tsin(U)):Then－1→H:Else 1→H:IfEnd:(R+L2÷24÷R)÷cos(.5M→N:O－Q(90－.5M→J:C－X－Ncos(J→I:D－Y－Nsin(J→J:Prog“1”
L2 cos-1((I2+N2－P2)÷2÷I÷N→N:If N≤.5M－90L÷π÷R:ThenW－T+.5S+HπNR÷180→K:Q(R－I→B:Goto9:IfEnd:If L=0:Then－2→N:G+H→G:Goto 0:IfEnd:“Z.H.Y－100!－Y.H.Z”◢0→B:0→Z警示准备进入缓和段的桩号反算，计算约需100秒。
L3 If H=－1:ThenW－T→E:E+L→G:ElseW－T+S→E:E－L→G:IfEnd:Lbl8:Z+1→Z:(E+G)÷2→F:Z=1=>E→K:Z=2=>F→K:Z=3=>G→K:Prog“5”
L4 C－X－TA+MA－NJ→I:D－Y－TJ+MJ+NA→J:C－I→M:D－J→N:Prog“1”
L5 If Z=1:Then I→P:Goto 8:IfEnd:If Z=2:Then I→V:Goto 8:IfEnd:If Abs(E－G>1μ:Then If P>V And P>I:then F→E:0→Z:Goto 8:IfEnd:If I>P And I>V:Then F→G:0→Z:Goto 8:IfEnd:IfEnd:F→K:I→B:J→V
L6 If H=－1:Then X+Tcos(O)－M→I:Y+Tsin(O)－N→J:Else X+Tcos(U)－M→I:Y+Tsin(U)－N→J:IfEnd:Prog“1”:J→O:V→J:Prog“2”:－HQB→B:Lbl 9:“K+=”:K◢“Sp=”:B◢N=0:Lbl 0 反算桩号、偏离距离输出（K+=、Sp=）

全站仪后方交会（两已知点，任意设站，观测两边多余一角可计算测站点坐标）
F D1�6�1D2–XY
L1 “X1”？C:“Y1”？D:“X2”？E:“Y2”？F:(E–C）2+（F–D）2→M:“D1”？S:T“D2”:“Ap°”？U
L2 cos -1（（M+S 2–T 2）÷2÷S÷√(M→V:cos -1（（M+T 2–S 2）÷2÷T÷√(M→W
L3 180–U–V–W→P:If Abs(P≥0°0°30°:Then“Μp°！”:P▲DMS◢IfEnd:1÷tan（V→V:1÷tan（W→ W
L4 （CW+EV+D–F）÷（V+W→X:（DW+FV+E–C）÷（V+W→Y:“Xp=”:X◢“Yp=”:Y
两线交点、坐标变换
F L×L�6�1XY–AB
L1 “0–1–2=>L×L�6�1X–A�6�1A–X”？I:If I=0:Then Lbl 0:“XA-1”？C:“YA-1”？D:“XA-2”？E:“YA-2”？F:C–E→K:D–F→L:“XB-1”？O:“YB-1”？P:“XB-2”？Q:“YB-2”？R:O–Q→M:P–R→N
L2 （K（OR–QP）–M（CF–ED））÷（ML–KN→X:“Yp”:（LX+CF–ED）÷K→Y:“Xp”:X◢“Yp”:Y◢Goto 0:IfEnd
L6 If I=1:Then“X0”？C:“Y0”？D:“T°=”？J:Lbl 1:“Xp=”？E:“Yp=”？F:（E–C）cos(J)+（F–D）sin(J)→A:（F–D）cos(J)–（E–C）sin(J)→B:“Ap=”:A◢“Bp=”:B◢Goto 1:IfEnd
L7 If I=2:Then:“X0”？C:“Y0”？D:“T°=”？J:Lbl 2:E“Ap=”:F“Bp=”:C+Ecos(J)–Fsin(J→X:“Xp=”:X◢D+Esin(J)+Fcos(J→Y:“Yp=”:Y◢Goto 2:IfEnd
坡顶开挖线放样程序
F P�6�1D�6�1×–– H0、H0×为任意点（下点）的设计、地面高程，S0×、H1δ为坡度方向到另外1点（上点）的距离、高程，i设计的坡度，上点平移⊿Sp距离后到达坡顶开挖线。
L1 “H0=”？H:“H0×=”？M:“S0×=”？P:“H1δ=”？N:“i=”？I:P（（M–H）÷（M–N+P×I）–1→S:B=P+S:“◢Sp=”:S
地形图等分线程序
F H1-0�6�15-H2
L1 Lbl 0:“H1”？A:“H2”？B:“S0”？S:（A–B）÷S→K
L2 10A–10 Int A→L:If L-5≥0:Then L–5→L:0.1L÷K→E:“S1=”:E◢0.5÷K→F:“Sn=”:F◢Int（KS÷0.5→G:“N=”:G◢Goto 0:IfEnd
方格网4点求格交点高程程序
F H1-H4�6�1�6�1S0-3
L1 “H1”？A:“H2”？B:“S01”？K:“SP1”？L: A+(B-A)L÷K→E:“H3”？C:“H4”？D:“S02”？M:“SP2”？N: C+(D-C)N÷M→F:“S03”？O:“SP3”？P:E+(F-E)P÷O→H:“H=”:H

方格网2点求格交点高程程序
F H1－H2�6�1�6�1S0－2
L1 “H1”？A:“H2”？B:“S0”？L:“S1”？M:A+(B-A)M÷L→H:“H=”:H

‘柒’ 卡西欧计算器5800P如何编程

把函数解析发给你看看吧

1.
Norm 1 指数显示
Norm 2 小数显示

2.
?→x 只显示 ？
字符+?→x 显示 字符+？

？x 显示 x?
“字符”？x 显示 字符+？

有→则不显示该变量当前值

3.（判断表达式） 语句1 : 语句2。。。
如果判断表达式为真（或非零），则不跳过语句1.
如果判断表达式为假（或是零），则会跳过语句1.

4. If...then…else…ifend

如果语句为真，则执行then（不执行else）,然后执行ifend.
如果语句为假，则执行else（不执行then）,然后执行ifend.

5. Break 中断语句

中断For，Do，While循环，并从该循环的下个命令起继续运行

6. Dsz

使控制变量递减一，在变量的值为零时执行转移

7. Isz
Isz<变量>:<语句1> <语句2>，变量应为A~Z
以 1 为增量逐次增加变量的值，当变量的值不等于0 时，执行语句1，否则执行语句2

8. Cls
Dsz<变量>:<语句1> <语句2>。变量应为A~Z。
以1 为减量逐次减小变量的值，当变量的值不等于0 时，执行语句1，否则执行语句2
9. Locate 定位显示语句

句法 1：Locate <列数>, <行数>,<数值>
句法2：Locate <列数>, <行数>,<表达式>
句法3：Locate <列数>, <行数>, "字符串"
fx-5800P 的屏幕最多可以显示4 行、16 列字符，因此定位语句中的列数值应为大于等于1、小于等于16 的整数，行数值应为大于等于1、小于等于4 的整数。

10. Lbi n ~ Goto n Goto n~Lbl n

无条件转移至 Lbi n 位置

11. Getkey

返回与上次按键相对应的代码,Getkey=

12. DO ~ LpWhile循环语句

Do <语句块> LpWhile<条件>
先执行语句块，然后测试条件，条件为真时重复执行语句块，否则执行<条件>后的语句。无,论条件是否为真，语句块至少被执行一次。

13. Pol
计算两坐标点之间距离,坐标为（4，4）,与原点的距离就是POL（4，4）=4√2
14. Abs
求绝对值
15. Fix
取整数函数Fix(Rnd*11) ,取0 ~ 11的随机整数
16. Rnd
随机函数
17. 角度单位设置语句
Deg：设置角度单位为十进制度，按 键输入Deg。执行该语句后，状态行显示。
Rad：设置角度单位为弧度，按 键输入Rad。执行该语句后，状态行显示。
Grd：设置角度单位为哥恩，按 键输入Grd。执行该语句后，状态行显示。
18. Dim
定义变量
19. RCL
键面命令，Rcl+A 显示变量A的当前值
20. STO
键面命令,STO+A 给变量A赋值，显示→A
21. INS
键面命令,切换键标记样式，覆盖与插入切换
22. ←
键面命令，角度度分秒格式与小数格式转换
23. ▶DMS
常将反三角函数计算出的十进制角度转换成六十进制度分秒形式，cos-1(x)▶DMS
24. Pol
键面命令，将直角坐标转换为极坐标，Pol（△x,△y）
25. Rec
键面命令，将极坐标转换为直角坐标，Rec(r,θ)
26. CALC
键面命令，对一个表达式的变量代入不同的值
27. And，Or，Not
<条件1>And<条件2>，<条件1>与<条件2>同时为真时为真。
<条件1>Or<条件2>，<条件1>与<条件2>有一个为真时为真。
Not<条件>，<条件>为假时为真。

28. If~Then~Else~IfEnd

句法1：If <条件> Then <语句块>IfEnd
条件为真时执行Then 后的语句块，否则从IfEnd 后开始执行
句法2：If <条件> Then <语句块1>Else<语句块2>IfEnd
条件为真时执行语句块1，否则执行语句块2，然后执行IfEnd 后的语句
29. For~To~Step~Next
句法1：For <始值> <控制变量>To<终值> <语句块> Next控制变量的取值从始值开始，步长为1，重复执行语句块，直至终值为止。一般始值小于终值，如果始值大于终值，则不执行语句块而是直接执行Next 后的语句。
句法2：For <始值> <控制变量>To<终值>Step<步长> <语句块> Next
它与 For~To~Next 句法的功能相同，唯一区别是增加了步长语句Step

30. While~WhileEnd 循环语句
句法：While <条件> <语句块>WhileEnd
先测试条件，当条件为真时执行语句块，然后再测试条件，条件为真时重复执行语句块，直到,条件为假时执行WhileEnd 后的语句结束循环

31. Prog~Return 调子程序语句

句法：Prog "subfilename"
按键 输入Prog。
fx-5800P 的子程序是独立于主程序的程序，它也保存在计算器内存中，主程序与子程序的变量都是全局的，子程序执行完成后通过Return 语句返回主程序，继续执行主程序中Prog 语句后的语句.

32. Return 返主程序语句

在子程序中应至少有一条Return 语句，当执行到该语句时，控制执行返回调用该子程序的主程序。主程序中一般不应有Return 语句，若在主程序中使用了Return 语句，程序执行到该语句时会停止执行。

33.Stop 终止程序语句

程序被Stop 语句终止后就不再执行任何语句，通常用于调试程序设置临时中断点，程序调试通过后，将其删除。

34. 清除语句
① Cls：清除屏幕显示的文字、表达式及计算结果。
② ClrStat：清除统计串行List X，List Y，List Freq。
③ ClrMemory：清除字母变量A~Z 与数值答案寄存器。
④ ClrMat：清除矩阵Mat A~Mat F 与矩阵答案寄存器Mat Ans
的内容与维数。
⑤ ClrVar：清除内置公式变量及用户自定义公式变量的值。
其中后四个语句为按 (CLR)键调出清除语句菜单选择。
额外变量 Z[n]的数值没有专门的语句命令清除，只能执行语句0 DimZ 清除。

35. 数值显示格式设置语句
Fix <n>：n 为0~9 间的整数，设置以n 位固定小数格式显示计算结果，按键输
入Fix。执行该语句后，状态行显示FIX。
Sci <n>：n 为0~9 间的整数，设置以n 位固定小数科学格式显示计算结果，按键
输入Sci。执行该语句后，状态行显示SCI。
Norm <n>：n 为1 或2，设置以正常格式显示计算结果，按键输入Norm。
ENG：其下有EngOn 与EngOff 两个语句，EngOn 为打开工程格式显示；按
键输入EngOn，执行该语句后，状态行显示ENG；EngOff 为关闭工程格式显示，按
键输入 EngOff，执行该语句后，状态行的ENG 消失。

36. END

结束程序运行