高中信息技術(shù)習(xí)題.doc

一、選擇題（每題2分，共15題，總分30分）1、利用計(jì)算機(jī)解決問(wèn)題的一般過(guò)程描述，以下哪中說(shuō)法正確：（C）A、編寫(xiě)程序調(diào)試程序分析問(wèn)題設(shè)計(jì)算法B、分析問(wèn)題編寫(xiě)程序調(diào)試程序設(shè)計(jì)算法C、分析問(wèn)題設(shè)計(jì)算法編寫(xiě)程序調(diào)試程序D、分析問(wèn)題設(shè)計(jì)算法調(diào)試程序編寫(xiě)程序2、用來(lái)描述算法的方法，不包括以下哪一種：（D）A、自然語(yǔ)言 B、流程圖 C、偽代碼 D、方程式3、以下的哪一種基本結(jié)構(gòu)不被包括在程序的基本結(jié)構(gòu)里面（B）A、順序 B、分支 C、選擇 D、循環(huán)4、程序設(shè)計(jì)語(yǔ)言的產(chǎn)生與發(fā)展所經(jīng)歷的過(guò)程不包括以下的哪項(xiàng)：（C）A、機(jī)器語(yǔ)言 B、匯編語(yǔ)言 C、初級(jí)語(yǔ)言 D、高級(jí)語(yǔ)言5、利用basic語(yǔ)言編寫(xiě)的程序源代碼文件名后綴為：（A）A、.BAS B、.CPP C、.TXT D、.DOC6、下面數(shù)據(jù)屬于字符串常量的是:(B )A、abcd B、“abcd” C、abcd D、ab-cd7、一個(gè)算法所具有的五個(gè)方面的重要特征里，下列哪一項(xiàng)是不必須的：（A ）A、輸入 B、確定性 C、有窮性 D、輸出 E、能行性8、下列哪種格式為VB程序設(shè)計(jì)中常量說(shuō)明的正確格式：（D ）A、const 常量名 as 類(lèi)型 B、dim 常量名 as 類(lèi)型C、dim 常量名 as 類(lèi)型=表達(dá)式 D、const 常量名 as 類(lèi)型=表達(dá)式9、信息的載體是承載信息的事物，如語(yǔ)言、文字聲音、磁盤(pán)等。則下面選項(xiàng)為信息載體的是：（D ） A、 天氣預(yù)報(bào) B、市場(chǎng)價(jià)格 C、電視新聞 D、光盤(pán) 10、關(guān)于信息，下列說(shuō)法錯(cuò)誤的是（D ） A、信息必須依附于載體而存在 B、信息是可以共享的 C、信息是可以處理的 D、信息的價(jià)值不會(huì)改變 11、電子郵箱地址的一般格式是：yournamexx.com,其中yourname是（D）A、網(wǎng)站的計(jì)算機(jī)名 B、主機(jī)名 C、用戶(hù)的計(jì)算機(jī)名 D、用戶(hù)名12、在網(wǎng)絡(luò)時(shí)代，流行著一句時(shí)代用語(yǔ)：“有問(wèn)題，“百度”一下！”，其中“百度”是指的（A ）A、 利用百度搜索引擎在網(wǎng)絡(luò)上檢索信息。 B、 其是一個(gè)很好的投資項(xiàng)目 C、 是一個(gè)專(zhuān)家 D、 是一家理財(cái)公司 13、王剛十一國(guó)慶要出去旅游，他在報(bào)紙上看到將來(lái)十天是陰雨天氣，于是就帶了雨具，可是直到他回到家也沒(méi)有下過(guò)雨。當(dāng)他又拿起那張報(bào)紙仔細(xì)看時(shí)才發(fā)現(xiàn)自己所看的是去年國(guó)慶期間的報(bào)紙。就信息的特征來(lái)說(shuō)，王剛忽略了信息的什么特征？(B ) A、依附性 B、時(shí)效性 C、價(jià)值性 D、共享性 14、信息采集的工具有很多，下面那個(gè)工具是不包括其中的（D ）A、數(shù)碼相機(jī) B、計(jì)算機(jī) C、照相機(jī) D、收音機(jī)15、計(jì)算機(jī)病毒是：（B ）A、一種生物病毒 B、一組計(jì)算機(jī)有害代碼 C、一種寄生在計(jì)算機(jī)內(nèi)的寄生蟲(chóng) D、一種細(xì)菌 二、判斷題（每題1分，共4題，總分4分）1、 我們可以通過(guò)電子郵箱給遠(yuǎn)方的朋友發(fā)送電子郵件，但是電子郵箱中只能發(fā)送文本而不能發(fā)送圖片。（F ）2、 算法就是用計(jì)算機(jī)求解某一問(wèn)題的方法，是能被機(jī)械地執(zhí)行的動(dòng)作或指令的無(wú)窮集合。（F ）3、 用高級(jí)語(yǔ)言編寫(xiě)的程序必須經(jīng)過(guò)翻譯器將其翻譯成機(jī)器語(yǔ)言，才能在計(jì)算機(jī)上執(zhí)行。（T ）4、 因特網(wǎng)給我們帶來(lái)了大量的信息，這些信息都是可信的，可以直接用。（F ）三、填空題（每空2分，共3空，總分6分）一個(gè)“求半徑為r的圓的面積”的程序如下：private sub command1_click() const pi as single=3.14 dim r as single,s as single r=inputbox(“r=”, “輸入半徑”) s=pi*r*r print “圓的面積s=”;send sub1、由上可以看出，VB的程序一般包含如下部分：數(shù)據(jù)類(lèi)型說(shuō)明部分、數(shù)據(jù)輸入、數(shù)據(jù)處理 、數(shù)據(jù)的輸出部分。2、在以上程序中，“single”為單精度實(shí)型 數(shù)據(jù)類(lèi)型的說(shuō)明符。四、程序補(bǔ)充題（每空2分，共5空，總分10分）1、幾何原理中，歐幾里德闡述了關(guān)于兩個(gè)整數(shù)最大公約數(shù)的計(jì)算過(guò)程，即歐幾里德算法（輾轉(zhuǎn)相除法），其具體過(guò)程如下：以m除以n，令所得的余數(shù)為r。若r=0，則輸出結(jié)果n。否則，繼續(xù)步驟。令m=n，n=r，并返回執(zhí)行步驟繼續(xù)進(jìn)行。設(shè)正整數(shù)m=112，n=64，利用此算法求其最大公約數(shù)的過(guò)程算法如下：（1）112除以64，余數(shù)為48。（2） （3） 答：112和64的最大公約數(shù)為： 2、根據(jù)算法補(bǔ)全VB程序：求解雞兔同籠問(wèn)題：在籠中有雞、兔若干，已知道有頭a個(gè)，有腳b只（4a>=b>=2a>0），求各有多少只雞和兔？算法如下：輸入 a和b的值；求x=2a-b/2；求y=b/2-a；輸出x,y的值；結(jié)束。程序：private sub command1_click()a=inputbox(“a=”,”輸入頭數(shù)”)b=inputbox(“b=”,”輸入腳數(shù)”)_、_、_print “雞數(shù)x=”;x,”兔數(shù)y=”;yend sub一、 單項(xiàng)選擇題（共20個(gè)空，每空2分，共40分）1、 人們利用計(jì)算機(jī)解決問(wèn)題的基本過(guò)程一般有如下五個(gè)步驟（），請(qǐng)按各步驟的先后順序在下列選項(xiàng)（AD）中選擇正確的答案（ B ）調(diào)試程序 分析問(wèn)題 設(shè)計(jì)算法 構(gòu)建數(shù)學(xué)模型 編寫(xiě)程序（A） （B） （C） （D）2、 下列各種基本數(shù)據(jù)類(lèi)型說(shuō)明符中表示整數(shù)型的是（ A ）（A） Integer （B） Boolean （C） Single （D） String3、 下列各項(xiàng)中，合法的變量名是（ C ）（A） &90 （B） abc=9 （C） hello （D） 888.f4、 有兩個(gè)條件P 、Q，只要有一個(gè)條件為真時(shí)，結(jié)果一定為真的是（ C ）。（A）Not P （B）P And Q （C）P OR Q （D）NOT P AND NOT Q5、 下列代數(shù)式的Visual Basic表達(dá)式是（ D ）（A）(x5-cos(29*3.14/180)/(sqr(exp(x)+log(y) +5)（B）(x5-cos(29)/(sqr(exp(x)+ln(y)+5)（C）(x5-cos(29*3.14/180)/(sqr(exp(x)+ln(y)+5)（D）(x5-cos(0.506)/(sqr(exp(x)+log(y)+5)6、 在VB中，表達(dá)式（18+25/3）Mod 5 的值是（ B ）。（A）0 （B）1 （C）2 （D）37、 VB函數(shù)InStr ()檢查是否包含另一子串：含有子串則返回值為子串在父串中第一次出現(xiàn)的位置，不包含子串則返回值為0。InStr("CATbCACBC", "BC")的值為（ C ）（A）0 （B）4 （C）8 （D）18、 VB函數(shù)Right ()從字串右端取部分字串：將某一字串從結(jié)尾開(kāi)始取固定長(zhǎng)度的字串。Right(“Visual Basic 6.0”,6)的值為（ D ）（A）sic 6.0 （B）asic 6.0 （C）Visual （D）ic 6.09、 程序如下：k=20 do while (k=0)k=k+1 loop 以下說(shuō)法正確的是（ C ）（A）do while 語(yǔ)句執(zhí)行了20次； （B） While 循環(huán)是無(wú)限循環(huán)（C）循環(huán)體語(yǔ)句一次也不執(zhí)行 （D） 循環(huán)體語(yǔ)句執(zhí)行一次10、 VB中將兩個(gè)字符串連接起來(lái)的運(yùn)算符有：+和&，那么 ”123”+45結(jié)果是（ A ） （A）168 （B）12345 （C）“123” （D）4511、 已知A，B，C，D是簡(jiǎn)單變量，且都已有互不相同的值，執(zhí)行語(yǔ)句B=8:A=C:D=A:D=B后，其值相等的變量是（ B ）（A）A，D （B）A，C （C）C，B （D）B，A12、 要交換變量A和B之值，應(yīng)使用的語(yǔ)句組是（ B ）（A）A=B:B=C:C=A （B）C=A:A=B:B=C （C）A=B:B=A （D）C=A:B=A:B=C13、 模塊化程序設(shè)計(jì)方法主要通過(guò)（ B ）來(lái)實(shí)現(xiàn)。（A）遞歸算法和遞歸程序 （B）過(guò)程和函數(shù)的定義和調(diào)用（C）程序的循環(huán)結(jié)構(gòu) （D）對(duì)象11、一位愛(ài)好程序設(shè)計(jì)的同學(xué)，想通過(guò)程序設(shè)計(jì)解決“韓信點(diǎn)兵”的問(wèn)題，他制定的如下工作過(guò)程中，更恰當(dāng)?shù)氖牵?C） A、設(shè)計(jì)算法，編寫(xiě)程序，提出問(wèn)題，運(yùn)行程序，得到答案B、分析問(wèn)題，編寫(xiě)程序，設(shè)計(jì)算法，運(yùn)行程序，得到答案C、分析問(wèn)題，設(shè)計(jì)算法，編寫(xiě)程序，運(yùn)行程序，得到答案D、設(shè)計(jì)算法，提出問(wèn)題，編寫(xiě)程序，運(yùn)行程序，得到答案12、交通警察到達(dá)案發(fā)現(xiàn)場(chǎng)，一般按照下列哪種思路開(kāi)展工作（D ）觀察、分析現(xiàn)場(chǎng) 收集必要的信息 進(jìn)行判斷、推理 按一定的方法和步驟解決A、 B、 C、 D、13、下面說(shuō)法正確的是（A ） A、算法+數(shù)據(jù)結(jié)構(gòu)=程序 B、算法就是程序 C、數(shù)據(jù)結(jié)構(gòu)就是程序 D、算法包括數(shù)據(jù)結(jié)構(gòu)14、結(jié)構(gòu)化程序設(shè)計(jì)由三種基本結(jié)構(gòu)組成，下面哪個(gè)不屬于這三種基本結(jié)構(gòu)（B）A、順序結(jié)構(gòu) B、輸入、輸出結(jié)構(gòu) C、選擇結(jié)構(gòu) D、循環(huán)結(jié)構(gòu)三、判斷題（每題1.5分，共21分）1、信息是人類(lèi)社會(huì)的一種資源。 （T ）2、計(jì)算機(jī)書(shū)本中的知識(shí)是信息。 （T ）4、一臺(tái)計(jì)算機(jī)一旦染上病毒，便無(wú)法使用。（F ）5、 Visual Basic是美國(guó)微軟公司于1991年推出的基于Basic的可視化程序設(shè)計(jì)語(yǔ)言。（T ）7、一個(gè)算法可以用多種程序設(shè)計(jì)語(yǔ)言來(lái)實(shí)現(xiàn)。（T ）8、我們常說(shuō)的程序設(shè)計(jì)語(yǔ)言就是程序設(shè)計(jì)。（F）9、控件是應(yīng)用程序的基本元素，與窗體共同構(gòu)成應(yīng)用程序的界面。（T ）11、計(jì)算機(jī)病毒就是一種人為編寫(xiě)的具有破壞性的程序（T）12、Flash、Fireworks、Dreamweaver就是通常所說(shuō)的“網(wǎng)頁(yè)三劍客” （T ）13、在網(wǎng)絡(luò)上，言論是自由的，所以你想說(shuō)什么話都可以。（F）14、電視中播放的奧運(yùn)會(huì)比賽的各國(guó)金牌數(shù)是信息。（T） 一、單選題（每題2分，共40分）1、流程圖中表示判斷框的是（ B ）。、矩形框、菱形框 、圓形框、橢圓形框2、由“上車(chē)掏錢(qián)投幣”所描述的問(wèn)題是（A ）。、無(wú)人售票車(chē)投幣過(guò)程、乘公交車(chē)過(guò)程 、上車(chē)過(guò)程、下車(chē)過(guò)程3、下列給出的賦值語(yǔ)句中正確的是（C ）。A、4 = M B、-M =M C、B=A3 D、x + y = 04、下列Visual Basic中，下列（D ）的表達(dá)式的值不等于4。A、int(4.1) B、Int(4.9) C、Abs(int(-3.9) D、Abs(int(-4.5)5、下列Visual Basic中，下列（C ）類(lèi)型屬于字符串型。A、Integer B、Single C、String D、Boolean6、下列Visual Basic中，下列關(guān)鍵字（A ）用于注釋語(yǔ)句。A、Rem B、End C、Else D、Loop7、假定X是一個(gè)數(shù)值型變量，那么由函數(shù)組成的表達(dá)式INT(X/2)=X/2（A ）。 A、用于測(cè)試X是否偶數(shù) B、返回一個(gè)整數(shù) C、返回一個(gè)奇數(shù) D、用于測(cè)試X是否整數(shù)8、要改變新建對(duì)象的缺省名稱(chēng)，應(yīng)使用屬性（C ）。 A、 Font B、ForeColor C、Name D、Height9、如果下面程序執(zhí)行后輸出的結(jié)果是132，那么在程序until后面的“條件”應(yīng)為（D ）。i=12：s=1DOs= s * ii = i1LOOP UNTIL “條件”P(pán)RINT sENDA、i > 11 B、i >=11 C、i <=11 D、i<1112、要使一個(gè)命令按鈕顯示文字“確定”，正確的設(shè)置是把該命令的（C ）。 A、屬性Font設(shè)置為“確定” B、屬性.ForeColor設(shè)置為“確定” C、屬性Caption設(shè)置為“確定” D、屬性BorderStyle設(shè)置為“確定”13、表達(dá)式Abs(-3.6)*sqr(100)的值是（D ）。 A、-360 B、360 C、-36 D、3614、下面程序運(yùn)行后的輸出結(jié)果為（C ）。i=1do WHILE i<8i=i+2s=2*i+3loopPRINT sENDA、17 B、19 C、21 D、2315、下列Visual Basic程序段運(yùn)行后，變量a,b,c的值為（C ）。 a=1:b=1:c=1 Do While a+b+c<=10 a=a+1 b=b*2 c=b/2 LoopA、2 2 1 B、3 4 2 C、4 8 4 D、4 4 216、下列Visual Basic程序段運(yùn)行后，變量x的值為（C ）。x=3:y=77 Do x=x+2 Loop Until x>Sqr(y) A、7 B、8 C、9 D、1017、下列Visual Basic程序段運(yùn)行后，變量s的值為（B ）。a=2:b=1:s=0 For I=10 To 6 Step-1 s=s+a c=a+b a=b b=c Next I A、10 B、17 C、6 D、2818、在Visual Basic中程序段是計(jì)算（C ）公式的。s=0 For I=1 To 10 t=1for j=1 to it=t*Inext js=s+t Next I A、s=1+2+3+4+5+6+7+8+9+10 B、s=1*2*3*4*5*6*7*8*9*10 C、s=1!+2!+3!+4!+5!+6!+7!+8!+9!+10! D、s=1+2*3+3*4+4*5+5*6+6*7+7*8+8*9+9*1019、下列Visual Basic程序段運(yùn)行后，變量s、t的值為（B ）。s=0:t=1 For k=2 To 4 s=s+k t=t*k Next k A、2 2 B、9 24 C、5 6 D、0 120、下列Visual Basic程序段運(yùn)行后，變量max的值為（B ）。 a=5:b=10:max=a IF b>max Then max =b A、5 B、10 C、5和10 D、以上都不是二、填空題（每空1.5分，共30分）1、打印出如下圖1222 33333 444444455555555566666666666程序如下：Private Sub Command1_Click() For i=1 to _ print tab(20-i)For j=1 to _ Print_ Next j Print Next iEnd Sub2、下列程序的功能是從鍵盤(pán)上任意輸入一個(gè)數(shù)，判斷這個(gè)數(shù)是正數(shù)、負(fù)數(shù)、還是零，并輸出判斷結(jié)果。程序中有三處錯(cuò)誤，請(qǐng)更正。程序如下：Private Sub Command1_Click() Dim a As Single Dim py As String a=Val(Text1) If a>0 Then py="正數(shù)" If a=0 Then py="零" If a<=0 Then py="負(fù)數(shù)" Label3.Caption=aEnd Sub_3、完善程序，使能輸出：1-2+3-4+5-6+.+99-100的值。程序如下：Private Sub Command1_Click() s=_ For i=1 To _ s=s+(-1)(_)*i Next i Print sEnd Sub4、已知一元二次方程的二次項(xiàng)系數(shù)、一次項(xiàng)系數(shù)、常數(shù)項(xiàng)分別為a、b、c，其中a不等于0。修改程序，求方程的根。要求：如果方程無(wú)實(shí)數(shù)根，則輸出“無(wú)實(shí)數(shù)根”，否則輸出兩個(gè)實(shí)數(shù)根。Private Sub Command1_Click() Dim a,b,c,d As Single Dim x1,x2 As Single a=Val(Text1.Text) b=Val(Text2.Text) c=Val(Text3.Text) d=b2-4*a*c If d_ Then x1=(-b+Sqr(d)/(2*a) x2=(-b-Sqr(d)/(2*a) Label1.Caption=x1 Label2.Caption=x2 _ Label3.Caption=_ End IfEnd Sub5、下面的程序是求7!（7!=1*2*3.*6*7）的值，并在默認(rèn)窗口輸出這個(gè)值。程序中有三處錯(cuò)誤，請(qǐng)更正。Private Sub Command1_Click() Dim a As Single a=0 For i=1 to n a=a*i Next i Print iEnd Sub_6、下面的程序是求100以?xún)?nèi)奇數(shù)和s的值（S=1+3+5+7.+99）。程序中有三處錯(cuò)誤，請(qǐng)更正。Private Sub Command1_Click() Dim s As Single Dim i As Single s=1 For i=1 to 100 Step 1 s=s*i Next i Print s End Sub_7、完善其中的程序，使能輸出如下圖形。- - * * * * * *- - - - * * * * * *- - - - - - * * * * * *- - - - - - - - * * * * * *- - - - - - - - - - * * * * * *- - - - - - - - - - - - * * * * * *-表示空格程序如下：Private Sub Command1_Click() For i=1 To 6 Print Tab(_); For j=1 To_ Print *Next jPrintNext iEnd Sub三、簡(jiǎn)答題（每題10分，共30分）1、已知一個(gè)三角形的三邊長(zhǎng)分別為a,b,c ，求這個(gè)三角形的面積。設(shè)計(jì)一個(gè)算法解決這個(gè)問(wèn)題。（用自然語(yǔ)言描述并寫(xiě)出偽代碼）第一步，輸入a,b,c的值；第二步，計(jì)算 的值；第三步，計(jì)算 的值；第四步，輸出S的值.2、設(shè)計(jì)算法求 的值，要求畫(huà)出程序框圖，用基本語(yǔ)句編寫(xiě)的程序。解 這是一個(gè)累加求和問(wèn)題，共99項(xiàng)相加，可設(shè)計(jì)一個(gè)計(jì)數(shù)變量，一個(gè)累加變量，用循環(huán)結(jié)構(gòu)實(shí)現(xiàn)這一算法.程序框圖如右圖所示程序：S=0K=1Dos=s+1/k(k+1)k=k+1LOOP UNTIL k>99PRINT sENDINPUT tIF t<= 3 THENc=0.2ELSEc=0.2+0.1(t-3)END IFPRINT cEND3、某電信部門(mén)規(guī)定：撥打市內(nèi)電話時(shí)，如果通話時(shí)間不超過(guò)3分鐘，則收取通話費(fèi)0.2元，如果通話時(shí)間超過(guò)3分鐘，則超過(guò)部分以每分鐘0.1元收取通話費(fèi)（通話不足1分鐘時(shí)按1分鐘計(jì)），試設(shè)計(jì)一個(gè)計(jì)算通話費(fèi)用的算法。要求寫(xiě)出算法，畫(huà)出程序框圖，編寫(xiě)程序。解 我們用c（單位：元）表示通話費(fèi)，t（單位：分鐘）表示通話時(shí)間，則依題意有 算法步驟如下：第一步，輸入通話時(shí)間t；第二步，如果t3，那么c = 0.2 ；否則令 c = 0.2+0.1 (t3)；第三步，輸出通話費(fèi)用c ；一、單選題（每小題3分，20小題，共60分）1、用計(jì)算機(jī)解決問(wèn)題時(shí)，首先應(yīng)該確定程序“做什么？”，然后再確定程序“如何做？”請(qǐng)問(wèn)“如何做？”是屬于用計(jì)算機(jī)解決問(wèn)題的哪一個(gè)步驟？（B）A、分析問(wèn)題B、設(shè)計(jì)算法C、編寫(xiě)程序D、調(diào)試程序2、在調(diào)試程序過(guò)程中，下列哪一種錯(cuò)誤是計(jì)算機(jī)檢查不出來(lái)的？（C）A、編譯錯(cuò)誤B、執(zhí)行錯(cuò)誤C、邏輯錯(cuò)誤D、任何錯(cuò)誤計(jì)算機(jī)都能檢查出來(lái)3、下列關(guān)于算法的敘述中，錯(cuò)誤的是（A）A、一個(gè)算法至少有一個(gè)輸入和一個(gè)輸出B、算法的每一個(gè)步驟必須確切地定義C、一個(gè)算法在執(zhí)行有窮步之后必須結(jié)束D、算法中有待執(zhí)行的運(yùn)算和操作必須是相當(dāng)基本的。4、流程圖中表示判斷的是（ B ）。、矩形框、菱形框 、圓形框、橢圓形框5、任何復(fù)雜的算法都可以用三種基本結(jié)構(gòu)組成，下列不屬于基本結(jié)構(gòu)的是（C）A、順序結(jié)構(gòu)B、選擇結(jié)構(gòu)C、層次結(jié)構(gòu)D、循環(huán)結(jié)構(gòu)6、能夠被計(jì)算機(jī)直接識(shí)別的語(yǔ)言是（C）A、偽代碼B、高級(jí)語(yǔ)言C、機(jī)器語(yǔ)言D、匯編語(yǔ)言7、在VB語(yǔ)言中，下列數(shù)據(jù)中合法的長(zhǎng)整型常量是（D）A、08AB、2380836EC、88.12345D、1.2345E68、求Mid(“ABCDEFG”,3,2)的結(jié)果是（B）A、“ABC”B、“CD”C、“ABCDEF”D、“BCD”9、表達(dá)式 A+B+C<D AND A>=3 OR NOT C<0 OR D>0 當(dāng)A=3,B=4,C=-5,D=6時(shí)的運(yùn)算結(jié)果是（B）A、0B、1C、TRUED、FALSE10、在循環(huán)語(yǔ)句 For x=1 to 100 step 2 Next x 中，x能達(dá)到的最大值是（A）A、100B、99C、98D、9711、在下列選項(xiàng)中，不屬于VB的對(duì)象的是（A）A、窗體的背景顏色B、命令按鈕C、文本框D、標(biāo)簽12、在調(diào)試程序的時(shí)候，經(jīng)常要設(shè)置斷點(diǎn)，設(shè)置斷點(diǎn)的快捷鍵是（C）A、F1B、F8C、F9D、F1213、算法描述可以有多種表達(dá)方法，下面哪些方法不可以描述“閏年問(wèn)題”的算法（D ）A、自然語(yǔ)言 B、流程圖 C、偽代碼 D、機(jī)器語(yǔ)言14、以下不屬于非法用戶(hù)自定義標(biāo)識(shí)符（常量和變量命名）的是（B ）A、8ad B、ad8 C、_a8d D、const15、已知A，B，C，D是整型變量，且都已有互不相同的值，執(zhí)行語(yǔ)句B=0；A=C；D=A；D=B；后，其值相等的變量是（B ）A、A，D B、A，C C、C，B D、B，A16、要交換變量A和B的值，應(yīng)使用的語(yǔ)句組是( B)A、A=B；B=C；C=A B、C=A；A=B；B=CC、A=B；B=A D、C=A；B=A；B=C17、VisualBasic中以單引號(hào)開(kāi)頭一行文字稱(chēng)為注釋?zhuān)鼘?duì)程序的運(yùn)行（D） A、起一定作用B、有時(shí)候起作用 C、不起任何作用，但是必須的D、不起任何作用，但能增加程序的可閱讀性18、要使一個(gè)命令按鈕顯示文字“確定”，正確的設(shè)置是把該命令按鈕的（C ）。A、屬性Font設(shè)置為“確定” B、屬性.ForeColor設(shè)置為“確定”C、屬性Caption設(shè)置為“確定” D、屬性BorderStyle設(shè)置為“確定”19、要從文本框TXTShowOut中輸出"中國(guó)您好！"，代碼為( B) A TextBox.text="中國(guó)您好！"B TxtShowOut.Text="中國(guó)您好！" C TxtShowOut.Label="中國(guó)您好！"D Val(TxtShowOut.Text)=“中國(guó)您好！”20、下列Visual Basic程序段運(yùn)行后，變量max的值為（A ）。 a=11;b=15; max=aIF b>max Then max =bA、15 B、11 C、15或11都有可能 D、以上都不是二、閱讀程序?qū)懡Y(jié)果（第12小題每題5分，第3小題10分，共20分）1、Private Sub Form_Load() N=InputBox(“請(qǐng)輸入N的值：”,“輸入”) S=1 For i=1 to N S=S*i Next i MsgBox “S=”+Str(s),0,”計(jì)算結(jié)果” End Sub當(dāng)N=5時(shí)，運(yùn)行的結(jié)果是_S=120_。2、Private Sub Command1_Click() Dim X as integer,X1 as integer,X2 as integer Dim X3 as integer,Y as integer X=InputBox(“X=”，“輸入”) X1=X100 X2=(X-X1*100)10 X3=X-X1*100-X2*10 Y=X3*100+X2*10+X1 Print “Y=”;Y End Sub當(dāng)X=258時(shí)，運(yùn)行的結(jié)果是_Y=852_。3、Private Sub Command1_Click() Dim A as Integer,B as Integer,C as Single Dim D as String N=InputBox(“請(qǐng)輸入N的值：”) F=N MOD 5 A=N+1 B=ABS(N) Select Case F Case 1:C=A+B:D=”+” Case 2:C=A-B:D=”-” Case 3:C=A*B:D=”*” Case 4:C=A/B:D=”/” Case else:End End Select Print A;D;B;”=”;C End Sub當(dāng)N=13時(shí)，運(yùn)行的結(jié)果是_14*13=182_。三、程序填空（每小題10分，2小題，共20分）1、下面的程序是求100以?xún)?nèi)奇數(shù)和S的值（S=1+3+5+7.+99），請(qǐng)把空缺的地方填寫(xiě)完整。Private Sub Command1_Click() Dim S As Integer Dim I As Integer S=_（1）_ For I=1 to 100 Step _（2）_ S=S+I Next _（3）_ Label1._（4）_=_（5）_(S)End Sub（1）_0_ （2）_2_ （3）_i_ （4）_Caption_ （5）_Str_2、某旅行團(tuán)共有30個(gè)人，其中有男人、女人和小孩，他們?cè)谝患也蛷d吃自助餐花去500元。已知自助餐的價(jià)格是每個(gè)男人30元，每個(gè)女人20元，每個(gè)小孩10元。問(wèn)：男人、女人、小孩各為多少人。下面是解決該問(wèn)題的VB程序，請(qǐng)?jiān)诳杖钡牡胤教顚?xiě)完整。Private Sub Command1_Click()Dim Man As Integer, Woman As Integer, Child As IntegerDim Money As Integer,Count As IntegerCount=0 用來(lái)記錄符合條件的組合數(shù)For Man = 1 To _(1)_(500/30) For Woman = 1 To (30-Man) Child = _(2)_ Money= 30 * Man + 20 * Woman + 10 * ChildIf _(3)_ Then Count=Count+1 Print “第”;Count;”種情況：” Print Tab(10);”男人”;Man;”個(gè)”; Print Tab(25);”女人”;Woman;”個(gè)”; Print Tab(40);”小孩”;Child;”個(gè)”; Print End If Next _(4)_Next _(5)_End Sub（1）_Int 或 Fix_ （2）_30-Man-Woman_ （3）_Money=500_（4）_Woman_ （5）_Man_