高二技术试题 第 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