《2023年高中信息技术VB枚举算法与程序实现浏览题阅览题会考复习题.pdf》由会员分享，可在线阅读，更多相关《2023年高中信息技术VB枚举算法与程序实现浏览题阅览题会考复习题.pdf（16页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 1 页，总 1 页 高中信息技术 VB 枚举算法与程序实现浏览题阅览题会考复习题(word版可编辑修改)编辑整理：尊敬的读者朋友们：这里是精品文档编辑中心，本文档内容是由我和我的同事精心编辑整理后发布的，发布之前我们对文中内容进行仔细校对，但是难免会有疏漏的地方，但是任然希望（高中信息技术 VB 枚举算法与程序实现浏览题阅览题会考复习题(word版可编辑修改)）的内容能够给您的工作和学习带来便利。同时也真诚的希望收到您的建议和反馈，这将是我们进步的源泉，前进的动力。本文可编辑可修改，如果觉得对您有帮助请
2、收藏以便随时查阅，最后祝您生活愉快 业绩进步，以下为高中信息技术 VB 枚举算法与程序实现浏览题阅览题会考复习题(word版可编辑修改)的全部内容。高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 2 页，总 15 页 高中信息技术 VB枚举算法与程序实现 浏览题阅览题 会考复习题 学校：_姓名：_班级：_考号：_ 评卷人 得分 一、选择题 1使用枚举法解决问题，在列举问题的可能解的过程中（）A可以遗漏，但不应重复 B不能遗漏,也不应重复.C可以重复,但不应遗漏。可以遗漏,也可以重复。【答案】B【解析】2有如下 VB程序段 m=a（1）For i=2
3、to 100 If a（i)m then m=a（i）Next i 该程序段执行后，变量 m中存储的是()A累加值 B计数值 Ca(1)至 a(100）中的最大值 D最小值【答案】C【解析】3读程序，写出下列程序的输出结果 55、s=1 事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习
4、题(word 版可编辑修改)试卷第 3 页，总 15 页 For j=100 To-100 Step 1 s=s j Next j MsgBox(s）上述程序段中 s=s j 的执行次数是(）A、400 B、401 C、200 D、201【答案】D【解析】4统计 11 000 间个位数是 4，且能被 9 整除的数共有多少个,可以采用的算法是（)A查找算法 B 枚举算法 C解析算法 D 排序算法【答案】B【解析】5在游戏中经常有开数字密码锁得场景，已知一个 6 位数的密码锁，正确的数字顺序组合是由下面一组数字 426815 经过两次冒泡排序得到,请问开锁的正确数字组合可能是（）。A864251
5、B842651 C126845 D124685【答案】A【解析】6某食品连锁店 5 位顾客贵宾消费卡的积分依次为 810，512，613,700，900.采用选择排序算法对其排序，若完成第一遍时的结果为：512,810,613，700,900，则完成第二遍的结果是（)A 512，613，700，900，810 B 512，810,613，900，700 C 512，900,613，700，810 D 512，613，810,700，900 事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本
6、文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 4 页，总 15 页【答案】D【解析】7模拟剪刀石头布的游戏,骰子是一个正六面体，用 13 这 3 个数分别代表剪刀、石头、布这三种情况,使用 RND 随机函数可以表示为（）A INT（RND（3）+1）B INT（RND 2+1)C INT（RND（2）+1）D INT（RND 3+1)【答案】D【解析】8三个正整数 a、b、c 满足等式 a2+b2=c
7、2,a、b、c 称为“勾股数”，求出 100 以内所有“勾股数”可采用的算法是()A枚举算法 B 解析算法 C 冒泡排序 D 顺序查找【答案】A【解析】9有如下 VB程序：Dim i As Integer，j As Integer,k As string,n As Integer n=3 List1。Clear For i=1 To n k=For j=1 To i k=k+*Next j 事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部
8、内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 5 页，总 15 页 List1。AddItem k Next i 该程序运行后,在列表框 List 中显示的是（)A B C D 【答案】A【解析】10关于枚举算法的说法错误的是（）A一般是通过循环中嵌套分支结构来实现的。B 循环结构用来“枚举”，分支结构用于“检验”。C列举所有可能解的范围时，可以扩大但不能缩小，以防漏解。D采用枚举法时，也可能找不到符合条件的解。【答案】C【解析】11VB标准函数 R
9、ND 的作用是返回一个大于等于 0 且小于 1 的随机数。只能产生大于等于 100且小于 200 随机 整数的 VB表达式是（）A、Int（Rnd*100）B、Int（Rnd*101+100）C、Int（Rnd99+100）D、Int(Rnd*100+100)【答案】D【解析】事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 V
10、B枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 6 页，总 15 页 下列语句用于计算“s=1+4+7+10+25的值。For i=”1 To 25 Step12Next i s=0 s=s+i 正确的语句顺序是()A B C D 【答案】C【解析】13解决上问题所用的算法是:（)A、枚举法 B、解析法 C、顺序查找 D、选择法【答案】B【解析】14已知三角形的三条边长分别为a、b、c，半周长2/)(cbap，该三角形面积计算公式为:)()(cpbpapps，计算 S 的 VB语句是（）A)()(cpbpapps B)()(cpbpappSqrs)C)(*)(*)(
11、*cpbpapps D)(*)(*)(*(cpbpappSqrs）【答案】D【解析】15小李有一被污损的保修卡（如图)，客服热线中有一个数字被污损掉了，找出这个数字的适合算法是（)事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 7 页，总 15 页
12、A枚举算法 B解析算法 C对分查找算法 D递归算法【答案】A【解析】16数组 a 中存放了某校田径运动会中八名 100 米短跑运动员的成绩,数据存放情况如下表：a（1)a（2）a（3）a（4）a（5）a(6）a(7)a（8）12.8 13.3 12。3 12。6 13。5 12。1 13 13。8 若按升序排列，并采用冒泡排序算法自右向左进行比较和交换，那么前两轮排序的数据交换总次 数为（）。A 5 B6 C 7 D 8【答案】D【解析】17三个正整数 a、b、c 满足等式 a2+b2=c2，a、b、c 称为“勾股数，求出 100 以内所有“勾股数 可采用的算法是（）A、枚举算法 B、解析算法
13、 C、冒泡排序 D、顺序查找【答案】A【解析】事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 8 页，总 15 页 评卷人 得分 二、填空题 18请认真阅读并分析下面 Visual Basic程序代码，按要求完成题目。Dim a（1 To 6）As
14、Integer Dim n，i，j,k As Integer Private Sub Command1_Click（)For i=1 To n-1 For j=（1）To n If a（i）a(j）Then k=a（i）:（2）：a（j)=k End If Next j Next i For i=1 To n list2.AddItem Str（a（i）)Next I End Sub Private Sub Text1_KeyPress（KeyAscii As Integer)If KeyAscii=13 Then n=n+1 a(n)=Val（(3）)List1.AddItem Str(a(
15、n）)Text1。Text=”:Text1.SetFocus 事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 9 页，总 15 页 End If End Sub 程序中出现了 text和 list两种控件，其中 list控件的中文名称是列表框，tex
16、t控件的中文名称是 。（2）在上述程序段中 3 处带序号的空白地方补充恰当的语句，完善程序。【答案】文本框(1)i+1 （2)a（i)=a（j）(3)text1。text【解析】19下面程序的功能是：计算表达式1+3+5+(2n1)的值，在文本框Text1 中输入 n 的值，结果在文本框 Text2 中输出.则程序中划线处的语句应填_。Private Sub Command1_Click(）Dim sum As Long，i As Integer，n As Integer sum=0 n=Val（Text1.Text）For i=1 To 2 n-1 Step 2 Next i Text2.T
17、ext=Str(sum)End Sub 【答案】sumsum+i【解析】20王敏的 E.Mail 邮箱密码忘记了，但她需要收一封很重要的来信，请你帮她尽可能找出密码.她零星记得自己的密码信息:密码是六位数字，前面两位为 31；事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word
18、 版可编辑修改)试卷第 10 页，总 15 页 最后两位数字相同；能被 16 和 46 整除.程序界面如图所示，单击“帮助找回密码”按钮(Command1）后，可能的密码显示在列表框List1中。解决此问题的相应程序如下：Private Sub Command1_Click（)Dim a As Integer，s As long，b As Integer，i As Integer For i 0 To 9 999 _ s310 000 i If s Mod 460 Then _ b（s Mod 100）100 If ab Then List1.Addltem Str(s)End If End
19、If Next i End Sub 事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 11 页，总 15 页 （1）解决此问题的算法是_（选填:枚举算法或排序算法）在程序和画线处,填入适当的语句或表达式，把程序补充完整:（2)程序中画线处应填入_。(3
20、)程序中画线处应填入_。【答案】（1)枚举算法(2）step 16(3）as mod 10【解析】21输入一个三位数的整数，要求将此三位数的各位上的数字重新排列，组成一个尽可能大的三位数。例如：输入 213，重新排列可得到尽可能大的三位数是 321。现要求编写 VB程序（运行界面如图所示)，实现如下功能：在文本框 Text1 中输入一个三位数整数，单击“求解”按钮 Command1，在文本框 Text2 中显示重新组合后的最大三位数整数。某同学按此要求编写的程序如下，其中函数 max（x)用于求解最大三位数整数，但加框处代码有错，请改正。事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对
21、但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 12 页，总 15 页 _ _ Function max（x As Integer）As Integer Dim a As Integer，b As Integer，c As Integer,t As Integer a=x 100 b=(x 10)10 c
22、=x mod 10 If a b Then t=a:a=b：b=t If a c Then t=a：a=c：c=t If b c Then t=c:c=b:b=t max=c 100+b 10+a End Function Private Sub Command1_Click()Dim n As Integer，y As Integer n=Val(Text1.Text）y=max（n)Text2。Text=Str（y)End Sub【答案】(x10)mod 10 a*100+b*10+c【解析】22现需计算 1*2*3*n=?有如下程序段，在划线处填入合适的语句或表达式，完成程序。s=1 i
23、=1 Do While i=n S=s*i 事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 13 页，总 15 页 i=i+1【答案】Loop【解析】23本程序要求完成的功能是：计算 s=1/1+2/（12）+3/(1 2*3）+n/（123*n)的
24、值.请将已有 VB代码补充完整。n=inputbox(“请输入n 的值”）s=0 _(1)_ For i=1 to n t=t*i s=s+_(2）_ Next i Print s（1）_ (2）_【答案】（1）t=1（2）i/t【解析】24素数:只能被 1 和它本身整除的自然数。要求编写 VB程序找出任意两个整数之间中所有的素数及个数,程序运行界面如下图所示。事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚
25、举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 14 页，总 15 页 请根据算法将下列程序补充完整。Function prime（a As Integer）As Boolean Dim j As Integer prime=True j=2 Do While prime And j=a 2 If a Mod j=0 Then prime=False Exit Do End If Loop End Function Private Sub Command1_Click（)Dim i
26、 As Integer,a As Integer，b As Integer Dim count As Integer a=Val（Text1.Text）b=Val（Text2.Text)事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 15 页，总 1
27、5 页 For i=a To b If =True Then List1.AddItem Str（i)count=count+1 End If Next i Label1.Caption=素数共有”+Str（count）+”个!End Sub【答案】j=j+1 prime（i）【解析】本题考核 VB基本语句含义的理解,自定义函数的应用。25有如下 Visual Basic程序：Private Sub Command1_Click（)Dim s As Integer Dim I As Integer S=0 For i=1 To 10 s=s+i7 Next i Text1.text=str（s
28、)End sub 该程序段运行后，文本框 Text1 中显示_【答案】4【解析】26流程图是实现输出 1100 之间所有能被 7 整除的整数。若再要统计其个数，则要设置一事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法高中信息技术 VB枚举算法与程序实现浏览题阅览题会考复习题(word 版可编辑修改)试卷第 16 页，总 15 页 个计数器
29、 c，c=0，如图所示，则计数器 c=c+1 应置于编号 处.【答案】2【解析】评卷人 得分 三、操作题 27如果一个整数是另一个整数的平方,则称该数是“完全平方数”。如：1=11，4=22，9=33，所以 1、4、9 是完全平方数。编写程序，统计 100 到 10000 之间的所有完全平方数的和。(4 分）【答案】sum=0 for i=10 to 100 sum=sum+ii next print sum【解析】事精心编辑整理后发布的发布之前我们对文中内容进行仔细校对但是难免会有疏漏的地方但是任然希望高中信息技术希望收到您的建议和反馈这将是我们进步的源泉前进的动力本文可编辑可修改如果觉得对您有帮助请收藏以便随时查部内容试卷第页总页高中信息技术枚举算法与程序实现浏览题阅览题会考复习题版可编辑修改高中信息技术枚举算法