登录二一教育在线组卷平台 助您教考全无忧
浙江省山水联盟2021-2022学年高三上学期信息技术开学联考试卷
一、选择题（本大题共12小题，每小题2分，共24分）
1．（2021高三上·浙江开学考）下列关于信息与信息技术的描述，正确的是（ ）
A．健康码的生成，属于信息的解码
B．网络平台实时播报台风信息，主要体现了信息的载体依附性
C．统计助手可以实现多人在线提交信息，主要体现了信息的共享性
D．智能手机为用户提供了设置屏幕锁的功能，其主要目的是为了提升手机信 息的时效性
2．（2021高三上·浙江开学考）下列关于网络和网络安全的说法，正确的是（ ）
A．在微信朋友圈点赞属于统计评价
B．人脸识别门禁考勤系统方便企业在安全方面的管理
C．通过网页发送电子邮件使用的协议有SMTP和POP3
D．搜索引擎包括关键词搜索、目录搜索和元搜索三大核心技术
3．（2021高三上·浙江开学考）某中学用Access软件设计学生体质健康标准的数据库，如图所示。
下列关于“体质健康标准”数据表的描述，正确的是（ ）
A．当前状态下，可以将该工作表中的所有记录都删除
B．该数据表中可以设学号为主键，且该字段一定是自动编号类型
C．该数据表中的总分一定是利用公式对前面的数据进行计算的结果
D．将该数据表中的数据导出到EXCEL中共有1613行
4．（2021高三上·浙江开学考）下列关于计算机信息编码的描述，正确的是 （ ）
A．每个汉字的输入码都是唯一的
B．声音数字化是指将模拟信号转换成数字信号，此过程称为“数模转换”
C．颜色模式为RGB/8的位图中每个像素用8位二进制数进行编码
D．已知大写字母I的ASCII码是49H，则小写字母j的ASCII码是106D
5．（2021高三上·浙江开学考）使用Photoshop软件制作“预防新冠宣传海报”作品，部分编辑界面如图所示。
下列描述正确的是（ ）
A．该"预防新冠宣传海报.psd"文件的大小是948.2K
B．不可以使用“自由变换”命令修改“主治功能”图层中的文字大小
C．可以拷贝“新冠特效药”图层的图层样式到“疫情特效药重磅来袭”图层
D．将"医生"图层的不透明度由"100%"改为"20%"，"药盒"图层的不透明度也会改为"20%"
6．（2021高三上·浙江开学考）两个音频文件，相关参数如图a、b所示。
图a：音频文件1参数 图b：音频文件2参数
则文件1与文件2的存储容量比约为（ ）
A．1:1 B．6:1 C．11:1 D．18:1
7．（2021高三上·浙江开学考）下列表达式中，能取到最大值中的最大的是（ ）
A．Fix(Rnd * 10) * 2 B．Int(-Rnd * 10) * (-2)
C．Int(Rnd * 10) * 2 D．(Rnd - Rnd) * 20
8．（2021高三上·浙江开学考）某算法的部分流程图如图所示：
执行该算法，待该流程图执行完毕后，则最终ans的值是（ ）
A．3 B．81 C．39 D．18
9．（2021高三上·浙江开学考）有一组正整数，要求对其中的奇偶数进行交换。交换后奇数在前，偶数在后，并保持相对顺序不变。
Const n = 10
Private Sub Command1_Click()
num = 0: k = 0
Do While k < n
k = k + 1
If ① Then
num = num + 1
b(num) = a(k)
Else
②
End If
Loop
For j =③
a(j) = b(j - n + num)
Next j
End Sub
下列选项中，①②③中的代码顺序正确的是（ ）
A．①a(k) Mod 2 = 1 ②b(k - num) = a(k) ③n - num To n
B．①a(k) Mod 2 = 0 ②a(k - num) = a(k) ③n - num + 1 To n
C．①a(k) Mod 2 = 1 ②a(k - num) = a(k) ③n - num To n
D．①a(k) Mod 2 = 0 ②b(k - num) = a(k) ③n - num + 1 To n
10．（2021高三上·浙江开学考）有如下程序段：
Private Sub Command1_Click()
s = "Tokyo_Olympic_Games"
ans = ""
For i = 1 To Len(s)
c = Mid(s, i, 1)
If (2020 \ 10 ^ 2 - i) <= Len(s) Mod 10 \ 3 Then
If c >= "a" And c <= "z" Then c = Chr(Asc(c) - Asc("a") + Asc("A"))
End If
ans = ans + c
Next i
Label1.Caption = ans
End Sub
执行上述程序段后，标签Labele1中输出的内容为（ ）
A．TOKYO_OLYMPIC_GAMES B．TOKYO_OLYMPIC_GAMes
C．Tokyo_Olympic_GaMES D．Tokyo_Olympic_GameS
11．（2021高三上·浙江开学考）有如下VB程序段：
a(1) = 1: a(2) = 2: a(3) = 3: a(4) = 4: a(5) = 5
k = Int(Rnd * 4) + 1: m = k
For i = 1 To m
If i <> k Then
If a(i) < a(k) Then
t = a(i): a(i) = a(k): a(k) = t
If k < 5 Then k = k + 1
End If
End If
Next i
执行该段程序段后，数组元素a(1)~a(5)的值依次不可能为（ ）
A．1 2 3 4 5 B．2 3 1 4 5 C．4 5 3 2 1 D．3 4 1 2 5
12．（2021高三上·浙江开学考）某算法有如下程序段
Key = Int(Rnd * 5) * 2 + 10
i = 1: j = 8: n = 0
Do While i <= j
m = (i + j + 1) \ 2
If a(m) >= Key Then i = m + 1 Else j = m - 1
n = n + 1
Loop
数组元素a(1)~a(8)的值为“22，21，18，17，16，15，14，10”。若该程序段执行后，下列说法错误的是( )
A．j的值为i-1 B．i的值可能是3
C．n的值一定是3 D．j的值可能是3
二、非选择题（本大题共4小题，4+8+7+7，共26分）
13．（2021高三上·浙江开学考）为了响应全民健身计划,某高中对学生进行了体质健康测评,并用Excel软件进行数据处理，如图a所示。
图a
请回答下列问题：
（1）区域M2:P15 的数据是通过公式计算得到的，在M2单元格中输入公式后，再使用自动填充功能完成该区域的计算，则N3单元格中的公式是“=SUMPRODUCT(( )*($I$3:$I$553=N$1))”。
（提示：M2单元格输入公式=SUMPRODUCT((A1:A100=“2”)*(I1:I100=“优秀”))，表示同时满足A1:A100是2班和I1:I100是优秀这两个条件的情况有几个，也就是进行条件计数。）
（2）根据图a中的数据制作的图表如图b所示。创建该图表的数据区域是
图b
（3）对图a工作表进行相关数据分析，下列说法正确的是 （多选，填字母）。
A．以“总分等级”为依据进行升序排序，选择的区域是A3：I553
B．选择“A3：I553”按照“总分等级”升序排序后，图b的图表不会发生改变
C．现需要选出总分等级为“不及格”的学生，可选择区域A3：I553，以“总分等级”为“不及格”进行筛选并保留结果
D．为了显示男生立定跳远得分最高的3位学生数据，可先对“性别”为“男”进行筛选，再对“立定跳远”进行筛选，选择最大的3项
14．（2021高三上·浙江开学考）为了响应全民防疫，小明创作主题为“接种新冠疫苗宣传片”的多媒体作品，部分编辑界面如图所示。
请回答下列问题：
（1）在创作之前进行了作品设计，下列说法正确的是 （多选，填字母）
A．为提倡全民防疫，考虑将该作品作为公益广告，属于作品的创作需求分析
B．考虑作品需要用flash软件制作，属于作品的应用需求分析
C．考虑主场景的背景音乐和色彩分布设计，属于作品的模块设计
D．用photoshop软件制作素材属于编写制作脚本
E．制作脚本是在文字脚本之后，其中制作脚本是制作多媒体作品的直接依据
（2）根据制作脚本要求，“病毒1”图层动画结束后“病毒2”图层动画开始，应如何修改？
（3）“病毒1”图层中补间动画类型是 （单选，填字母：A .动画补间动画 /B .形状补间动画
/C .逐帧动画）
（4）已知“声音”图层的声音同步类型为“事件”，现在想调整该层声音只播放到第20帧，但不影响其它动画效果，结合前面题设，下列操作可行的是 （多选，填字母：A .选“声音”图层第20到60 帧执行“删除帧”操作 / B .在“声音”图层第 20 帧执行“插入关键帧”操作，并设置声音的同步方式为“数据流” / C .在“病毒1”图层第 20 帧，添加脚本动作：stop(); / D .在“病毒1”图层第 20 帧，添加脚本动作：stopAllSounds();）
（5）单击“注意事项”按钮后跳转到“注意事项”场景第1帧并播放，为实现这一功能，该按钮实例上添加的动作脚本是on(press){ }
15．（2021高三上·浙江开学考）在100个小球中,只有一个小球轻于其它小球。如何用没有砝码的天平找出该小球？小安设计了一个三分查找程序来快速查找这个小球，程序认定当需查找的小球个数小于3个时，认为已找到，程序运行界面如图。
Dim a(1 To 100) As Integer
Private Sub Form_Load()
'产生100个重量为10的小球，存储在数组a中
'其中随机选取1个小球的重量改为8，代码略
End Sub
Private Sub Command1_Click()
Dim left As Integer, right As Integer
Dim mid As Integer, count As Integer
Dim s(1 To 2) As Integer
left = 1: right = 100: count = 1
List2.AddItem Str(left) + "-------->" + Str(right)
Do While left<=right
s(1) = 0: s(2) = 0
①
i = left: k = 1
Do While i <= left + mid * 2 - 1
s(k) = s(k) + a(i)
If ② Then k = k + 1
i = i + 1
Loop
If s(1) = s(2) Then
left = left + 2 * mid
ElseIf s(1) < s(2) Then
right = left + mid - 1
Else
left = left + mid
End If
count = count + 1
List2.AddItem Str(left) + "-------->" + Str(right)
Loop
List2.AddItem "经过" + Str(count) + "次后找到这个数"
End Sub
（1）实线框处代码有错，请改正。
（2）请在划线处填入合适代码。
① ②
（3）根据上述程序代码，若将虚线框处的两行代码交换一下顺序，则查找结果是 （单选，填字母：A .下标越界 /B .找到这个数 /C .找不到这个数 /D .死循环）
16．（2021高三上·浙江开学考）小安需要在一个n*n（4<=n<=10）的房间里使用黑白两种地砖铺设房间，要求相邻的两块地砖颜色都不同。房间里会随机产生m（m<=10）根柱子，如果最后黑白两种地砖使用的数量相同，就认为可以铺满整个房间。小安将a数组元素值设置为0、1和2三种，当数组a的值为0时显示“□”，代表白地砖，为1时显示“■”，代表黑地砖，为2时显示“○”，代表柱子。最后，小安还求出了任意两根柱子之间的最大面积，单位长度为1（当两个柱子在同一行或同一列，认为面积为0，面积求法如图b所示）。
图a 图b
程序运行界面如图a所示。实现上述功能的VB代码如下：
Dim n As Integer, m As Integer
Dim a(1 To 100) As Integer
Dim b(1 To 10) As Integer 'b数组存储柱子位置
Dim f(3) As Integer, i As Integer 'f数组存储三种类型的个数
Private Sub Command1_Click()
n = Val(Text1.Text)：m = Val(Text2.Text)
k = 0
For i = 1 To m
b(i) = Int((Rnd * n ^ 2) + 1)
a(b(i)) = 2
For j = 1 To i - 1
If b(i) = b(j) Then
①
Exit For
End If
Next j
Next i
'将房间设置为黑白两种颜色交错，白黑以0、1代替
For i = 1 To n * n
If a(i) = 0 And k = 1 Then
s = s + "■": a(i) = k
ElseIf a(i) = 0 And k = 0 Then
s = s + "□": a(i) = k
Else
s = s + "○"
f(k) = f(k) - 1
f(2) = f(2) + 1
End If
②
If i Mod n = 0 Then
List1.AddItem s
s = ""
End If
Next i
'对b数组的数值按升序进行排序，代码略
For i = 1 To m - 1
s = search(i)
If s > smax Then smax = s
Next i
'对f(0)和f(1)的相等情况进行判断，并输出最后结果，代码略
End Sub
Function search(i As Integer) As Integer
Dim x1 As Integer, x2 As Integer
Dim y1 As Integer, y2 As Integer
x1 = (b(i) - 1) \ n + 1
y1 = (b(i) - 1) Mod n + 1
For j = i + 1 To m
x2 = (b(j) - 1) \ n + 1
y2 = (b(j) - 1) Mod n + 1
If ③ Then s = 0
s = (x2 - x1) * (y2 - y1)
If s > search Then search = s
Next j
End Function
（1）请在划线处填入合适代码。
① ② ③
（2）实线框处的语句改为k = 1 - k，对程序运行结果 （填：有/无）影响？
答案解析部分
1．【答案】C
【考点】信息及其特征；字符编码
【解析】
2．【答案】B
【考点】因特网信息资源评价；网络协议；网络资源的检索
【解析】
3．【答案】A
【考点】数据表、字段、记录的编辑；数据库文件的导入与导出
【解析】
4．【答案】D
【考点】数字化概念与作用；字符编码
【解析】
5．【答案】C
【考点】图层及图层的基本操作
【解析】
6．【答案】B
【考点】声音、图像、视频编码
【解析】
7．【答案】B
【考点】运算符、基本运算与表达式；常用标准函数
【解析】
8．【答案】B
【考点】流程图识读
【解析】
9．【答案】B
【考点】分支结构语句及程序实现；循环结构语句及程序实现
【解析】
10．【答案】D
【考点】分支结构语句及程序实现；循环结构语句及程序实现
【解析】
11．【答案】D
【考点】排序算法及程序实现
【解析】
12．【答案】B
【考点】查找算法及程序实现
【解析】
13．【答案】（1）$A$3:$A$553=$K3
（2）M1:P1,M16:P16
（3）A；B
【考点】表格数据的处理与计算；数据分析
【解析】
14．【答案】（1）C；E
（2）将“病毒2”图层中的补间动画整体后移20 帧或其他等价答案
（3）A
（4）BD
（5）gotoandplay(“注意事项”,1)
【考点】多媒体作品的规划和设计；动画的类型；时间轴、帧、图层、库的概念及基本操作；常用影片控制函数的应用；声音同步属性设置
【解析】
15．【答案】（1）right - left > 2 或者 right – left >= 3 或其他等价答案
（2）mid = (right - left + 1) \ 3；i = left + mid – 1
（3）B
【考点】分支结构语句及程序实现；循环结构语句及程序实现
【解析】
16．【答案】（1）i = i – 1；f(k) = f(k) + 1；x1 = x2 Or y1 = y2
（2）有
【考点】过程与自定义函数；分支结构语句及程序实现；循环结构语句及程序实现
【解析】
二一教育在线组卷平台（zujuan.21cnjy.com）自动生成 1 / 1登录二一教育在线组卷平台 助您教考全无忧
浙江省山水联盟2021-2022学年高三上学期信息技术开学联考试卷
一、选择题（本大题共12小题，每小题2分，共24分）
1．（2021高三上·浙江开学考）下列关于信息与信息技术的描述，正确的是（ ）
A．健康码的生成，属于信息的解码
B．网络平台实时播报台风信息，主要体现了信息的载体依附性
C．统计助手可以实现多人在线提交信息，主要体现了信息的共享性
D．智能手机为用户提供了设置屏幕锁的功能，其主要目的是为了提升手机信 息的时效性
【答案】C
【考点】信息及其特征；字符编码
【解析】
2．（2021高三上·浙江开学考）下列关于网络和网络安全的说法，正确的是（ ）
A．在微信朋友圈点赞属于统计评价
B．人脸识别门禁考勤系统方便企业在安全方面的管理
C．通过网页发送电子邮件使用的协议有SMTP和POP3
D．搜索引擎包括关键词搜索、目录搜索和元搜索三大核心技术
【答案】B
【考点】因特网信息资源评价；网络协议；网络资源的检索
【解析】
3．（2021高三上·浙江开学考）某中学用Access软件设计学生体质健康标准的数据库，如图所示。
下列关于“体质健康标准”数据表的描述，正确的是（ ）
A．当前状态下，可以将该工作表中的所有记录都删除
B．该数据表中可以设学号为主键，且该字段一定是自动编号类型
C．该数据表中的总分一定是利用公式对前面的数据进行计算的结果
D．将该数据表中的数据导出到EXCEL中共有1613行
【答案】A
【考点】数据表、字段、记录的编辑；数据库文件的导入与导出
【解析】
4．（2021高三上·浙江开学考）下列关于计算机信息编码的描述，正确的是 （ ）
A．每个汉字的输入码都是唯一的
B．声音数字化是指将模拟信号转换成数字信号，此过程称为“数模转换”
C．颜色模式为RGB/8的位图中每个像素用8位二进制数进行编码
D．已知大写字母I的ASCII码是49H，则小写字母j的ASCII码是106D
【答案】D
【考点】数字化概念与作用；字符编码
【解析】
5．（2021高三上·浙江开学考）使用Photoshop软件制作“预防新冠宣传海报”作品，部分编辑界面如图所示。
下列描述正确的是（ ）
A．该"预防新冠宣传海报.psd"文件的大小是948.2K
B．不可以使用“自由变换”命令修改“主治功能”图层中的文字大小
C．可以拷贝“新冠特效药”图层的图层样式到“疫情特效药重磅来袭”图层
D．将"医生"图层的不透明度由"100%"改为"20%"，"药盒"图层的不透明度也会改为"20%"
【答案】C
【考点】图层及图层的基本操作
【解析】
6．（2021高三上·浙江开学考）两个音频文件，相关参数如图a、b所示。
图a：音频文件1参数 图b：音频文件2参数
则文件1与文件2的存储容量比约为（ ）
A．1:1 B．6:1 C．11:1 D．18:1
【答案】B
【考点】声音、图像、视频编码
【解析】
7．（2021高三上·浙江开学考）下列表达式中，能取到最大值中的最大的是（ ）
A．Fix(Rnd * 10) * 2 B．Int(-Rnd * 10) * (-2)
C．Int(Rnd * 10) * 2 D．(Rnd - Rnd) * 20
【答案】B
【考点】运算符、基本运算与表达式；常用标准函数
【解析】
8．（2021高三上·浙江开学考）某算法的部分流程图如图所示：
执行该算法，待该流程图执行完毕后，则最终ans的值是（ ）
A．3 B．81 C．39 D．18
【答案】B
【考点】流程图识读
【解析】
9．（2021高三上·浙江开学考）有一组正整数，要求对其中的奇偶数进行交换。交换后奇数在前，偶数在后，并保持相对顺序不变。
Const n = 10
Private Sub Command1_Click()
num = 0: k = 0
Do While k < n
k = k + 1
If ① Then
num = num + 1
b(num) = a(k)
Else
②
End If
Loop
For j =③
a(j) = b(j - n + num)
Next j
End Sub
下列选项中，①②③中的代码顺序正确的是（ ）
A．①a(k) Mod 2 = 1 ②b(k - num) = a(k) ③n - num To n
B．①a(k) Mod 2 = 0 ②a(k - num) = a(k) ③n - num + 1 To n
C．①a(k) Mod 2 = 1 ②a(k - num) = a(k) ③n - num To n
D．①a(k) Mod 2 = 0 ②b(k - num) = a(k) ③n - num + 1 To n
【答案】B
【考点】分支结构语句及程序实现；循环结构语句及程序实现
【解析】
10．（2021高三上·浙江开学考）有如下程序段：
Private Sub Command1_Click()
s = "Tokyo_Olympic_Games"
ans = ""
For i = 1 To Len(s)
c = Mid(s, i, 1)
If (2020 \ 10 ^ 2 - i) <= Len(s) Mod 10 \ 3 Then
If c >= "a" And c <= "z" Then c = Chr(Asc(c) - Asc("a") + Asc("A"))
End If
ans = ans + c
Next i
Label1.Caption = ans
End Sub
执行上述程序段后，标签Labele1中输出的内容为（ ）
A．TOKYO_OLYMPIC_GAMES B．TOKYO_OLYMPIC_GAMes
C．Tokyo_Olympic_GaMES D．Tokyo_Olympic_GameS
【答案】D
【考点】分支结构语句及程序实现；循环结构语句及程序实现
【解析】
11．（2021高三上·浙江开学考）有如下VB程序段：
a(1) = 1: a(2) = 2: a(3) = 3: a(4) = 4: a(5) = 5
k = Int(Rnd * 4) + 1: m = k
For i = 1 To m
If i <> k Then
If a(i) < a(k) Then
t = a(i): a(i) = a(k): a(k) = t
If k < 5 Then k = k + 1
End If
End If
Next i
执行该段程序段后，数组元素a(1)~a(5)的值依次不可能为（ ）
A．1 2 3 4 5 B．2 3 1 4 5 C．4 5 3 2 1 D．3 4 1 2 5
【答案】D
【考点】排序算法及程序实现
【解析】
12．（2021高三上·浙江开学考）某算法有如下程序段
Key = Int(Rnd * 5) * 2 + 10
i = 1: j = 8: n = 0
Do While i <= j
m = (i + j + 1) \ 2
If a(m) >= Key Then i = m + 1 Else j = m - 1
n = n + 1
Loop
数组元素a(1)~a(8)的值为“22，21，18，17，16，15，14，10”。若该程序段执行后，下列说法错误的是( )
A．j的值为i-1 B．i的值可能是3
C．n的值一定是3 D．j的值可能是3
【答案】B
【考点】查找算法及程序实现
【解析】
二、非选择题（本大题共4小题，4+8+7+7，共26分）
13．（2021高三上·浙江开学考）为了响应全民健身计划,某高中对学生进行了体质健康测评,并用Excel软件进行数据处理，如图a所示。
图a
请回答下列问题：
（1）区域M2:P15 的数据是通过公式计算得到的，在M2单元格中输入公式后，再使用自动填充功能完成该区域的计算，则N3单元格中的公式是“=SUMPRODUCT(( )*($I$3:$I$553=N$1))”。
（提示：M2单元格输入公式=SUMPRODUCT((A1:A100=“2”)*(I1:I100=“优秀”))，表示同时满足A1:A100是2班和I1:I100是优秀这两个条件的情况有几个，也就是进行条件计数。）
（2）根据图a中的数据制作的图表如图b所示。创建该图表的数据区域是
图b
（3）对图a工作表进行相关数据分析，下列说法正确的是 （多选，填字母）。
A．以“总分等级”为依据进行升序排序，选择的区域是A3：I553
B．选择“A3：I553”按照“总分等级”升序排序后，图b的图表不会发生改变
C．现需要选出总分等级为“不及格”的学生，可选择区域A3：I553，以“总分等级”为“不及格”进行筛选并保留结果
D．为了显示男生立定跳远得分最高的3位学生数据，可先对“性别”为“男”进行筛选，再对“立定跳远”进行筛选，选择最大的3项
【答案】（1）$A$3:$A$553=$K3
（2）M1:P1,M16:P16
（3）A；B
【考点】表格数据的处理与计算；数据分析
【解析】
14．（2021高三上·浙江开学考）为了响应全民防疫，小明创作主题为“接种新冠疫苗宣传片”的多媒体作品，部分编辑界面如图所示。
请回答下列问题：
（1）在创作之前进行了作品设计，下列说法正确的是 （多选，填字母）
A．为提倡全民防疫，考虑将该作品作为公益广告，属于作品的创作需求分析
B．考虑作品需要用flash软件制作，属于作品的应用需求分析
C．考虑主场景的背景音乐和色彩分布设计，属于作品的模块设计
D．用photoshop软件制作素材属于编写制作脚本
E．制作脚本是在文字脚本之后，其中制作脚本是制作多媒体作品的直接依据
（2）根据制作脚本要求，“病毒1”图层动画结束后“病毒2”图层动画开始，应如何修改？
（3）“病毒1”图层中补间动画类型是 （单选，填字母：A .动画补间动画 /B .形状补间动画
/C .逐帧动画）
（4）已知“声音”图层的声音同步类型为“事件”，现在想调整该层声音只播放到第20帧，但不影响其它动画效果，结合前面题设，下列操作可行的是 （多选，填字母：A .选“声音”图层第20到60 帧执行“删除帧”操作 / B .在“声音”图层第 20 帧执行“插入关键帧”操作，并设置声音的同步方式为“数据流” / C .在“病毒1”图层第 20 帧，添加脚本动作：stop(); / D .在“病毒1”图层第 20 帧，添加脚本动作：stopAllSounds();）
（5）单击“注意事项”按钮后跳转到“注意事项”场景第1帧并播放，为实现这一功能，该按钮实例上添加的动作脚本是on(press){ }
【答案】（1）C；E
（2）将“病毒2”图层中的补间动画整体后移20 帧或其他等价答案
（3）A
（4）BD
（5）gotoandplay(“注意事项”,1)
【考点】多媒体作品的规划和设计；动画的类型；时间轴、帧、图层、库的概念及基本操作；常用影片控制函数的应用；声音同步属性设置
【解析】
15．（2021高三上·浙江开学考）在100个小球中,只有一个小球轻于其它小球。如何用没有砝码的天平找出该小球？小安设计了一个三分查找程序来快速查找这个小球，程序认定当需查找的小球个数小于3个时，认为已找到，程序运行界面如图。
Dim a(1 To 100) As Integer
Private Sub Form_Load()
'产生100个重量为10的小球，存储在数组a中
'其中随机选取1个小球的重量改为8，代码略
End Sub
Private Sub Command1_Click()
Dim left As Integer, right As Integer
Dim mid As Integer, count As Integer
Dim s(1 To 2) As Integer
left = 1: right = 100: count = 1
List2.AddItem Str(left) + "-------->" + Str(right)
Do While left<=right
s(1) = 0: s(2) = 0
①
i = left: k = 1
Do While i <= left + mid * 2 - 1
s(k) = s(k) + a(i)
If ② Then k = k + 1
i = i + 1
Loop
If s(1) = s(2) Then
left = left + 2 * mid
ElseIf s(1) < s(2) Then
right = left + mid - 1
Else
left = left + mid
End If
count = count + 1
List2.AddItem Str(left) + "-------->" + Str(right)
Loop
List2.AddItem "经过" + Str(count) + "次后找到这个数"
End Sub
（1）实线框处代码有错，请改正。
（2）请在划线处填入合适代码。
① ②
（3）根据上述程序代码，若将虚线框处的两行代码交换一下顺序，则查找结果是 （单选，填字母：A .下标越界 /B .找到这个数 /C .找不到这个数 /D .死循环）
【答案】（1）right - left > 2 或者 right – left >= 3 或其他等价答案
（2）mid = (right - left + 1) \ 3；i = left + mid – 1
（3）B
【考点】分支结构语句及程序实现；循环结构语句及程序实现
【解析】
16．（2021高三上·浙江开学考）小安需要在一个n*n（4<=n<=10）的房间里使用黑白两种地砖铺设房间，要求相邻的两块地砖颜色都不同。房间里会随机产生m（m<=10）根柱子，如果最后黑白两种地砖使用的数量相同，就认为可以铺满整个房间。小安将a数组元素值设置为0、1和2三种，当数组a的值为0时显示“□”，代表白地砖，为1时显示“■”，代表黑地砖，为2时显示“○”，代表柱子。最后，小安还求出了任意两根柱子之间的最大面积，单位长度为1（当两个柱子在同一行或同一列，认为面积为0，面积求法如图b所示）。
图a 图b
程序运行界面如图a所示。实现上述功能的VB代码如下：
Dim n As Integer, m As Integer
Dim a(1 To 100) As Integer
Dim b(1 To 10) As Integer 'b数组存储柱子位置
Dim f(3) As Integer, i As Integer 'f数组存储三种类型的个数
Private Sub Command1_Click()
n = Val(Text1.Text)：m = Val(Text2.Text)
k = 0
For i = 1 To m
b(i) = Int((Rnd * n ^ 2) + 1)
a(b(i)) = 2
For j = 1 To i - 1
If b(i) = b(j) Then
①
Exit For
End If
Next j
Next i
'将房间设置为黑白两种颜色交错，白黑以0、1代替
For i = 1 To n * n
If a(i) = 0 And k = 1 Then
s = s + "■": a(i) = k
ElseIf a(i) = 0 And k = 0 Then
s = s + "□": a(i) = k
Else
s = s + "○"
f(k) = f(k) - 1
f(2) = f(2) + 1
End If
②
If i Mod n = 0 Then
List1.AddItem s
s = ""
End If
Next i
'对b数组的数值按升序进行排序，代码略
For i = 1 To m - 1
s = search(i)
If s > smax Then smax = s
Next i
'对f(0)和f(1)的相等情况进行判断，并输出最后结果，代码略
End Sub
Function search(i As Integer) As Integer
Dim x1 As Integer, x2 As Integer
Dim y1 As Integer, y2 As Integer
x1 = (b(i) - 1) \ n + 1
y1 = (b(i) - 1) Mod n + 1
For j = i + 1 To m
x2 = (b(j) - 1) \ n + 1
y2 = (b(j) - 1) Mod n + 1
If ③ Then s = 0
s = (x2 - x1) * (y2 - y1)
If s > search Then search = s
Next j
End Function
（1）请在划线处填入合适代码。
① ② ③
（2）实线框处的语句改为k = 1 - k，对程序运行结果 （填：有/无）影响？
【答案】（1）i = i – 1；f(k) = f(k) + 1；x1 = x2 Or y1 = y2
（2）有
【考点】过程与自定义函数；分支结构语句及程序实现；循环结构语句及程序实现
【解析】
二一教育在线组卷平台（zujuan.21cnjy.com）自动生成 1 / 1
