17-18版信算法與程序數(shù)設(shè)計(jì)板塊仿真測試卷（3）

1、模塊仿真測試卷(三)(建議用時(shí)：45分鐘)一、選擇題(本大題共12小題，每小題2分，共24分。每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的，不選、多選、錯(cuò)選均不得分)1關(guān)于算法的三種基本模式，下列說法正確的是()A一個(gè)算法只能包含一種基本模式B一個(gè)算法必須包含三種基本模式C一個(gè)算法最多可以包含其中兩種基本模式D一個(gè)算法可以含有三種基本模式的任意組合D算法的執(zhí)行流程是指算法中各個(gè)處理步驟的執(zhí)行次序和模式，通常算法中含有順序模式、選擇模式、循環(huán)模式三種基本模式。通常這三種基本模式會被組合起來使用，以表達(dá)各種較復(fù)雜的算法。2某算法流程圖如下圖所示：執(zhí)行該算法，當(dāng)s的值為0時(shí)()Ak的值為10B程

2、序出錯(cuò)C語句“kk1”共被執(zhí)行了2次D輸出k的值D模擬程序運(yùn)行步驟如下：s10，s0不成立，程序按順序依次運(yùn)行kk1和ssk，得到k1，s9；因?yàn)閟9，s0不成立，程序繼續(xù)按順序依次運(yùn)行k k1和ssk，得到k2，s7；因?yàn)閟7，s0不成立，程序繼續(xù)按順序依次運(yùn)行kk1和ssk，得到k3，s4；因?yàn)閟4，s0不成立，程序繼續(xù)按順序依次運(yùn)行kk1和ssk，得到k4，s0，然后輸入k。當(dāng)s0時(shí)，k的值為4，程序會輸出k的值，不會出錯(cuò)，而根據(jù)前面分析，語句“kk1”被執(zhí)行了4次，故選D。3枚舉算法的使用范圍是()A所有情況B答案無窮多的情況C答案的個(gè)數(shù)有限且可一一列舉D答案個(gè)數(shù)唯一的情況C本題主要考

3、查學(xué)生對枚舉算法思想的理解。枚舉算法屬于搜索策略，適用于能將所有可能情況列出并一一排查的情況，枚舉算法的關(guān)鍵是要列舉出所有可能的情況，不遺漏也不重復(fù)。4下列關(guān)于對象的描述中，錯(cuò)誤的是()A對象的屬性用于描述對象的狀態(tài)B對象的屬性與方法可以有多個(gè)C對象事件的發(fā)生會驅(qū)動該對象相應(yīng)事件處理過程的執(zhí)行D對象的屬性值只能在屬性窗口中設(shè)置D本題主要考學(xué)生對“對象”的認(rèn)識和理解，在面向?qū)ο蟮某绦蛟O(shè)計(jì)語言中，對象(object)是客觀存在的事物或概念。一個(gè)對象的狀態(tài)是通過很多個(gè)不同屬性(property)來描述，比如一個(gè)文本框內(nèi)字體、顏色、文本框風(fēng)格等。行為是指對屬性進(jìn)行操作和處理的方法(method)。在面

4、向?qū)ο蟮某绦蛟O(shè)計(jì)中，一個(gè)對象是由一組描述對象狀態(tài)的數(shù)據(jù)和一組描述處理對象屬性的方法的代碼構(gòu)成的。對象的屬性定義既可以在屬性窗口中直接設(shè)置，也可以在程序代碼中通過程序?qū)崿F(xiàn)。5下列VB表達(dá)式的值等于3的是()ASqr(2)1BAbs(1)2CAsc(1)2DLen(2)1D本題主要考查學(xué)生對基本函數(shù)的認(rèn)識和理解。Sqr(2)是求2的算術(shù)平方根，abs(1)是求1的絕對值，asc(1)是求1的ASCII值，Len(2)是求字符串2的長度，由此得出答案為D。Len(2)1213。6有如下VB程序段：a12b54abba該程序段執(zhí)行后，變量a、b的值分別是()A12、54 B54、12C12、12 D5

5、4、54D本題主要考查學(xué)生對賦值語句執(zhí)行過程的認(rèn)識和理解。這是一段順序結(jié)構(gòu)的VB程序，按照語句的順序依次執(zhí)行賦值語句，賦值語句將等式右邊的值存入到左邊的變量中。模擬程序執(zhí)行結(jié)果，可知答案為D，而不是簡單的變量值交換。7在VB窗體中有一個(gè)對象，該對象的屬性窗口如圖所示。下列說法中，不正確的是()AInterval為屬性名B1800為屬性值C該對象的名稱為Timer1D根據(jù)“Timer1Timer”可判斷窗體名為TimerD本題主要考查學(xué)生對VB屬性窗口的認(rèn)識。在VB屬性窗口中，下拉按鈕左邊顯示的是對象名(Timer1)，右邊顯示其屬于的類(Timer)，下方分成左右兩列，左邊一列顯示對象的屬性名

6、，如當(dāng)前選中的是“Interval”屬性，右邊為其對應(yīng)的屬性值。由此圖可以看出Timer1.Interval0。8已知單調(diào)函數(shù)f(x)在0,1區(qū)間上存在一個(gè)x0，使f(x0)0?，F(xiàn)用對分查找法搜索x0的值，開始搜索區(qū)間為0,1，若經(jīng)過10次對分查找后還需繼續(xù)搜索，則第11次搜索區(qū)間的長度為()A.B.C.D.D此題看上去似乎和數(shù)學(xué)密切相關(guān)，但其實(shí)只是考查了對分查找的概念理解。已知f(x)是單調(diào)函數(shù)，意味著f(x)已按大小 有序排列，根據(jù)對分查找的概念，開始搜索區(qū)間為0,1，經(jīng)過1次對分查找后，第2次的搜索長度變?yōu)椋?jīng)過2次對分查找后，第3次的搜索長度變?yōu)榻?jīng)過10次對分查找后，第11次的搜索長度

7、變?yōu)椤?有如下的VB程序段：Dim a(1 To 5)As Integer，i As Integer，c As Integera(1)2：a(2)1：a(3)3：a(4)4：a(5)5c0For i3 To 5If a(i2)a(i1)a(i) Then cc1Next itext1.TextStr(c)該程序段運(yùn)行后，文本框text1中顯示的內(nèi)容是()A1B2C3D4B本題考查了循環(huán)和一維數(shù)組。變量c的初始值為0，模擬循環(huán)程序運(yùn)行步驟如下：當(dāng)i3時(shí)，a(1)a(2)a(3)成立，所以c1；當(dāng)i4時(shí)，a(2)a(3)a(4)也成立，所以c2；當(dāng)i5時(shí)，a(3)a(4)a(5)不成立，循環(huán)結(jié)束。

8、最后在文本框輸出結(jié)果c。10【加試題】某查找算法的部分VB代碼如下：tFalsei0Do While i<7 And tFalseii1If a(i)Key Then tTrueLoopIf tFalse Then i0數(shù)組元素a(1)到a(7)的數(shù)據(jù)依次為“3,5,1,5,8,9,5”當(dāng)變量key值為5時(shí)，運(yùn)用該算法處理后，變量i的值是()A0B2C4D7B此題考查順序查找的程序?qū)崿F(xiàn)過程，根據(jù)程序判斷何時(shí)退出循環(huán)。順序查找是按照數(shù)組a下標(biāo)從1到7順序查找并比較，如果找到有符合條件的相等的數(shù)據(jù)，就退出循環(huán)。此題中a(2)，a(4)，a(7)均為5，但程序找到第一個(gè)相等的數(shù)據(jù)就結(jié)束了，所以

9、當(dāng)算法處理后，變量i的值為2。11【加試題】通過ADO的Recordset對象實(shí)例aa打開了如下表所示的記錄集：序號貨名售價(jià)數(shù)量1B5筆記本6.51224B橡皮1.2503簽字筆1.1454圓規(guī)5.325當(dāng)前記錄是第3條，要用Fields集合返回第3個(gè)字段的信息，正確的表示是()Aaa.Fields(0)Baa.Fields(1)Caa.Fields(”序號”)Daa.Fields(”售價(jià)”)D需要了解Fields集合的兩種書寫格式，指定字段名或者字段序號。題目要求返回第3個(gè)字段的信息，即“售價(jià)”字段的信息。而字段序號是從0開始編號，所以第3個(gè)字段應(yīng)該是編號2，故A、B選項(xiàng)均錯(cuò)誤。12【加試題

10、】小明在VB中定義了以下函數(shù)，功能是求a和b的最大公約數(shù)。Function gcd(a As Integer，b A s Integer)As IntegerDo While b>0ca Mod babbcLoopEnd Function調(diào)試中發(fā)現(xiàn)計(jì)算結(jié)果一直是0。經(jīng)過仔細(xì)觀察與分析，發(fā)現(xiàn)錯(cuò)誤的原因是()A函數(shù)名有錯(cuò)B變量c沒有定義C函數(shù)沒有返回值Db>0應(yīng)該改為b>0CA選項(xiàng)函數(shù)名的命名規(guī)則同變量名。VB中可以省略一些變量的定義，未定義的變量即為通用類型，即根據(jù)賦值變化數(shù)據(jù)類型，所以B選項(xiàng)局部變量c未定義，不影響程序運(yùn)行。D選項(xiàng)把循環(huán)條件改成b>0反而會使Do Whi

11、heLoop循環(huán)進(jìn)入死循環(huán)。所以正確答案是C。二、非選擇題(本大題共5小題，其中第13小題4分，第14小題4分，第15小題5分，第16小題8分，第17小題5分，共26分)13某倉庫物品代碼格式為“XXXXXXXXXY”，其中“X”和“Y”均為0到9之間的數(shù)字，“Y”為校驗(yàn)碼。校驗(yàn)碼由前面9個(gè)X計(jì)算得到，計(jì)算方法為：從左邊開始，第1個(gè)數(shù)字乘以1加上第2個(gè)數(shù)字乘以2依此類推，直到加上第9個(gè)數(shù)字乘以9，將該結(jié)果除以10，所得余數(shù)即為校驗(yàn)碼。小吳設(shè)計(jì)一個(gè)根據(jù)校驗(yàn)碼校驗(yàn)物品代碼的VB程序，功能如下：在文本框Text1中輸入物品代碼，單擊“校驗(yàn)”按鈕Command1，如果輸入的校驗(yàn)碼與計(jì)算所得的校驗(yàn)碼一致

12、，就輸出“校驗(yàn)通過”(如圖甲所示)，否則輸出“校驗(yàn)不通過！”(如圖乙所示)。甲乙實(shí)現(xiàn)上述功能的VB程序如下，加框處代碼有錯(cuò)，請改正。Dim s As String用于存儲輸入的物品代碼Dim t As StringDim i As Integer，j As IntegerDim sum As Integer用于存儲計(jì)算校驗(yàn)碼的累加和Dim checkold As Integer用于存儲輸入物品代碼中的校驗(yàn)碼YDim checknew As Integer用于存儲按照前面9個(gè)數(shù)字X計(jì)算所得的新校驗(yàn)碼Dim a(1 To 10) As IntegerPrivate Sub Command1Clic

13、k()從物品代碼中取出9個(gè)數(shù)字X依次存儲到a(1)到a(9)中，取出校驗(yàn)碼Y存儲到a(10)中s(1)j0For i1 To 13tMid(s，i,1)If (t>”0”) And(t<”9”) Thenjj1a(j)Val(t)End IfNext i計(jì)算新的校驗(yàn)碼并和輸入的校驗(yàn)碼進(jìn)行比較sum0For i1 To 9sumsum(2)Next ichecknewsum10(3)checkolda(10)If checkoldchecknew ThenLabel1.Caption”校驗(yàn)通過。”ElseLabel1.Caption”校驗(yàn)不通過！”End IfEnd Sub【解析】本

14、題考查學(xué)生的程序模擬能力，根據(jù)輸入的數(shù)據(jù)模擬程序運(yùn)行過程，分析程序功能，得到輸出結(jié)果。通過文本框?qū)ο骉ext1輸入數(shù)據(jù)后，第一次循環(huán)將字符串轉(zhuǎn)換成數(shù)字類型并賦值給數(shù)組變量a。第二次循環(huán)根據(jù)題意計(jì)算校驗(yàn)碼：第1個(gè)數(shù)字乘以1加上第2個(gè)數(shù)字乘以2最后兩個(gè)校驗(yàn)碼進(jìn)行比對，一致則成功，否則校驗(yàn)失敗?！敬鸢浮?1)text1.text(2)a(i)*i(3)sum mod 1014運(yùn)行下列VB程序，在文本框Text1中輸入15，界面如圖所示。單擊“開始”按鈕Command1后，標(biāo)簽Label1中顯示的內(nèi)容是_(1)_，文本框Text2中顯示的內(nèi)容是_(2)_。Private Sub Command1Cli

15、ck()Const x”轉(zhuǎn)換成八進(jìn)制數(shù)為”Dim y As Integer用于存儲輸入的十進(jìn)制自然數(shù)Dim s As String用于存儲轉(zhuǎn)換后的結(jié)果Dim r As IntegeryVal(Text1.Text)s”Do While y<>0采用除八取余法ry Mod 8sStr(r)syy8LoopLabel1.CaptionText1.TextxText2.TextsEnd Sub【解析】此題考查學(xué)生的程序模擬能力，根據(jù)輸入的數(shù)據(jù)模擬程序運(yùn)行過程，分析程序功能，得到輸出結(jié)果。通過文本框?qū)ο骉ext1輸入數(shù)據(jù)后，程序?qū)⑺D(zhuǎn)換成數(shù)字類型并賦值給變量y，然后判斷y是否為0，若為0，

16、則直接結(jié)束Do While循環(huán)；若不為0，則采用除8取余法，將10進(jìn)制數(shù)15轉(zhuǎn)換成8進(jìn)制數(shù)(參考10進(jìn)制轉(zhuǎn)2進(jìn)制的除2取余法)，并將它以字符串類型變量s顯示。循環(huán)結(jié)束后，標(biāo)簽Label1中顯示從Text1中取的值字符型常量x的值，字符串類型的相加等同于字符串直接連接。所以標(biāo)簽Label1中顯示的內(nèi)容是“15轉(zhuǎn)換成八進(jìn)制數(shù)為”，而Text2中顯示的是轉(zhuǎn)換結(jié)果17。【答案】(1)15轉(zhuǎn)換成八進(jìn)制數(shù)為(2)1715若干個(gè)字符，終止符是“#”，計(jì)算輸入的字符中“a”出現(xiàn)的次數(shù)。(包括大小寫)Private Sub Command1Click()Dim s As StringDim i As Integ

17、er，n As IntegersText1.Texti1n0Do While_(1)_If Mid(s，i,1)”a”Then nn1_(2)_LoopLabel1.Caption”a的個(gè)數(shù)為”Str(n)End Sub為了使程序能正常運(yùn)行，上述程序中空格處應(yīng)填入(1)_；(2)_。【解析】(1)本題屬于稍難題。由題干可知，本題求解字符串中”a”的出現(xiàn)次數(shù)，因此需要枚舉字符串中的所有字符，并判斷是否為字符”a”，顯然使用枚舉算法是最合適的。(2)觀察代碼可知考查的是枚舉的范圍的確定，用Do While語句實(shí)現(xiàn)，當(dāng)字符不等于“#”的時(shí)候要繼續(xù)枚舉，故空格(1)為Mid(s，i,1)<>

18、;”#”，當(dāng)檢測完一個(gè)字符后，就要為枚舉下一個(gè)做準(zhǔn)備，改變循環(huán)變量i的值，即ii1?！敬鸢浮?1)Mid(s，i,1)<>”#”(2)ii116【加試題】鄭均收集了某公司生豬生長各階段的產(chǎn)肉比數(shù)據(jù)，他設(shè)計(jì)了如下Visual Basic程序進(jìn)行數(shù)據(jù)處理。程序運(yùn)行界面如圖所示，左邊列表框List1中顯示生豬生長的各階段編號及對應(yīng)的產(chǎn)肉比，單擊“排序”按鈕Command1后，右邊的列表框List2中顯示按產(chǎn)肉比從高到低排序后的數(shù)據(jù)。所收集到的不同生長階段編號和對應(yīng)的產(chǎn)肉比數(shù)據(jù)已分別保存在數(shù)組a和數(shù)組b中。排序部分程序如下：Dim a(1 To 10) As String數(shù)組a用于存儲階段

19、編號Dim b(1 To 10) As Single數(shù)組b用于存儲產(chǎn)肉比Private Sub Command1Click()Dim i As Integer，j As Integer，k As Integer，t As Single，s As StringFor i1 To 9kiFor ji1 To 10If_ Then kjNext jIf k<>i Thensa(i)：a(i)a(k)：a(k)stb(i)：_：b(k)tEnd IfNext iFor i1 To 10List2.AddItem a(i)” ”Str(b(i)Next iEnd SubPrivate Sub

20、 Form_Load()此過程用于對數(shù)組a和數(shù)組b進(jìn)行賦值，并顯示在List1中，代碼略End Sub(1)解決此問題采用的算法是_。(填“選擇排序”或“冒泡排序”)(2)在程序和畫線處填入適當(dāng)?shù)恼Z句或表達(dá)式，將程序補(bǔ)充完整：程序中畫線處應(yīng)填入_。程序中畫線處應(yīng)填入_?！窘馕觥看祟}主要考查學(xué)生對排序算法的理解和代碼實(shí)現(xiàn)。10個(gè)數(shù)據(jù)需要排序，最多需要排9遍，所以i從1到9，題目要求按產(chǎn)肉比從高到低排序后，程序先假設(shè)第1個(gè)數(shù)字最大(ki)，然后每一個(gè)數(shù)字和它比較，如果有某個(gè)數(shù)據(jù)比第1個(gè)數(shù)字大，就記錄下它的位置k，然后剩下的數(shù)據(jù)再和b(k)比較，重復(fù)進(jìn)行。一遍完成后，比較k是否等于1，相等就直接進(jìn)行

21、第2遍排序，不相等就將b(k)和b(1)交換后再進(jìn)行第2遍排序以此類推，直到9遍排序結(jié)束。這是典型的選擇排序。處是比較b(k)和b(j)，如果有一個(gè)數(shù)比假設(shè)最大的數(shù)據(jù)b(k)大，就記錄下這個(gè)位置k(kj)，處是交換b(i)和b(j)以保證b(k)里放的是排序范圍內(nèi)最大數(shù)。【答案】(1)選擇排序(2)b(k)<b(j)或b(k)<b(j)b(i)b(k)17【加試題】編寫VB程序，實(shí)現(xiàn)如下功能：在文本框Text1中輸入一個(gè)整數(shù)，單擊“查找刪除”按鈕Command1，采用對分查找法在數(shù)組A中刪除該數(shù)(該數(shù)后面的數(shù)組元素都前移一位)，并在標(biāo)簽Label2中顯示刪除后的結(jié)果(運(yùn)行效果如圖82所示)；否則，在標(biāo)簽Label2中顯示“該數(shù)沒有找到