《2022年程序与算法练习配答案.docx》由会员分享，可在线阅读，更多相关《2022年程序与算法练习配答案.docx（13页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、精选学习资料 - - - - - - - - - 学而不思就惘,思而不学就殆算法与程序练习 1 姓名：班级1A 班一组同学的英语听力成果分别为 及其次遍的排序结果分别为 :24、27、16、 15、24、18,以下采纳排序算法原始数据242716152418第一遍272416152418其次遍第三遍272424151618第四遍272424181615第五遍272424181615A. 冒泡排序, 27 24 16 15 24 18 B. 冒泡排序, 27 24 18 16 15 24 C. 挑选排序, 27 24 16 15 24 18 D. 挑选排序, 27 24 18 16 15 242
2、VB语句 List1.addItem di 的作用是把数组d 的数据添加到列表框对象List1中；该语句中的“addItem ” 是（）A. 属性名B. 属性值C.方法D. 大事3小明想用 VB编程制作一个名次运算器,第一将同学的成果录入到运算机中,同时存 放在数组 a 中,显示在左边列表框中；点击“ 排序” 按钮后,程序会将成果从高到低依 次排序显示在右边的列表框中；运行界面如下列图,请在两个划线处填入代码；Dim a1 To 100 As Single Dim shu As Integer Private Sub Command1_Click Dim i, j, k As Integer
3、Dim t As Single For i = 1 To shu - 1 k = i For j = i + 1 To shu If Then t = aj: aj = ak: ak = t End If Next j名师归纳总结 - - - - - - -第 1 页,共 7 页精选学习资料 - - - - - - - - - 学而不思就惘,思而不学就殆Next i For i = 1 To shuList2.AddItem 第 & Stri & 名： & StraiNext i End Sub Private Sub Text1_KeyPressKeyAscii As Integer Dim
4、 cj As Single If KeyAscii = 13 Then cj = ValText1.Text If cj 0 Then List1.AddItem Strshu & ： & Strcj ashu = cj End If Text1.Text = End If End Sub 4数组 a 共有 6 个元素构成： 49、45、 61、46、58、 57,如采纳挑选排序算法进行从 大到小排序,就元素的比较次数和排序需要几遍才能完成（）A.15 次, 4 遍 B.15 次, 5 遍 C.30 次, 4 遍 D.30 次, 5 遍 5Sub test3 双重循环运行 输出图形 与 3 重
5、复 , 但 3 已改题 For i = 1 To 5 step 1 s = For j = 1 To 2 * i - 1 s = Strj + s Next j List1.AddItem s Next i End Sub 该程序的运行后列表框输出的第三行是（）A、33333 B、55555 C、1 2 3 4 5 D、5 4 3 2 1 6Sub test2 a = 12 ：b = 12 ：c = 5 Label1.Caption = Label2.Caption = If a b Or Not b ak （2）shu = shu + 1【解析】（1）依据程序的部分内容判定,该程序是冒泡排序
6、,因此1 处的代码是用于交换位置；判定依据是 ajak（2）该程序的作用是当按下回车键的时候,一次将输入到文本 框 text1 中的数据添加到 list1 列表框中,这里的变量 shu 是用于计数的；4B【解析】挑选排序的比较次数是依据公式：nn 1/2 来运算的是,是15 次；排序遍数是5遍；5D【解析】6A【解析】7C【解析】8D【解析】9D【解析】10 D【解析】11 C【解析】12 A【解析】13 D【解析】14（1）f=False （1 分）（2）ValTex t1.Text（1 分）（3）a1+a2+a3=n（1 分）【解析】15（1）n=val （textl.text）s=s+3（3）bcda【解析】名师归纳总结 - - - - - - -第 7 页,共 7 页