2022年程序与算法练习配答案 .pdf

学而不思则惘，思而不学则殆算法与程序练习 1 姓名：班级1A 班一组同学的英语听力成绩分别为24、27、16、 15、24、18，下列采用排序算法及第二遍的排序结果分别为:原始数据242716152418第一遍272416152418第二遍第三遍272424151618第四遍272424181615第五遍272424181615A. 冒泡排序， 27 24 16 15 24 18B. 冒泡排序， 27 24 18 16 15 24C. 选择排序， 27 24 16 15 24 18D. 选择排序， 27 24 18 16 15 242 VB语句 List1.addItem d(i) 的作用是把数组d 的数据添加到列表框对象List1中。该语句中的“addItem ”是（）A. 属性名B.属性值C.方法D. 事件3小明想用VB编程制作一个名次计算器，首先将同学的成绩录入到计算机中，同时存放在数组a 中，显示在左边列表框中。点击“排序”按钮后，程序会将成绩从高到低依次排序显示在右边的列表框中。运行界面如图所示，请在两个划线处填入代码。Dim a(1 To 100) As SingleDim shu As IntegerPrivate Sub Command1_Click()Dim i, j, k As IntegerDim t As SingleFor i = 1 To shu - 1k = iFor j = i + 1 To shuIf Thent = a(j): a(j) = a(k): a(k) = tEnd IfNext j精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 1 页，共 7 页学而不思则惘，思而不学则殆Next iFor i = 1 To shuList2.AddItem 第 & Str(i) & 名： & Str(a(i)Next iEnd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)Dim cj As SingleIf KeyAscii = 13 Thencj = Val(Text1.Text)If cj 0 ThenList1.AddItem Str(shu) & ： & Str(cj)a(shu) = cjEnd IfText1.Text = End IfEnd Sub4数组 a 共有 6 个元素构成：49、45、 61、46、58、 57，若采用选择排序算法进行从大到小排序，则元素的比较次数和排序需要几遍才能完成（）A.15 次， 4 遍B.15 次， 5 遍C.30 次， 4 遍D.30 次， 5 遍5Sub test3()双重循环运行输出图形与 3 重复 , 但 3已改题For i = 1 To 5 step 1s = For j = 1 To 2 * i - 1s = Str(j) + sNext jList1.AddItem sNext iEnd Sub该程序的运行后列表框输出的第三行是（）A、33333 B、55555 C、12 3 4 5 D、5 43 216Sub test2()a = 12 ：b = 12 ：c = 5Label1.Caption = Label2.Caption = If a b Or Not b a(k) （2）shu = shu + 1【解析】（1）根据程序的部分内容判断，该程序是冒泡排序，因此1 处的代码是用于交换位置。判断依据是a(j)a(k)（2）该程序的作用是当按下回车键的时候，一次将输入到文本框 text1中的数据添加到list1列表框中，这里的变量shu 是用于计数的。4B【解析】选择排序的比较次数是根据公式：n(n 1)/2 来计算的是，是15 次。排序遍数是5遍。5D【解析】6A【解析】7C【解析】8D【解析】9D【解析】10 D【解析】11 C【解析】12 A【解析】13 D【解析】14 （1）f=False （1 分）（2）Val(Tex t1.Text)（1 分）（3）a1+a2+a3=n（1 分）【解析】15 （1）n=val （textl.text）s=s+3（3）bcda【解析】精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 7 页，共 7 页