《2022年高二信息技术上学期期中联考试题 .pdf》由会员分享,可在线阅读,更多相关《2022年高二信息技术上学期期中联考试题 .pdf(10页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、1 2016 年上学年高二技术期中测试卷第一部分信息技术一、选择题部分(本大题共12 小题,每小题2 分,共 30分。在每小题给出的四个选项中,只有一个符合题目要求)1. 某算法的流程图结构如下图所示, 其算法结构属于( ) A.顺序结构B. 选择结构C.树形结构D. 循环结构2. 某算法流程图如图所示。当输入值为0 时, 该算法执行的步骤是( ) A.B. C.D. 3. 某算法的部分流程图如图所示,执行这部分流程后,变量d 的值为()名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第
2、 1 页,共 10 页 - - - - - - - - - 2 A. 0 B.1 C.8 D.9 4. 某算法流程图如图所示:执行该算法,输出变量s 和变量 i 的值分别为A16 8 B28 12 C10 8 D18 10 5. 计算某次考试的平均分的部分算法流程图如图所示, 其中 s 用来记录已输入考生的人数,sum 用来计算分数之和 ,avg 用来存储平均分, 输入 -1 时表示输入结束。N s=10? ss+i i i+2 s0:i 4 Y 输出 s、i名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - -
3、- - - - - 第 2 页,共 10 页 - - - - - - - - - 3 图中处应填入的是( ) A.sumsum+xB.ss+xC.sum sum+sD.avgavg+x6. 在 VB中, 语句 label1.caption= white 执行后 , 标签 label1的( ) A.文字颜色变为白色B.文字内容变为 white C.背景变为白色D.名称变为 white 7. 一个 VB程序的运行界面如图所示。下列说法不正确的是( ) A.文本框 Text1 的 Caption 属性值为“ H”B.标签 Label1 的 Caption 属性值为“输入字符”C.命令按钮Comman
4、d1 的 Caption 属性值为“查询”D.窗体的 Caption 属性值为“查询字符ASCII 码”名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页,共 10 页 - - - - - - - - - 4 8. 有如下程序段:Dim i As Integer, ans As Integer Dim a(1 To 10) As Integer sum = 0 For i = 1 To 10 a(i) = i 2 If a(i) Mod 3 = 0 Then ans = ans
5、+ a(i) Next i Text1.Text = Str(ans) 该程序段运行后,文本框Text1 中显示的内容是()A.55 B. 126 C. 259 D. 385 9. 下列能作 为 VB变量名 的是 ( ) A.MOD B.a1 C.3F D.no_1 10. 观察如下程序, 变量 x 的数据类型应定义为( ) Dim x As x=Mid(computer,1,3)A.Integer B.Single C.Long D.String 11. 设一个三位数是n, 它的个位数字为a, 十位数字为b, 百位数字为c, 则 b 的 Visual Basic表达式是 ( ) A.n-a-
6、c B.(n-a* 100-c)/10 C.Int(n/10)-Int(n/100) *10 D.n-Int(n/100)-Int(n/10) 12. 下列 VB表达式的值等于34 的是( ) A.Abs(-35)+1 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页,共 10 页 - - - - - - - - - 5 B.Len( 33)+1C.Mid( 1234567,3,4)D.Int(33.7)+1 13 设 a=5,b=10, 则执行 c=Int(b-a) * Rn
7、d+a)+1 后,c 值的范围是 ( )A.510 B.69 C.610 D.59 14. 某 VB代码如下 : a=Computerb=Mid(a,2,1) c=Asc(b) d=Chr(c+1) 程序运行后 ,d 的值是 ( ) A.pB.DC.CD.o15. 有如下 VB事件处理过程 : Private Sub Command1_Click( ) Dim i As Integer List1.Clear For i=1 To 10 If i Mod 2=0 Then List1.Additem i End If Next i End Sub 该事件被执行后, 在列表框 List1中显示的
8、数据是( ) 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页,共 10 页 - - - - - - - - - 6 A. 1 2 3 4 5 6 7 8 9 10 B .1 3 5 7 9 C. 2 4 6 8 10 D. 10 9 8 7 6 5 4 3 2 1名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页,共 10 页 - - - - - - - - -
9、 7 二、填空题部分16. 计算圆周率的近似公式是:=1- +( -1)n-1。某人编写下面的程序用此公式计算并输出 的近似值 , 请在划线处填上合适的VB语句。Private Sub Command1_Click( ) pi=1 sign=1 n=20 000 For k= sign= pi=pi+sign/k Next k Print pi*4 End Sub 17. 百元百鸡问题: 假如公鸡5 元一只 , 母鸡 3 元一只 ,3 只小鸡一元 , 现在 100 元, 可买公鸡、母鸡、小鸡各几只 ?用 VB程序解决百元百鸡问题, 程序如下 : For i=1 To 20 For j=1 To
10、 33 k= If i+j+k=100 Then Print 公鸡 +Str(i) +母鸡 +Str(j) +小鸡 +Str(k)Next j Next i (1) 该程序采用的算法是( 选填“枚举算法”或“解析算法”) 。(2) 为实现程序功能, 在程序画线处应填写的表达式是。18. 编写 VB程序,实现如下功能:在文本框Text1 中按“ YYYY-MM-DD ” (年 4 位,月 2 位,日 2 位)格式输入某一日期,单击“推算”按钮Command1 ,在文本框Text2 中输出该日期对应的星期,运行界面如下第14 题图所示。名师资料总结 - - -精品资料欢迎下载 - - - - -
11、- - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 7 页,共 10 页 - - - - - - - - - 8 第 14 题图(1)要使标签对象Label1 中显示的文本“date ”修改为“日期”, 可在其属性窗口中将_属性的属性值改“日期”。(2)为实现上述功能,请在划线处填入合适的代码。Private Sub Command1_Click() Dim s As String 变量 s 存储输入的日期 Dim s1 As String, s2 As String, s3 As String Dim y As Integer, y2 As In
12、teger, m As Integer, d As Integer, n As Integer s1 = 622503514624 s2 = 512503514624 s3 = 日一二三四五六 s = y = Val(Mid(s, 1, 4) m = Val(Mid(s, 6, 2) d = Val(Mid(s, 9, 2) y2 = y Mod 100 n = Int(y2 / 4) + y2 + d If y Mod 4 = 0 And y Mod 100 0 Or y Mod 400 = 0 Then 判断是否为闰年 n = n + Val(Mid(s2, m, 1) Else n =
13、n + Val(Mid(s1, m, 1) End If n = n Mod 7 + 1 Text2.Text = Mid(s3, n, 1) End Sub 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页,共 10 页 - - - - - - - - - 9 (3)如果输入日期“2017-02-01 ” ,则输出结果是星期。19. 编写 VB程序,寻找第1 位为 2,第 5 位为 5,数字长度为5 的完全平方数,并统计个数。要求:单击 “寻找”按钮 Command1 , 将
14、符合要求的五位数显示在列表框List1中, 统计个数显示在标签Label2中,界面如第14 题图所示。实现上述功能的VB程序代码如下:Private Sub Command1_Click() Dim i As Integer, n As Integer Dim x As Integer n = 0 For i = 0 To 999 x = If Int(Sqr(x) = Sqr(x) Then List1.AddItem End If Next i Label2.Caption = 共有: + Str(n) + 个 End Sub (1)在设计应用程序界面时,能在窗体上添加标签Label2 的
15、操作是(填编号:单击工具箱中的标签控件双击工具箱中的标签控件)(2)为实现上述功能,划线处应填入的代码为;划线处应填入的代码为;划线处应填入的代码为。第 14 题图名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 9 页,共 10 页 - - - - - - - - - 10 第一部分信息技术答题卷班级姓名学号一、 选择题 ( 本大题共 12 小题 , 每小题 2 分, 共 24 分。 在每小题给出的四个选项中, 只有一个符合题目要求 ) 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 二、 非选择题 ( 本大题共 4 小题, 其中第 16 小题 4 分, 第 17 小题 4 分, 第 18 小题 5 分, 第 19 小题 7分) 16. (2 分) (2分) 17. (2分) (2分) 18. (1分) (2分) (2分) 19. ( 1) (1分) ( 2) (2分) (2分) (2分) 注:代码填写不区分大小写名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 10 页,共 10 页 - - - - - - - - -
限制150内