創(chuàng)新設(shè)計(jì)《優(yōu)化重組卷》《算法與程序設(shè)計(jì)》綜合檢測(cè)試題

1、算法與程序設(shè)計(jì)(A卷)綜合檢測(cè)試題一、選擇題(本大題共25小題，每小題2分，共50分。每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的，不選、多選、錯(cuò)選均不得分)1.將數(shù)學(xué)表達(dá)式：x25x3寫成VisualBasic表達(dá)式，正確的是()A.2*xx3 B.x25*x3C.sqr(x)x3 D.x2x32.下列VB表達(dá)式的值等于3的是()A.Sqr(9) B.abs(1)C.Len(“1”) D Len(“3”)3.有如下VB程序段：()a12b54taabbt該程序執(zhí)行后，變量a，b的值分別是()A.12，54 B.54，12C.54，54 D.12，124.如下VB程序段：a3：b6：c5i

2、f a>b and a>c thenyaelse if b>c then ybelseycend if該程序運(yùn)行之后，整數(shù)型變量y的值()A.0 B.5 C.6 D.35.在Visual Basic中，語(yǔ)句Dim x As Single所說(shuō)明的變量x屬于()A.整數(shù)型 B.邏輯型C.字符串型 D.單精度實(shí)數(shù)型6.下列屬于VisalBasic窗體文件的是()A.min.exe B.min.frmC.min.vbp D.min.mdb7.下列問(wèn)題不能用算法描述的是()A.所有偶數(shù)的和B.將一個(gè)5位的十進(jìn)制數(shù)轉(zhuǎn)化為對(duì)應(yīng)的二進(jìn)制數(shù)C.將100個(gè)有理數(shù)按降序排列D.求100個(gè)自然數(shù)中最

3、大的一個(gè)數(shù)8.關(guān)于算法的三種基本模式，下列說(shuō)法不正確的是()A.一個(gè)算法可以只有一種基本的模式B.一個(gè)算法必須包含三種基本模式C.一個(gè)算法可能包含兩種基本模式D.一個(gè)算法可以包含三種基本模式的基本組合9.計(jì)算圓的面積的算法如下：(1)輸入圓的半徑r(2)pi3.14(3)計(jì)算圓的面積spi*r*r(4)輸出面積s求解圓的面積采用的算法是()A.枚舉算法 B.解析算法C.排序算法 D.查找算法10.為了查找自己曾經(jīng)寫過(guò)的某篇作文，小明依次翻開(kāi)自己的多本作文本進(jìn)行逐頁(yè)查找。這種查找方法是()A.無(wú)序查找 B.隨機(jī)查找C.對(duì)分查找 D.順序查找11.在數(shù)組變量a(1)至 a(7)中依次輸入“a”，

4、“b”，“c”， “d”， “e”， “f”， “g”，若用對(duì)分查找的方法查找“c”這個(gè)字符，所需要的比較次數(shù)是()A.1 B.2 C.3 D.412.在VB程序設(shè)計(jì)的過(guò)程，“20”“08”的運(yùn)算結(jié)果是()A.“28” B.“208”C.“2008” D.“2008”13.在VB中，若用a，b，c分別代表對(duì)象名，屬性名，屬性值，則下列表達(dá)形式正確的是()A.a.bcB.a.cbC.b.ca D.b.ac14.執(zhí)行以下VB程序段后，變量Z的值為：()x5y10z(xy)mod 2A.5 B.10 C.15 D.115.執(zhí)行以下VB程序段后，變量Z的值為()x5y10z(xy)2A.7.5 B.7

5、 C.15 D.116.執(zhí)行以下VB程序段后，變量Z的值為()x5y10z(xy)/ 2A.5 B.10 C.15 D.7.517.執(zhí)行以下VB程序段后，變量Z的值為()Dim x，y，z as integerx5y10z(xy)/ 2A.7 B.8 C.7.5 D.118.描述算法的基本方法有()(1)自然語(yǔ)言(2)流程圖(3)偽代碼(4)機(jī)器語(yǔ)言A.(2)(3)(4) B.(1)(2)(3)C.(1)(2)(4) D.(1)(2)(3)(4)19.計(jì)算圓的面積的算法如下：(1)輸入圓的半徑r(2)pi3.14(3)計(jì)算圓的面積spi*r*r(4)輸出面積s這種描述算法的方法是()A.自然語(yǔ)

6、言 B.流程圖C.偽代碼 D.機(jī)器語(yǔ)言20.求解矩形的面積采用的算法是()上述流程圖描述算法的執(zhí)行模式是()A.順序模式 B.分支模式C.循環(huán)模式 D.混合模式21.【加試題】有如下VB程序段：x0for i1 to 100 step 1xxinext i該程序運(yùn)行之后，整數(shù)型變量X的值是()A.100 B.4 450C.5 050 D.5 01022.【加試題】下列VB函數(shù)可以計(jì)算正整數(shù)n的階乘的值。Function f(n As Integer) As IntegerIf (n<1) Thenf1Elsefn * f(n1)End IfEnd Function上述函數(shù)采用的算法是()

7、A.枚舉 B.查找C.排序 D.遞歸23.【加試題】閱讀下面的VB函數(shù)Function f(n As Integer) As IntegerIf (n1) Thenf1Else If (n2) Thenf1Elseff(n1)f(n2)End IfEnd FunctionF(5)的值是()A.3 B.4 C.5 D.624.【加試題】5位評(píng)委依次給學(xué)生演講的成績(jī)打分依次為95，85，92，84，90，如下表所示：原始數(shù)據(jù)9585928490第一趟8592849095第二趟第三趟8485909295若采用冒泡法對(duì)其進(jìn)行從小到大的排序，則第二趟的排序結(jié)果是()A.85 84 90 92 95 B.

8、84 85 95 90 92C.84 85 95 92 90 D.84 90 92 85 93 25.【加試題】對(duì)數(shù)組83，85，61，75，95，86進(jìn)行排序操作，若選擇選擇法進(jìn)行排序，若完成第一遍時(shí)的結(jié)果為：61，85，83，75，95，86.則第二遍時(shí)的結(jié)果是()A.61，85，83，75，86，95B.61，75，83，85，95，86C.61，75，83，85，86，95D.61，85，83，75，95，86二、非選擇題(本大題共5小題，每題10分，共50分)26.補(bǔ)充程序水仙花數(shù)是指一個(gè)n位數(shù)(n3)，它的每個(gè)數(shù)位上的數(shù)字之和的n次冪之和等于這個(gè)數(shù)本身。例如153135333，15

9、3就是一個(gè)水仙花數(shù)。下面的VB程序就是求出全部4位的水仙花數(shù)并在列表框List1中顯示出來(lái)，請(qǐng)?jiān)趧澗€處將程序補(bǔ)充完整。Dim m As Integer, n As IntegerDim a As Integer, b As Integer, c As Integer, d As IntegerFor_(1)_To 9999aInt(m/1000)bInt(m/100)mod 10cInt(m/10)mod 10dm Mod 10If_(2)_ThenList1.AddItem Str(m)End_If_(3)_ (1)_(3分)(2)_(4分)(3)_(3分)27.補(bǔ)充程序。找出100至200

10、之間的素?cái)?shù)，將結(jié)果顯示到列表框List1中。Dim flag As BooleanDim n As IntegerFor i 100 To 200flag False(1)_Do While n <Sqr(i)If_(2)_Then flagTrue_(3)_LoopIf_(4)_Then List1.AddItem Str(i)Next i(1)_(2分)(2)_(3分)(3)_(3分)(4)_(2分)28.程序補(bǔ)充(每空2分)某商品進(jìn)行團(tuán)購(gòu)優(yōu)惠活動(dòng)：一次團(tuán)購(gòu)數(shù)量50件以下，95折優(yōu)惠；團(tuán)購(gòu)數(shù)量在50件(包含50件)以上100件以下，85折優(yōu)惠；100件(包含100件)以上，75折優(yōu)惠

11、。商品單價(jià)是100元一件，完成如下程序。Private Sub Command1_Click()Dim p, s As Integerp100sVal(Text1.Text)Dim m As SingleIf_(1)_Thenmp*s*0.95ElseIf s<100 Then_(2)_Else_(3)_End IfText2.Text Str(m)End Sub (1)_(2)_(3)_(4)當(dāng)p30時(shí)，text2.text顯示結(jié)果是_(5)當(dāng)p150時(shí)，text2.text顯示結(jié)果是_29.【加試題】補(bǔ)充程序(每空2分)選擇排序算法的基本思想是在待排序的數(shù)據(jù)中選出最大或者最小的數(shù)據(jù)，

12、把它與第一個(gè)數(shù)據(jù)交換，然后再在其余的數(shù)據(jù)中找出最大或最小的數(shù)據(jù)與第二個(gè)數(shù)據(jù)交換，依次類推，直到所有數(shù)據(jù)排序完成。在如圖所示的程序界面中，對(duì)這list1中的8個(gè)數(shù)進(jìn)行選擇排序，完成后在list2中顯示出來(lái)。請(qǐng)你補(bǔ)充程序。Private Sub Command1_Click()Dim a(1 To 8) As IntegerFor i 1 To 8 將list1中數(shù)字讀入數(shù)組中List1.ListIndexi1a(i) Val(List1.Text)Next iDim p, t As IntegerDim flag As BooleanFor i 1 To 8piFor_(1)_To 8If a(

13、j) < a(p) Then_(2)_flagTrueEnd IfNext jIf_(3)_Then_(4)_a(i) a(p)a(p) tEnd If_(5)_For i 1 To 8List2.AddItem Str(a(i)Next iEnd Sub(1)_(2)_(3)_(4)_(5)_30.【加試題】對(duì)分查找首先將查找值與有序數(shù)組內(nèi)處于中間位置的元素進(jìn)行比較，如果中間位置上的元素內(nèi)的數(shù)值與查找值不同，根據(jù)數(shù)組元素的有序性，就可確定應(yīng)該在數(shù)組的前半部分還是后半部分繼續(xù)進(jìn)行查找；在新確定的范圍內(nèi)，繼續(xù)按上述方法進(jìn)行查找，直到獲得最終結(jié)果。下面的VB程序在數(shù)組內(nèi)進(jìn)行對(duì)分查找，如果查到

14、則在文本框中先是查找元素的序號(hào)。請(qǐng)您把程序補(bǔ)充完整Dim a(1 To 8) As IntegerFor i 1 To 8 將list1中數(shù)字讀入數(shù)組中List2.ListIndexi1a(i)Val(List2.Text)Next iDim low, mid, high, key, num As IntegerDim flag As BooleannumVal(Text1.Text)low1high8Do While_(1)_mid (low high)/2If (a(mid) num) Thenflag Truekey midElseIf_(2)_Thenlow midElse_(3)_E

15、nd IfLoopIf flag ThenText2.Text Str(key)ElseText2.Text “您輸入的數(shù)字沒(méi)有查找到！”End If(1)_(4分)(2)_(3分)(3)_(3分)算法與程序設(shè)計(jì)(B卷)綜合檢測(cè)試題一、選擇題(本大題共25小題，每小題2分，共50分。每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的，不選、多選、錯(cuò)選均不得分)1.下列VB表達(dá)式的值等于5的是()A.Sqr(9) B.“2”“3”C.Len(“5”) D.Len(“3234”)2.為使下面左右框內(nèi)的VB程序段實(shí)現(xiàn)相同的功能，則左框內(nèi)劃線處填寫的代碼應(yīng)該是()S0：t1Do While t<6

16、sst_LoopA.t2 B.t6C.tt1 D.tt23.如下VB程序段：a12：b6：c7if a<b and a<c thenyaelse if b<c thenybelseycend if該程序運(yùn)行之后，整數(shù)型變量y的值為()A.0 B.12 C.6 D.74.下列屬于VisalBasic工程文件的是()A.min.exe B.min.frmC.min.vbp D.min.mdb5.下列問(wèn)題能用算法描述的是()A.所有偶數(shù)的和B.所有素?cái)?shù)的和C.將10萬(wàn)個(gè)有理數(shù)按降序排列D.用計(jì)算機(jī)算法證明哥德巴赫猜想6.程序的三種基本結(jié)構(gòu)是()A.選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)、樹型結(jié)構(gòu)B.順

17、序結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)C.順序結(jié)構(gòu)、循環(huán)結(jié)構(gòu)、樹型結(jié)構(gòu)D.樹型結(jié)構(gòu)、順序結(jié)構(gòu)、選擇結(jié)構(gòu)7.“如果a，b中任意一個(gè)為0，那么yy1”。能實(shí)現(xiàn)該功能的VB語(yǔ)句是()A.If a0 And b0 Then yy1B.If a*b0 Then yy1C.If a0，b0 Then yy1D.If a，b0 Then yy18.某算法的流程圖如下圖所示。S的初始值是0，i的初始值是5，問(wèn)ssi的執(zhí)行次數(shù)()A.6 B.7 C.8 D.99.在VB程序設(shè)計(jì)的過(guò)程，ascii(“e”)ascii(“c”)的運(yùn)算結(jié)果是()A.0 B.“1”C.2D.310.下列邏輯表達(dá)式的值為“真”的是()A.24>

18、;8and 5>1 B.312>15or 3<1C.5>0And 4<3 D.10/5<3or 6<811.輸入兩個(gè)變量a2，b6，按下面的程序代碼執(zhí)行，a，b的值變?yōu)槎嗌?)a2b6aa2babaabA.a6，b2B.a6，b4C.a6 b2 D.a6，b612.下面程序執(zhí)行的結(jié)果是()private sub form_click()A“123”：B“456”Cval(a)val(b)print C100end subA.123 B.3 C.5 D.57913.在VB語(yǔ)言中，下列合法的變量名是()A.Print B.testqwC.6cost_1 D

19、.count2s14.下列數(shù)據(jù)屬于字符串函數(shù)的是()A.Abs()B.Sqr()C.String() D.Int()15.某VB的事件過(guò)程如下：Private Sub Command1_Click()Dim a As IntegeraVal(Text1.Text)a2*a1Text1.TextStr(a)End Sub程序運(yùn)行時(shí)，在文本框Text1中輸入1，連續(xù)兩次單擊命令按鈕Command1后，Text1中顯示的內(nèi)容是()A.7 B.5 C. 3 D.116.下列Visual Basic程序段運(yùn)行后，變量Max的值為()a3：b10：max0if a>0 then max3if b&g

20、t;0 then max10A.0B.3C.10 D.無(wú)法確定17.數(shù)組a中的數(shù)據(jù)存放情況如下表，以下關(guān)系表達(dá)式成立的是()a1a2a3a4a5a6a7a8134128657A.aa34B.aa88C.a6>a5aa11D.aa2a1<>a418.下列控件中可用于接受用戶輸入文本，又可用于顯示文本的是()A.Label控件 B.TextBox控件C.Timer控件 D.mandButton控件19.“某商場(chǎng)的店慶促銷活動(dòng)之一：店慶日購(gòu)物滿500元可在5折優(yōu)惠后再減100元，否則只打5折”。用算法描述這一問(wèn)題，可采用的算法結(jié)構(gòu)是()A.順序結(jié)構(gòu)B.選擇結(jié)構(gòu)C.循環(huán)結(jié)構(gòu) D.樹型

21、結(jié)構(gòu)20.在流程圖中常用表示輸入框()21.【加試題】S1For j10 To 10 Step2ss*jNext jMsgBox(s)上述程序段中ss*j的執(zhí)行次數(shù)是()A.20 B.10 C.11 D.2122.【加試題】S0C0Do While C<100CC1SSCLoopMsgBox (Str(C)Str(S)該程序的運(yùn)行結(jié)果是()A.99 4950B.100 4950C.100 5050 D.101 515123.【加試題】小明編寫了如下VB程序段：Private Sub com mand1_Click()Dim x As DoubleDim y As DoublexVal(T

22、ext1.Text)yAbs(x)xint(y)Text2.TextStr(x)End Sub此應(yīng)用程序執(zhí)行后，出現(xiàn)了如上圖所示的錯(cuò)誤信息，請(qǐng)問(wèn)產(chǎn)生此錯(cuò)誤的原因是()A.語(yǔ)句yAbs(x)有誤B.缺少對(duì)象424C.語(yǔ)句xint(y)有誤D.缺少文本框Text1或文本框Text224.【加試題】5位評(píng)委依次給學(xué)生演講的成績(jī)打分依次為95，85，92，84，90，如下表所示：原始數(shù)據(jù)9585928490第一趟8495859290第二趟8485959290第三趟若采用冒泡法對(duì)其進(jìn)行從小到大的排序，則第三趟的排序結(jié)果是()A.84 90 85 93 92 B.84 85 95 90 92C.84，85

23、，90，95，92 D.84 90 92 85 93 25.【加試題】對(duì)數(shù)組83，85，61，75，95，86進(jìn)行排序操作，若用選擇法進(jìn)行排序，若完成第一遍時(shí)的結(jié)果為：61，85，83，75，95，86.則第三遍時(shí)的結(jié)果是()A.61，85，83，75，86，95B.61，75，83，85，95，86C.61，75，83，85，86，95 D.61，85，83，75，95，86二、非選擇題(本大題共5小題，每題10分，共50分)26.補(bǔ)充程序完全數(shù)，又稱完美數(shù)或完備數(shù)，是一些特殊的自然數(shù)。它所有的真因子(即除了自身以外的約數(shù))的和(即因子函數(shù))，恰好等于它本身。例如6123；下面程序找出1 0

24、00以內(nèi)的完全數(shù)，在列表框中顯示出來(lái)，把程序補(bǔ)充完整.Dim a, s As IntegerFor i 2 To 1000a1(1)_Do While a<sqr(i)If (i Mod a) 0 Then_(2)_(3)_LoopIf (s i) Then List1.AddItem Str(i)_(4)_(1)_(2分)(2)_(3分)(3)_(3分)(4)_(2分)27.如下程序段的功能是：隨機(jī)產(chǎn)生8個(gè)1100之間的正整數(shù)，按升序?qū)?0個(gè)數(shù)據(jù)排序輸出。Const n8Dim a(1 to n)As IntegerDim I，j，t，k as integerFor i1 To n_(

25、1)_Next iFor i1To n1For j_(2)_To nIf_(3)_Thentd(i)d(i)d(k)d(k)tEnd IfNext jNext I為了實(shí)現(xiàn)這一目標(biāo)，在劃線處，填入合適的語(yǔ)句或表達(dá)式是(1)_(4分)(2)_(3分)(3)_(3分)28.某超市打折促銷，規(guī)定如下：購(gòu)物未超過(guò)500元按原價(jià)支付；購(gòu)物超過(guò)500元但未超過(guò)1 000元，超過(guò)500元部分按9折優(yōu)惠計(jì)價(jià)；購(gòu)物超過(guò)1 000元但未超過(guò)1 500元，超過(guò)1 000元部分按8折優(yōu)惠計(jì)價(jià)；購(gòu)物超過(guò)1 500元但未超過(guò)3 000元，超過(guò)1 500元部分按7折優(yōu)惠計(jì)價(jià)；購(gòu)物超過(guò)3 000元，超過(guò)3 000元部分按6折優(yōu)

26、惠計(jì)價(jià)。根據(jù)以上規(guī)定，假定購(gòu)物貨款為x元，則實(shí)付金額y為：y程序界面如圖所示，在“輸入購(gòu)物金額(單位：元)”后的文本框orgtext中輸入購(gòu)物金額(單位：元)，單擊“實(shí)付金額計(jì)算”按鈕(Command1)后，在“實(shí)際支付金額(單位：元)為”后的文本框cash Text中輸出實(shí)付金額。解決此問(wèn)題相應(yīng)的Visua1 Basic程序如下：Private Sub Command1_Click()Dim x As Single，y As SinglexVa1(orgtext.Text)If x<500 ThenyxElse If_Theny500(x500)*0.9Else If x<1 5

27、00 Theny500500*0.9(x1 000)*0.8ElseIf x<3 000 Theny500500*0.9500*0.8(x1 500)*0.7Elsey500500*0.9500*0.81 500*0.7(x3 000)*0.6End If_End Sub(1)解決此問(wèn)題的算法是_。(選填：解析法或枚舉法)(3分)在程序和劃線處，填入適當(dāng)?shù)恼Z(yǔ)句或表達(dá)式，把程序補(bǔ)充完整。(2)程序中劃線處應(yīng)填入_。(3分)(3)程序中劃線處應(yīng)填入_。(4分)29.【加試題】補(bǔ)充程序某工廠購(gòu)入了200千克原材料，每4千克原料可以生產(chǎn)一件A產(chǎn)品，每5千克可以生產(chǎn)一件B 產(chǎn)品。下面VB程序的功能

28、：計(jì)算恰好用盡原材料時(shí)，將A產(chǎn)品的數(shù)量和B產(chǎn)品的數(shù)量在列表框中顯示出來(lái)。Private Sub Form_Load()Dim x, y As Integerx為A產(chǎn)品生產(chǎn)數(shù)量，y為B產(chǎn)品生產(chǎn)數(shù)量For x 1 To 50For y 1 To 40If_(1)_ThenList1.AddItem“A產(chǎn)品” Str(x) “ B產(chǎn)品” Str(y)End If_(2)_(3)_End Sub(1)_(4分)(2)_(3分)(3)_(3分)30.【加試題】對(duì)分查找首先將查找值與有序數(shù)組內(nèi)處于中間位置的元素進(jìn)行比較，如果中間位置上的元素內(nèi)的數(shù)值與查找值不同，根據(jù)數(shù)組元素的有序性，就可確定應(yīng)該在數(shù)組的前

29、半部分還是后半部分繼續(xù)進(jìn)行查找；在新確定的范圍內(nèi)，繼續(xù)按上述方法進(jìn)行查找，直到獲得最終結(jié)果。下面的VB程序在數(shù)組內(nèi)進(jìn)行對(duì)分查找，如果查到則在文本框中顯示查找元素的序號(hào)。請(qǐng)您把程序補(bǔ)充完整。Private Sub Command1_Click()Dim a(1 To 8) As IntegerFor i 1 To 8，將list1中數(shù)字讀入數(shù)組中List2.ListIndexi1a(i)Val(List2.Text)Next iDim low, mid, high, key, num As IntegerDim flag As BooleannumVal(Text1.Text)low1high8

30、k0Do While (low<high And flagFalse)_(1)_(2)_If (a(mid)num)ThenflagTruekeymidElseIf (_(3)_) ThenlowmidElsehighmidEnd IfLoopLabel3.Caption“查找了”Str(k)“次”If flag ThenText2.TextStr(key)ElseText2.Text “您輸入的數(shù)字沒(méi)有查找到！”End IfEnd Sub(1)_(4分)(2)_(3分)(3)_(3分)算法與程序設(shè)計(jì)(A卷)綜合檢測(cè)試題1B本題主要考查如何將數(shù)學(xué)表達(dá)式轉(zhuǎn)化為VB的表達(dá)式。表達(dá)式中可能包括

31、算術(shù)運(yùn)算，關(guān)系運(yùn)算和邏輯運(yùn)算，在VB中，數(shù)學(xué)中的乘號(hào)用“*”表示，乘冪用“”表示。2A本題考查學(xué)生對(duì)基本數(shù)學(xué)函數(shù)的認(rèn)識(shí)和理解。Sqr(3)是求3的算術(shù)平方根，abs(1)是求1的絕對(duì)值，asc(”1”)是求“1”的ASCII值，Len(“3”)是求字符串”3”的長(zhǎng)度。3B本題考查學(xué)生對(duì)賦值語(yǔ)句執(zhí)行過(guò)程的認(rèn)識(shí)和理解。這是一段順序結(jié)構(gòu)的程序，按照語(yǔ)句的順序依次執(zhí)行賦值語(yǔ)句，賦值語(yǔ)句將右邊變量的值賦給左邊的變量。這是兩個(gè)變量交換賦值的語(yǔ)句。4C本題考查if語(yǔ)句的執(zhí)行過(guò)程，在a，b，c三個(gè)數(shù)中選出最大的一個(gè)數(shù)。5D6B此題考查VB集成開(kāi)發(fā)工具生成的文件的類型。min.exe是工程編譯后的可執(zhí)行文件，m

32、in.frm是窗體文件，min.vbp是VB工程文件，min.mdb是access數(shù)據(jù)庫(kù)文件。7A此題考查算法的特性，算法的特征有有窮性，確定性，有0個(gè)或多個(gè)輸入，有一個(gè)或者多個(gè)輸出。A違反了算法的有窮性。8B算法的執(zhí)行流程是指算法中各個(gè)處理步驟的執(zhí)行過(guò)程和模式，通常算法中含有順序模式，選擇模式、循環(huán)模式三種基本模式。在具體的程序設(shè)計(jì)中，通常會(huì)將這三種模式組合起來(lái)使用。9B解析算法是用解析的方法找出表示問(wèn)題的前提條件與所求結(jié)論之間的數(shù)學(xué)表達(dá)式，并通過(guò)表達(dá)式的計(jì)算來(lái)實(shí)現(xiàn)問(wèn)題的求解。10D此題考查的查找算法，這種查找方法是順序查找。11C此題考查對(duì)分查找的比較次數(shù)，第一次先與a(4)比較，然后與a

33、(2)比較，第三次和a(3)比較。12D此題考查的VB字符串的鏈接運(yùn)算，結(jié)果是“2008”。13A此題考查對(duì)象的屬性，給對(duì)象屬性如何賦值。14D此題考查VB程序設(shè)計(jì)語(yǔ)言的基本運(yùn)算，mod是取余運(yùn)算。15B此題考查VB程序設(shè)計(jì)語(yǔ)言的基本運(yùn)算，/是整除運(yùn)算。16D此題考查VB程序設(shè)計(jì)語(yǔ)言的基本運(yùn)算，/是除法運(yùn)算。17A此題考查VB程序設(shè)計(jì)語(yǔ)言的基本運(yùn)算，是除法運(yùn)算，但Z是整數(shù)的數(shù)據(jù)類型，賦值時(shí)接受7.5整數(shù)部分，小數(shù)部分四舍五入，z的是8。18B如果用二進(jìn)制的機(jī)器語(yǔ)言描述算法，這種方式可讀性差。算法的描述方法就是自然語(yǔ)言，流程圖，偽代碼。19A題干算法使用自然語(yǔ)言描述的。20A題干算法順序執(zhí)行。2

34、1C改程序考查VB循環(huán)語(yǔ)句的執(zhí)行過(guò)程，循環(huán)變量i從1開(kāi)始變化到100，每次增加的步長(zhǎng)為1，共執(zhí)行100次，x的初始值為0，然后與i依次累加，共累加100次。22D函數(shù)進(jìn)行自身調(diào)用，這種方法是遞歸算法。23C這是遞歸算法求解數(shù)列f(n)f(n1)f(n2)(n>2)的算法，f(5)5。24A此題考查冒泡法排序，此題的排序方法是小數(shù)向上浮出。25B此題考查選擇排序算法的執(zhí)行過(guò)程，方法是選出最小的數(shù)交換位置。26解析此題考查利用VB解決實(shí)際數(shù)學(xué)問(wèn)題的能力。程序首先將一個(gè)四位整數(shù)每一個(gè)數(shù)位上的數(shù)字取出來(lái)，然后根據(jù)水仙花數(shù)的定義，滿足定義的數(shù)字是水仙花數(shù)。答案(1)m 1000(2)a3b3c3d

35、3m(3)Next m27解析此題考查利用VB解決實(shí)際數(shù)學(xué)問(wèn)題的能力。程序中設(shè)計(jì)一個(gè)標(biāo)志變量flag，首先f(wàn)lagfalse 。假設(shè)i是素?cái)?shù)，然后判斷n是不是i的因數(shù)，如果I mod n0，則n是i的因數(shù)，i不是素?cái)?shù)。答案(1)n2(2)(i Mod n)0(3)nn1(4)flagFalse28解析此題考查對(duì)VB程序設(shè)計(jì)語(yǔ)言if條件語(yǔ)句的掌握情況。當(dāng)商品數(shù)量在50件一下，商品每件九五折，50至100件八五折，100件以上75折。答案(1)s < 50(2)m p * s * 0.85(3)m p * s * 0.75(4)2850(5)510029解析此題考查對(duì)選擇排序算法的理解和掌握情況。答案(1)j I(2)p j(3)flag或flagtrue(4)t a(i)(5)Next i30(1)low < high And flag False(2)a(mid)<num(3)highmid 算法與程序設(shè)計(jì)(B卷)綜合檢測(cè)試題1D本題考查對(duì)基本數(shù)學(xué)函數(shù)的認(rèn)識(shí)和理解。Sqr(9)是求9的算術(shù)平方根，“2”“3”是字符串連接運(yùn)算，運(yùn)算結(jié)果是“23”，asc(“1