CASIO-fx45000PA通過(guò)編寫(xiě)簡(jiǎn)單的程序來(lái)將計(jì)算過(guò)程簡(jiǎn)化。其算法就是將現(xiàn)成公式堆積，我們可以應(yīng)用條件語(yǔ)句要將整個(gè)曲線統(tǒng)一成一個(gè)程序。賽維測(cè)繪將分享幾個(gè)常用的編寫(xiě)程序幫助大家提高工作效率，關(guān)注收藏了解更多內(nèi)容。

CASIO- fx4500PA計(jì)算器條件語(yǔ)句

格式： a<條件判斷符>b = >語(yǔ)句1：≠＞語(yǔ)句2 ：△ 語(yǔ)句3示例1：已知兩點(diǎn)坐標(biāo)求方位角（取值范圍在0°—360°之間）

源程序：

L1 A”X1”:B”Y1”:C”X2”:D”Y2”

L2 E=C-A: F=D-B：I=tan-1(F/E)

L3 E>0 = > I=I: ≠＞I=I+180

L4 I>0 = > I=I: ≠＞I=I+360

用戶在使用時(shí)，可以根據(jù)提示輸入數(shù)據(jù)便可得出方位角(本程序已調(diào)試成功)。

循環(huán)語(yǔ)句的使用

CASIO 源程序中很出現(xiàn)循環(huán)語(yǔ)句，這是因?yàn)镃ASIO 中沒(méi)有提供現(xiàn)成的循環(huán)語(yǔ)句但我們可以將條件語(yǔ)句與無(wú)條件注意語(yǔ)句相配合形成一句循環(huán)語(yǔ)句。已知：水準(zhǔn)點(diǎn)高程、以及各次讀數(shù)。

源程序：

L1 A”SZDGC”:B”HS”

L2 Y =A+B/1000:Z=0

L3 LBI 0

L4 Z=Z+1▲{D}:D”DS”

L5 H=Y-D/1000▲

L7 Z=15=>GOTO 1:≠＞GOTO 0

L8 LBI 1

L9 {D}:D”DS: Y= H+D/1000: Z=0:GOTO 0

用戶在使用時(shí)可以按照提示輸入數(shù)據(jù)即可得到所要數(shù)據(jù)（讀數(shù)輸入時(shí)單位為毫米）。

無(wú)條件轉(zhuǎn)換語(yǔ)句

已知： 曲線半徑 R 切線長(zhǎng) T 曲線長(zhǎng) L 、緩和曲線長(zhǎng) l0、曲線偏角I（左偏還是右偏），以及曲線起點(diǎn)（ZH）里程和曲線上任意一點(diǎn)的里程。

源程序如下:

L1 R“R”：T“T”：L“L”M“L0”：I“PJ”：Z“ZH”：K“RYD“ :A

L2 S=K-Z

L3 S<M => GOTO 0:≠＞S<(L-M) => GOTO 1:≠＞GOTO 2:

L4 LBI 0

L5 N=M : GOTO 3:

L6 LBI 1

L7 N=S-M: P=M^2/(24R): Q=M/2-M^3/(240R):

J=(2*S-M)*90/(R*π)

L8 X=R*SINJ+P :Y=-(R*(1-COSJ)+Q)

L9 LBI 2

L10 N=L-S :GOTO 3:

L11 LBI 3

L12 C=RM: U=N-N^5/(40C^2)+N^9/(3456C^4):

V=N^3/(6C)-N^7/(336C^3)+N^4/(42240N^5)

L13 N=S => X=U:Y=-V:≠＞X=T*(1+COSI)+U*COSI-V*SINI:Y=-TSINI+XSINI+YCOSI

L14 A=1 => X=X▲Y=Y▲≠＞X=X▲Y=-Y

說(shuō)明: 用戶在使用時(shí)即可按提示輸入數(shù)據(jù)即可得到數(shù)據(jù)。左偏曲線A 輸入1, 右偏曲線輸入非1。如要求用統(tǒng)一坐標(biāo)計(jì)算可以加入下面一句程序：

L15 U”X”=C“X1“+X*COSB-Y*SINB▲

V”Y”=D”Y1“+X*SINB+Y*COSB