诸暨中学期中考试高二信息试卷 .pdf

高二技术试题 第 1 页 2019 学年第二学期诸暨中学期中考试 高二年级技术学科 试题 命题人： 俞位昀 黄伟锋 一、选择题(本大题共 12 小题，每小题 2 分，共 24 分。每小题列出的四个备选项中只有一个是符 合题目要求的，不选、多选、错选均不得分) 1.下列说法不正确的是（ ） A.信息可以脱离它所反映的事物而存在 B.计算机只能对数字化的信息进行加工 C.物质、能源和信息是人类的三大要素，信息是无处不在的 D.世界上第一台机械计算机属于现代信息技术的具体体现 2.下列应用中采用了人工智能技术的是（ ） A.手机采用人脸识别技术解锁 B.网络课堂直播时老师与学生进行实时语音交流 C.采用 5G+8K 实时直播 2019 年乌镇互联网大会过程 D.用 Word 软件“拒绝修订”功能，自动恢复修订内容 3.使用 Access 软件打开某数据库，部分界面如图所示。 第 3 题图 下列说法正确的是（ ） A.“借阅 ID”字段的值不可以修改 B.当前状态下无法对“读者信息表”进行重命名 C.图书编号字段的值一定是连续的 D.此数据库文件中的 3 张数据表均可存在“读者编号”字段 4.下列关于进制与编码的说法正确的是（ ） A.计算机内部采用十六进制存储数据 B.十六进制数 15 转换为二进制为 10101 C.十六进制数 2020 是十六进制数 202 的 10 倍 D.字符“9”的内码用十六进制表示是 39，则字符“10”的内码用十六进制表示是 3A 5．将一个时长为 10 分钟、NTSC 制式（每秒播放 30 帧）、图像分辨率为 1024×768、32 位真彩色的 未经压缩 AVI 格式无声视频文件压缩为 MPEG 格式，可存放到可用容量为 5GB 的 U 盘中，则压缩 比至少为（ ） A.5:1 B.11:1 C.15:1 D.20:1 6．使用 Photoshop 软件制作“大雪节气”作品，编辑界面如图所示。下列说法正确的是（ ） 高二技术试题 第 2 页 A.可以在“自行车”图层中添加滤镜效果 B.当前状态下，不可以重命名“草堆”图层 C.将图中左下角的“38.33%”修改为“50%”，图像的存储容量变大 D.拷贝“大雪”图层的图层样式，可以粘贴到“背景”图层 7.某算法的部分流程图如图所示。执行这部分流程，若输出 b 的值为 5，则输入 a 的值可能为（ ） A.20 B.25 C.30 D.50 8． VB 表达式“Int(Rnd * 9) + 54 \ 3 ^ 2 / 3”的值可能是（ ） A. 19 B. 16 C. 27 D. 9 9. 有如下程序段： s = Text1.Text t = "" For i = 1 To Len(s) c = Mid(s, i, 1) If c < "a" Or c > "z" Then t = "" t = c + t Next i Label1.Caption = t 执行此程序段时，在文本框 Text1 中输入“2020 Nihao Wolaile”，则标签 Label1 中显示的内容 是（ ） A.elialoW B.elialo C.elia D.eli 10. 有如下 VB 程序段: Randomize a(0) = 0: i = 1 Do While i a(m - 1) And a(m) > a(m + 1) Then (2) ElseIf a(m) > a(m - 1) And a(m) < a(m + 1) Then (3) End If Loop list1.AddItem Str(a(m)) & Str(m) 上述程序方框出可选语句为：i=m+1 ②j=m-1 ③flag=true 则（1）、（2）、（ 3）处语句依次是（ ） A. ①②③ B. ①③② C. ③①② D.②③① 12. 有如下程序段： For i = 1 To 2 Min = i For j = i To 8 - i If a(j) > a(j + 1) Then t = a(j): a(j) = a(j + 1): a(j + 1) = t End If If a(j) < a(Min) Then Min = j Next j If Min i Then t = a(i): a(i) = a(Min): a(Min) = t End If Next i 已知 a 数组的各元素分别为：70、53、57、28、30、77、1、76，则代码运行后，a 数组各元素 的值变为（ ） 高二技术试题 第 4 页 A. 70、53、57、28、30、1、76、77 B. 53、28、30、57、1、70、76、77 C. 1、28、70、53、57、30、76、77 D. 1、28、30、57、53、70、76、77 二、非选择题(本大题共 4 小题，其中第 13 小题 4 分，第 14 小题 8 分，第 15 小题 7 分，第 16 小 题 7 分，共 26 分) 13.某班主任收集了本班级学生线上学习情况的数据，并用 Excel 软件进行数据处理，如第 13 题图 a 所示。 请回答下列问题: (1) 通过 H3 单元格中的公式，对数据区域 H4：H12 进行自动填充,则 H3 单元格中的公式 是 。 (提示：COUNTIF 函数用于计算某个区域中满足给定条件的单元格数目。例如：=COUNTIF( B2: B279, “语文”)表示 B2:B279 区域中课程名称是“语文”的单元格数目) 第 13 题图 a (2)根据第 13 题图 a 中数据制作的图表如第 13 题 b 所示，创建图表的数据区域是 。 第 13 题图 b 高二技术试题 第 5 页 （3）在区域 A2:D280 内找出“技术”课程中“认真度”最低的学生（若存在符合条件的多个记录， 则全部选取）。下列方法可行的是 （多选，填字母，全部选对得 2 分，选对但不 全的得 1 分，不选或有选错的得 0 分）。 A.以“课程名称”为“技术”、“认真度”为“最小 1 项”进行筛选，然后选取筛选出的全部记录 B.以“课程名称”为“技术”进行筛选，再以“认真度”为关键字升序排序，选取排在前面的记录 C.以“课程名称”为主要关键字、“认真度”为次要关键字，均按升序排序，选取排在前面的记录 D.以“认真度”为关键字升序排序，再以“课程名称”为“技术”进行筛选，选取排在前面的记录 14.小华制作了“动物赛跑”为主题的多媒体作品： （1）在制作作品前，小华进行了作品的设计，下列属于创作需求分析的是（ ） A.确定作品的主题为“动物赛跑”/B.设计了整体的工作流程与主要界面/C.制作了脚本大纲/ D.列出了作品制作需用的所有媒体元素信息/E.决定在学校网络论坛上发布作品 （注：多选题，全部选对得 2 分，选对但不全的得 1 分，不选或有选错的得 0 分） （2）小华使用 Flash 软件制作的多媒体作品，如下图所示。请回答下列问题： ①如上图所示，该作品的素材库中包含了 个元件。 ②测试“main”场景时发现“action”图层的按钮在中途会消失，若要使得按钮在播放中途不 消失，可进行的操作是 （多选） A． 删除“action”图层第 50 帧 B． 对“action”图层 50 帧执行清除帧 C． 对“action”图层 50 帧执行清除关键帧 D． 将“action”图层第 49 帧复制、粘贴在第 50 帧上 高二技术试题 第 6 页 E． 将“action”图层第 49 帧移动至第 50 帧上 F． 将“action”图层第 49 帧移动至第 55 帧上 ③在“main” 场景中，“马”图层的动画是马从舞台左侧外面跑到舞台右侧，补间动画创建失 败的原因可能是 。 ④“main”场景“音乐”图层中音频的同步方式为“事件”，测试影片时，单击“main”场景 的“重新开始”按钮，音乐停止并跳转至“片头”场景的第 1 帧播放，则该按钮的动作脚本为 。 15. 编写 VB 程序，实现如下功能：在文本框 Text1 中输入二进制数，单击“转换”命令按钮 Command1， 在文本框 Text2 中输出对应的十六进制数。程序界面如图所示，请回答下列问题： （1）如果输入的二进制数为“1101010”，则得到的结果为 。 （2）实现上述功能的 VB 程序如下，请在划线处填入合适代码。 Private Function bw(x As Integer, y As String) As String '函数 bw 功能：若二进制位数不足，通过在前面添"0"使得位数为 4 的倍数 Dim r As Integer, i As Integer r = x Mod 4 If r 0 Then For i = 1 To 4 - r y = "0" + y Next i x = Len(y) End If bw = ① End Function Private Sub Command1_Click() Dim m As String, n As Integer, i As Integer, a As Integer Dim s As Integer, s1 As String, j As Integer m = Text1.Text n = Len(m) Text2.Text = "" m = ② ’调整 m 的位数为 4 的倍数 For i = 1 To n - 3 Step 4 高二技术试题 第 7 页 s = 0 For j = i To i + 3 a = Val(Mid(m, j, 1)) s = ③ Next j If s >= 10 Then s1 = Chr(Asc("A") + s - 10) Else s1 = CStr(s) '函数 CStr 类似于 Str，但无前导空格 End If Text2.Text = Text2.Text + s1 Next i End Sub 16.小周同学用 VB 程序模拟考场座位的编排，将编号从 001 开始的 n 个学生按行、列数进行“蛇形 排列”。程序功能如下：在文本框 Text1 中输入行数，Text2 中输入列数，点击“生成座位”按钮， 在列表框 List1 中输出排列结果。如第 16 题图所示是运行界面为 6 行 5 列的座位排法（只排了一 个试场）。 第 16 题图 （1）根据本题代码，如第 16 题图中所示，数组元素 b(2)的值为“ ”。 （2）实现上述功能的 VB 程序如下，请在划线处填入合适的代码。 Private Sub Command1_Click() Dim a(1 To 200) As String '用来存储学号 Dim b(1 To 200) As String '关联 a 数组，用于矩阵输出 Dim i As Integer, j As Integer, k As Integer, pos As Integer Dim row as Integer, column as Integer, s As String For i = 1 To 200 '产生 3 位数的学号 a(i) = Mid("00", 1, (3 - Len(CStr(i)))) + CStr(i) ‘CStr()函数功能转换为字 符串并去掉前面空格 Next i row = Val(Text1.Text) column = Val(Text2.Text) k = 1 高二技术试题 第 8 页 For i = 1 To column If ① Then pos = i 'pos 是 b 数组的下标，根据行列来关联 a 数组 For j = 1 To row b(pos) = a(k) ② k = k + 1 Next j Else pos = (row - 1) * column + i For j = 1 To row b(pos) = a(k) pos = pos - column k = k + 1 Next j End If Next i For i = 1 To row '按行输出学生信息 s = "" For j = 1 To column s = s + " " + ③ Next j List1.AddItem s Next i End Sub