例6.5: 輸入3個整數(shù)、按從大到小的順序輸出?!?/font>
算法:
(1)先將a與b比較,把小者放b中,大者放a。
(2)再將a與c比較,把小者放c中,大者放a中,此時 a 已是三者最大的。
(3)最后將b與c比較,大者放b中,小者放c中,此時 a、b、c已按從大到小的順序排例好。
程序:
inpnt "a,b,c,=";a,b,c
if b>a then
t=a
a=b 交換a、b(swap a,b)
b=t
end if
if c>a then
t=a
a=c 交換a、c(swap a,c)
c=t
end if
if c>b then
t=b
b=c 交換b、c (swap b,c)
c=t
end if
print a, b,c
end
3、塊if的嵌套
if then
…
if then
…
else
…
end if
…
else
…
end if
4、塊IF中的ELSEIF格式
if then
…
else
if then
…
else
…
end if
end if
寫成: if then
…
elseif then
…
else
…
end if
P125 改寫為:
Input "m=";m
If m<100 then
d=0
elseif m<200 then
d=0.01
elseif m<300 then
d=0.02
elseif m<500 then
d=0.03
elseif m<1000 then
d=0.04
elseif m<2000 then
d=0.05
else
d=0.08
end if
a=m*(1-d)
print "amount=";a
end
五、多分支選擇語句
用嵌套的IF語句可實現(xiàn)多分支選擇
1、基本格式
select case <變量>
case <值1>
<語句組1>
case <值2>
<語句組2>
…
case <值n>
<語句組n>
case else
<語句組n+1>
end select
每一個CASE句中指定一個值條件,當(dāng)CASE變量的值符合條件時,執(zhí)行該子句下面的語名組,在執(zhí)行完該語句組后,跳過其它CASE子句,從END SELECT轉(zhuǎn)出?! ?nbsp;
c=int(s/250)
2、在CASE子句中使用TO
CASE <值1> TO <值2>
3、在CASE子句中使用IS
CASE IS <關(guān)系運算符> <表達(dá)式>
4、在CASE子句中使用多個條件
允許在一個CASE子句中指定多個條件,各條件 之間用逗號分開。
條件=單值、值范圍、單條件
5、SELECT CASE語句的一般格式
select case <測試表達(dá)式>
case <條件11>,<條件12>,…
<語句組1>
case <條件21>,<條件22>,…
<語句組2>
…
case <條件n1>,<條件n2>,…
<語句組n>
case else
<語句組n+1>
end select
六、多分支轉(zhuǎn)移語句
格式:ON <算術(shù)表達(dá)式> GOTO <標(biāo)號1>,<標(biāo)號2>,…
七、多分支選擇結(jié)構(gòu)小結(jié)
1、IF-THEN-ELSE(用IF的嵌套)
分支(條件)較少時使用?!?/font>
2、SELECT CASE
分支(條件)較多時使用。
3、ON GOTO
非結(jié)構(gòu)化程序設(shè)計,不宜使用。