浙江省名校协作体2021-2022学年高三上学期信息技术开学联考试卷
试卷更新日期：2021-10-14 类型：开学考试
一、选择题(本大题共12小题，每小题2分，共24分。每小题列出的四个备选项中只有一个是符合题目要求的)
-
1. 以下关于信息和信息技术的说法不正确的是（ ）A、信息的表示、存储、传播必须依附于载体，不存在没有载体的信息 B、人们可以利用信息技术，把信息从一种形态转为另一种形态 C、可将QQ中的文件转发至微信中，说明信息的表达无需规范化 D、上周某天的天气资料对于安排明天的出行通常是没有用的，说明信息具有时效性2. 下列有关网络的说法不正确的是（ ）A、搜索引擎一般包含两大核心技术：自动网页搜索技术和全文检索技术 B、可以将网页添加到收藏夹，以便在不能上网时也能打开该网页 C、以“网页，仅html”方式保存的网页，能保存其中的超链接 D、电子邮局协议(POP3)的功能是让收件人从电子信箱中将电子邮件读到本地计算机上3. 小张为社区的疫情防控工作设计了流动人员信息登记系统，其中已创建好的“登记信息”数据表用于存储如图所示的数据：
登记序号
姓名
门牌号
登记日期
登记形式
是否绿码
20200101
王立
06-801
2020.01.29
门卫
是
20200102
张哲民
01-203
2020/02/12
上门排查
是
20200103
李圣达
11-206
2020/02/12
电话访问
否
…
…
…
…
…
…
下列说法正确的是（ ）
A、该登记系统属于数据库管理系统 B、将图中数据成功导入至数据表后，同一字段下的数据类型一致 C、数据表中“门牌号”字段可以设置为“数字”类型 D、图中“登记序号”列在该数据表中相应字段的数据类型一定是“自动编号”4. 使用UltraEdit软件查看内码的部分界面如图，下列说法正确的是（ ）
A、图中字符的内码共占14位 B、由图可知，小写字母“h”的内码用十进制表示为80 C、小写字母“a”的内码用二进制表示为01100001 D、“!”的内码用十六进制表示为20215. 用Photoshop软件制作“粽香端午”作品，已用选区工具创建如图所示的选区。
在当前状态下，下列描述正确的是（ ）
A、“竹筷”图层中的内容无法显示是因为图层被隐藏 B、可以复制“传统节日”图层的图层样式并粘贴到“粽香端午”图层 C、选中“粽子”图层，不可以将其移动到“传统节日”图层上方 D、选中“背景”图层，添加“波纹”滤镜，图像的呈现效果会发生变化6. 使用Goldwave软件处理某音频文件，部分界面如图所示在当前状态下，执行“删除”操作后其他参数不变，另存为单声道格式的文件,则修改前后文件的存储容量比约为（ ）
A、3:1 B、2:1 C、3:2 D、1:17. VB表达式 3 + 18 \ 6 / 2 mod 2 * 2 的值是（ ）A、5 B、4.5 C、3 D、68. 某算法的部分流程图如图所示，执行这部分流程后，下列说法正确的是（ ）
A、变量x的终值为3 B、变量y的终值为13 C、变量s的终值为8 D、循环体语句执行次数为3次9. 有如下 VB 程序段：ans = 0: i = 1
Do While i < Int(Sqr(n))
If n / i = Int(n / i) And n / i Mod 2 = 1 Then
ans = ans + 1
End If
i = i + 2
Loop
若变量n的值为81，则执行该程序段后，变量ans的值为（ ）
A、2 B、3 C、4 D、510. 有如下VB程序段：s1 = Text1.Text: s2 = "" n = Len(s1)
i = 1: j = n
Do While i <= j
If i Mod 2 = 1 Then
s2 = s2 + Mid(s1, j, 1)
Else
s2 = Mid(s1, n - j + 1, 1) + s2
End If
i = i + 1
j = j - 1
Loop
Text2.Text = s2
在文本框Text1中输入“python”，执行该程序段后，文本框Text2中显示的是（ ）
A、nyt B、nyh C、ynt D、ynh11. 某对分查找的VB程序段如下：a(1) = 12
For i = 2 To 10
a(i) = a(i - 1) + Int(Rnd * 10) + 1
Next i
i = 1: j = 10: c = 0: key = 15
Do While i <=j
m = (i + j) \ 2
c = c + 1
If a(m) = key Then
Exit Do
ElseIf a(m) < key Then
i = m + 1
Else
j = m - 1
End If
Loop
执行该程序段后，变量c的值不可能为（ ）
A、4 B、3 C、2 D、112. 随机生成正整数数组a，并将数组中各元素以金字塔显示，要求对金字塔每层中的数据排序处理，奇数行升序排列，偶数行降序排列，效果见下图。请为划线处选择合适的代码。（ ）
Dim a(1 To 15) As Integer, num As Integer, s As String
'生成数组a，a(1)=73,a(2)=58, a(3)=62, a(4)=36…代码略
Private Sub Command1_Click()’对数组进行排序
num = 5: k = 1: f = 1
For i = 1 To num
k = k + i
For m = k - i To ①
For n = k - i To 2 * k - 2 - i - m
If ② Then t = a(n): a(n) = a(n + 1): a(n + 1) = t
Next n
Next m
f = f * (-1)
Next i
'将处理后的数组，以金字塔形显示，代码略
End Sub
A、k-1 f * a(n) < f * a(n + 1) B、k-1 f * a(n) > f * a(n + 1) C、k-2 f * a(n) > f * a(n + 1) D、k-2 f * a(n) < f * a(n + 1)二、非选择题（本大题共4题，6+8+6+6，共26分）
-
13. 某超市统计了特价商品的相关信息，用Excel软件对商品数据进行处理，如图a所示。
(1)、要通过自动填充将“编号”列的值填充为如图a所示的序列“01，02，……，74”，则可先将该区域单元格格式设置为(单选，填字母：A .数值/B .货币/C .百分比/D .文本)。(2)、图a中区域H4:H75的折扣率是根据H3单元格自动填充得到，则H3单元格中的公式（折扣率=（零售价–特价）/零售价×100)(3)、对区域A2：H75进行相关数据分析，下列说法错误的是 （多选，填字母）。A、删除了“单位”列，“折扣率%”列数据不会发生变化 B、若要找出所有名称中含“茶”的饮料，可对“名称”列按图b条件进行筛选 C、为找出“产地”为浙江，折扣率最大的商品，可以“产地”等于“浙江”为条件进行筛选，再对“折扣率%”进行筛选，选择“10个最大的值”，并显示为最大的1项 D、为找出“产地”为广州，零售价格最高的商品，可以“零售价格”为关键字降序排序，再对“产地”进行筛选，条件为“广州”14. 小海使用Flash软件制作主题为“重阳”的多媒体作品，制作脚本如图a所示，制作界面如图b所示。模块名：“Main”场景
类别序号：2
进入方式：由“load”场景单击“播放”按钮进入
呈现方式：
⒈鱼在舞台的下方移动，文字在左侧
⒉菊花开始时在舞台上方，慢慢向右移出舞台
⒊“重播”按钮在舞台右下方，单击“重播”按钮，将从该场景第一帧开始播放。
呈现顺序说明：
⒈一开始出现文字和鱼游动的动画，持续到场景结束。
⒉约第2.5秒时出现“菊花”的动画，时长约2.5 秒。
⒊最后出现“重播”按钮，并停止播放。
图a
图b
请回答下列问题：
(1)、以下关于多媒体作品设计的描述，正确的是 （多选，填字母）A、Flash软件是以时间序列为基础的创作工具 B、作品的系统结构描述了整个作品的组成部分、工作流程、主要界面 C、作品运行的软件环境不属于创作需求分析中的设施需求 D、媒体元素分解需将脚本内容在细化时所涉及的媒体元素逐一列出 E、脚本编写时，先进行文字脚本编写，再进行脚本大纲编写(2)、舞台大小为500×400，“菊花”图层第25至50帧的补间类型为；第50帧中，“菊花”实例的位置可能为（单选，填字母）A．（10，10） B．（550，10） C．（10，440） D．（-550，440）
(3)、根据制作脚本，“重播”按钮上应设置动作命令。(4)、为使“文字”图层的动画效果与制作脚本相符，应进行的操作是。15. 世界上有很多国家向我国申购新冠疫苗。我国共有n个仓库存储疫苗，第i个仓库有疫苗a(i)（单位：万支，（单位：万支，下同）。现有m（n>=m）个国家向我国提出疫苗购买申请。我国计划将n个仓库中的疫苗全部分配给这m个国家。分配规则如下：①每个仓库中的疫苗只能作为一个整体分配给一个国家；②一个国家可以获得任意多个仓库的疫苗；③要求获得最多疫苗的国家与获得最少疫苗的国家之间疫苗数量差值最小；④若存在多个满足条件的分配方式，则输出最先找到的分配方式。例如：若n=4，4个仓库中的疫苗数分别为50、13、80、27。若m=2，最小差值为10；若m=3，最小差值为40。
编写VB程序模拟上述功能，在文本框Text1中输入n（n≤15），在文本框Text2中输入m(m≤4)，随机生成n个两位正整数，在列表框List1中输出。单击“计算”按钮Command1，在文本框Text3中输出最小差值，在列表框List2中输出每个国家获得疫苗的方案。程序运行界面如图所示。
(1)、语句 List1.Clear 中的“Clear”属于(单选，填字母：A .对象名/B .属性名/C .方法名)。(2)、实现疫苗分配的VB程序如下，请在划线处填入合适的代码。Private Sub Command1_Click()
Const maxn = 15
Dim n As Integer, i As Long, j As Long, k As Long, p As Integer, m As Integer
Dim a(1 To maxn) As Long, f(1 To maxn) As Long
Dim s(1 To maxn) As String, max As Long, min As Long, ans As Long, ansi As Long
n = Val(Text1.Text): m = Val(Text2.Text)
List1.Clear: List2.Clear: Randomize
For i = 1 To n
①
List1.AddItem Str(a(i))
Next i
ans = 10000
For i = 1 To m ^ n '枚举所有的分配方案
For j = 1 To m
f(j) = 0
Next j
j = i: max = 0: min = 10000
For k = 1 To n
f(p) = f(p) + a(k)
j = j \ m
Next k
For k = 1 To m
If f(k) > max Then max = f(k)
If f(k) < min Then min = f(k)
Next k
If ② Then
ans = max - min
③
End If
Next i
Text3.Text = Str(ans)
For i = 1 To n
j = ansi Mod m
s(j + 1) = s(j + 1) + Str(a(i))
ansi = ansi \ m
Next i
For i = 1 To m
List2.AddItem s(i)
Next i
End Sub
① ② ③
(3)、程序中加框处代码有错，请改正。16. 小张想要了解自己体育锻炼情况，他以数字的形式记录了自己每天进行的运动项目，如“1，1，2，3，2，3，2，3，3，1，1，4，3”。其中数字1代表篮球；2代表乒乓球；3代表慢跑，…。在记录了一段时间后，小张想知道自己在一段连续时间内最“喜爱”的两项体育运动是什么，以及连续进行的次数。对于这两项体育运动的要求是：1）这两项运动在记录中必须连续出现，不能被其他运动打断，如“1，2，2，1，2”是一种可能的结果；“1，2，2，1，2，3”则不是可能的结果；
2）这两项运动在记录中出现的次数必须是最多的一种组合。
运动记录
1，1，2，3，2，3，2，3，3，1，1，4，3
序号
①
②
③
④
⑤
两项运动
1，1，2
2，3，2，3，2，3，3
3，3，1，1
1，1，4
4，3
从上表分析可知，小张在一段时间内连续进行的两项运动有5种不同组合，其中组合②中的两项运动持续时间最长，所以最“喜爱”的两项运动为2和3，共连续进行了7次。
根据算法思想，编写VB程序实现如下功能：程序初始化时读取小张记录的一段时间内的所有运动项目，以逗号间隔显示在文本框Text1中，单击“寻找运动项目”按钮Command1，在标签Label4上显示最喜爱的两项运动编号，在文本框Text2中显示这两项运动最长持续的次数。程序运行界面如图所示。
(1)、若输入序列为“3，5，5，4，3，5，5，5，3，3，2，6”，最喜爱的两项运动连续进行的次数为。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Dim a(1 To 100) As Integer, n As Integer
Private Sub Form_Load( )
'读取已有记录项目总数n
'读取记录的每次运动项目存入数组 a，并在文本框Text1中显示，代码略
End Sub
Private Sub Command1_Click()
Dim x As Integer, y As Integer 'x, y分别表示当前记录中两个不同项目
Dim c1 As Integer, c2 As Integer 'c1,c2 分别表示两个项目在当前统计过程中出现的次数
Dim i As Integer, j As Integer, m1 As Integer, m2 As Integer, ans As Integer
i = 1: j = 1
Do While j <= n And a(i) = a(j)
j = j + 1
Loop
x = a(i): y = a(j)
c1 =
c2 = 1
ans = j - i + 1
Do While j < n
j = j + 1
If a(j) = x Then
c1 = c1 + 1
ElseIf a(j) = y Then
c2 = c2 + 1
Else
Do While
If a(i) = x Then c1 = c1 – 1 Else c2 = c2 - 1
i = i + 1
Loop
If Then
y = a(j)
c2 = 1
Else
x = a(j)
c1 = 1
End If
End If
If ans < j - i + 1 Then
ans = j - i + 1
m1 = x
m2 = y
End If
Loop
Label4.Caption = Str(m1) + "和" + Str(m2)
Text2.Text = Str(ans)
End Sub