高中信息技術(shù)選修1：算法與程序設(shè)計(jì) 2.3 程序的選擇結(jié)構(gòu)

程序與設(shè)計(jì)第二章程序的選擇結(jié)構(gòu)程序的選擇結(jié)構(gòu)

程序流程有三種最基本的控制結(jié)構(gòu)，即順序結(jié)構(gòu)、選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu)。在一個(gè)過程中，程序通常是按照由上而下的順序來執(zhí)行各個(gè)語句的，直到整個(gè)過程結(jié)束。引入選擇結(jié)構(gòu)，它可以改變程序執(zhí)行的流程。第二章選擇結(jié)構(gòu)條件語句

雙分支語句多分支語句(SelectCase)程序的選擇結(jié)構(gòu)條件語句單行(IF-THEN-ELSE)塊結(jié)構(gòu)(IF-THEN-ELSE-ENDIF)VB中的選擇語句有：單分支語句：IFTHEN語句組1語句組1語句組2單分支語句選擇結(jié)構(gòu)（雙分支）是否條件成立嗎程序的選擇結(jié)構(gòu)條件語句條件成立嗎是否Ifyouenjoyrunningeverymorning,thenpleaseputyourrighthand,elsepleaseputyourlefthand.

If條件Then語句組1Else語句組2

或

If條件Then

語句組1Else

語句組2Endif條件語句的基本格式是：程序的選擇結(jié)構(gòu)條件語句程序的選擇結(jié)構(gòu)關(guān)系運(yùn)算符符號(hào)：

<小于>大于>=大于等于

<=小于等于=等于<>不等于

適用的類型和結(jié)果類型：

關(guān)系運(yùn)算符適用于數(shù)值型、字符型、日期型和邏輯型數(shù)據(jù)，結(jié)果只能為邏輯型（真值True和假值False）運(yùn)算符兩側(cè)必須是同類型的量或表達(dá)式若判斷的結(jié)論是成立，則結(jié)果為邏輯真值(True)，否則為邏輯假值(False)條件語句程序的選擇結(jié)構(gòu)邏輯運(yùn)算符符號(hào)：

NOT

(邏輯非)

AND

(邏輯與)即：并且，要同時(shí)成立

OR

(邏輯或)即：或者，只要有一個(gè)成立適用的類型和結(jié)果類型：只適用于邏輯型數(shù)據(jù),其值也是邏輯型。規(guī)則：非運(yùn)算的規(guī)則是：直接求反即可與運(yùn)算的規(guī)則是：只有二者全為真時(shí)結(jié)果為真，否則為假或運(yùn)算的規(guī)則是：只有二者全為假時(shí)結(jié)果為假，否則為真邏輯值A(chǔ)邏輯值BNOTAAANDBAORBTTFTTTFFFTFTTFTFFTFF條件語句程序的選擇結(jié)構(gòu)條件語句運(yùn)算符的優(yōu)先順序算術(shù)運(yùn)算關(guān)系運(yùn)算邏輯運(yùn)算設(shè)變量x=4，y=-1，a=7.5，b=-6.2，求表達(dá)式

x+y>a+bAndNoty<b的值

當(dāng)條件中只有邏輯運(yùn)算符時(shí)，運(yùn)算的順序?yàn)椋篘otAndOr條件語句Truetruetrue程序的選擇結(jié)構(gòu)條件語句程序的選擇結(jié)構(gòu)條件語句輸入a,b兩個(gè)數(shù)，若a<b,則輸出a,否則輸出b。

Dimaassingle,bassinglea=inputbox(“a=”,“輸入”)b=inputbox(“b=”,”輸入”)Ifa<bthenprintaelseprintbendifEndsub任務(wù)一：已知三角形的三條邊分別為a,b,c,請(qǐng)完善求三角面積的程序。Dimaassingle,bassingle,cassingle,sassinglea=val(inputbox(“a=”,“a邊”))b=val(inputbox(“b=”,“b邊”))c=val(inputbox(“c=”,“c邊”))If_______thenp=(a+b+c)/2s=sqr(p*(p-a)*(p-b)*(p-c))print“該三角形面積s=”;s_______Print“不能構(gòu)成三角形”

_______Endsub任務(wù)二：

a=9Ifamod3=0thens=a*aElses=sqr(a)EndifPrint“s=”;sA3B9C63D81程序的選擇結(jié)構(gòu)條件語句程序的選擇結(jié)構(gòu)任務(wù)三：新華書店推進(jìn)促銷活動(dòng)，所有購書打8折，如果購書價(jià)格達(dá)到200元（含），在8折基礎(chǔ)上再打95折。請(qǐng)同學(xué)們用vb編寫一個(gè)計(jì)算應(yīng)付款的程序。運(yùn)行該程序，輸入購書總價(jià)，通過促銷后計(jì)算出應(yīng)付的購書金額。條件語句條件語句程序的選擇結(jié)構(gòu)privatesubcommand1-click()a=inputbox(“a=”,“購書總價(jià)”)Ifa>=200thenb=a*0.8*0.95elseb=a*0.8endifPrintbEndsub條件語句程序的選擇結(jié)構(gòu)輸入一個(gè)年份，編寫判斷是否為閏年的程序。DimNAsIntegerN=InputBox(“N=","閏年")