浙江省山水联盟2021届高三上学期信息技术12月联考试卷
试卷更新日期：2021-01-05 类型：月考试卷
一、选择题
-
1. 下列有关信息与信息技术的说法，正确的是（ ）A、在网站注册时设置复杂密码是为了提高信息的准确性 B、小道消息不可信体现了信息的真伪性 C、信息技术随着造纸术和印刷术的问世才诞生 D、我国自主研发的北斗卫星导航系统利用电磁波传递信号说明信息不需要依附于载体2. 下列关于网络的相关说法中，正确的是（ ）A、网络上传输文件都应遵守文件传输协议FTP B、超链接可以实现同一网站或不同网站网页间的跳转 C、访问网页时应遵守WWW协议 D、在网址“http：//www.news.sohu.com/20160313/n440282679.html”中，“20160313”为文件目录，是本地计算机中的一个文件夹3. 使用 Word 软件编辑某文档，部分界面如图所示。下列说法正确的是（ ）
A、文档中图片的环绕方式是“嵌入型” B、全文共有3处修订 C、若给文中第一行“新冠肺炎”添加批注，则“批注[j1]：沙特国王萨勒曼主持”变为“批注[j2]：沙特国王萨勒曼主持” D、输入“肺炎”时自动更正为“新冠肺炎”，这体现了人工智能技术的应用4. 关于Access数据表，下列说法正确的是（ ）
A、当前数据表中共有7条记录，12个字段 B、当前选中记录的学号“5”可以改为“4” C、“出生日期”字段类型为“日期/时间”型，则在新记录的出生日期字段可输入“1993-2-29” D、数据表是关于特定主题数据的集合5. 一个2位十六进制正整数n，其末位是“F”，下列说法正确的是（ ）A、无法确定n是奇数还是偶数 B、去掉末位“F”，所得新数等同于n/16 C、n+1结果对应一个3位十六进制数 D、n*2mod8结果是66. 使用GoldWave软件编辑某音频文件，部分界面如图所示，在当前状态将一段2秒的音频复制到当前位置后按原格式参数保存，则保存后的声音文件存储容量约为（ ）
A、516.8KB B、689KB C、1MB D、2MB7. 下列表达式的值最大的是（ ）A、Val (Str(10) + Str(0)) B、Val (Str(10)) + Val(Str(1)) C、Int(Rnd * 100) D、Sqr (Len("10000"))8. 某算法的部分流程图如图所示。执行这部分流程后，输出sum，i的值分别是（ ）
A、28，6 B、60，6 C、28，5 D、60，59. 有如下程序段s = Text1.Text
s1 = ""
For i = 1 To Len(s) \ 2
m = Mid(s, i, 1)
n = Mid(s, n - i + 1, 1)
If m > n Then
s1 = s1 + m + n
Else
s1 = s1 + n + m
Next i
Text2.Text = s1
在Text1中输入“8523691”，则执行该程序后，Text2中输出的是（ ）
A、819562 B、8159823 C、815926 D、819562310. 有如下程序段For i = 1 To 5
a(i) = Int(Rnd * 90) + 10
Next i
For j = 5 To 2 Step -1
If a(j) Mod 2 = 1 And a(j) < a(j - 1) Then
t = a(j): a(j) = a(j - 1): a(j - 1) = t
Else
a(j) = a(j) / 2
End If
Next j
执行该程序段后，a(1)到a(5)各元素不可能的是（ ）
A、17，58，73，62，37 B、37，63，59，40，19 C、31，65，98，7，6 D、84，57，65，7，611. 有如下程序段Dim a(1 To 6) As String i = 6
Text1.Text = ""
Do While i > 1
k = i
For j = 1 To i - 1
If a(k) < a(j) Then k = j
Next j
tmp = a(k): a(k) = a(i): a(i) = tmp
Text1.Text = a(i)
i = i - 1
Loop
其中数据元素 a(1)到a(6)的值依次为“12”、“34”、“8”、“9”、“77”、“23”，执行该程序段后，文本框Text1中显示的内容为（ ）
A、9 B、8 C、12 D、2312. 某对分查找的程序代码如下Key = Int(Rnd * 25) * 2
n = 0: i = 1: j = 10
Do While i <= j
m = (i + j) \ 2
If Key = a(m) Then
Exit Do
If Key < a(m) Then
j = m - 1: n = n + 1
Else
i = m + 1: n = n - 1
End If
Loop
Text2.Text = Str(n)
其中 a(1)到 a(10)数组的值分别“2，3，6，9，10，18，38，40，47，48”， 执行该程序段后，n 的值不可能的是（ ）
A、0 B、-1 C、-2 D、-3二、操作题
-
13. 小明收集了2019年浙江省各市各类学校学生数的相关数据，并用EXCEL软件进行了处理，如图a所示：
图 a
(1)、利用rank函数对F列各城市学生总数进行排名，先计算G4单元格，然后通过自动填充功能正确计算 G5：G14，则 G4单元格的公式是。（提示：=rank（B3，B3：B13）表示 B3 单元格在 B3：13中的排名）
图 b
(2)、根据图a中的数据制作的图表如图b所示，则创建图表的数据区域是。(3)、要得到包含“州”的城市中学生总数最少的2项数据，并显示在操作结果的最上面（紧邻第2行），则操作步骤为。（按操作顺序选填2个序号）①按“学生总数”为“最小2项”进行筛选
②选择数据区域A2：G14，以“学生总数”为关键字进行升序排序
③对“城市”进行筛选，条件为“包含州”
④选择数据区域A2：G14，以“城市”为关键字升序排序
14. 小明创作“高考加油”的多媒体作品，他首先使用Photoshop软件制作一张背景图片，然后使用Flash软件制作动画。请回答下列问题：(1)、根据图a所示，下列说法正确的是（多选，填字母：A ．当前状态下，选中“背景”图层直接添加“镜头光晕”滤镜，可以将滤镜调整到画面的正中心/B ．可以将“高考加油！”图层的图层样式拷贝粘贴到“背景”图层/C ．可以使用文字工具将文字“高”单独放大/D ．删除“背景”图层，保存为bmp格式后，文件大小为7.60MB/E .可以使用文字工具调整“文字”图层的文字大小）
图 a
(2)、如图b所示，“气球”图层由“气球”元件制作而成，测试影片时，发现气球在空中移动的过程中不断的闪光，则该图层动画的类型是 ， 气球元件的类型是。
图 b
(3)、单击“播放”按钮无法实现正常跳转，按钮元件如图c所示。下列哪些操作可以使按钮功能恢复正常 。（多选：填字母）
图 c
A、在“图层 1”图层“点击”帧执行“插入帧”操作 B、在“图层 1”图层“指针经过”帧执行“清除关键帧”操作 C、在“文字”图层“点击”帧执行“删除帧”操作 D、在“文字”图层“点击”帧执行“清除关键帧”操作(4)、要使动画完整播放一遍结束时能实现在浏览器中显示同一文件夹下“高考.txt”文件的内容，并自动关闭动画，则在最后一帧设置脚本动作。15. 小王到某城市，时间只有一天了，但小王很想到该城市的著名大景区游玩，该城市的著名大景区内共有N（超过 10） 个景点，标号为1至N，假设每个景点都有一个进出口。现在只知道每个景点有一条路连接下一个景点。小王想知道，根据这些道路信息，从其中一个景点出发， 最后再回到出发景点离开，最多能游玩多少个景点。
例如，共有N=5个景点，每个景点连接的下一个景点分别是 2，4，2，3，1。
景点号
1
2
3
4
5
下一景点号
2
4
2
3
1
则他可以从2号景点出发，最多可以游玩2号、3号、4号三个景点。程序代码如下：
Private Sub Command1_Click()
Dim a(1 To 100) As Integer, d(1 To 100) As Integer '数组 a 存放下一景点号
Dim jd As String, m As String, c As Integer, i As Integer
Dim s As Integer, p As Integer, k As Integer, ans As Integer
jd=Text1.Text+","
s=0 : c=0
For i=1 To Len(jd)
m=Mid(jd,i,1)
If m<>"," Then
①
Else
c=c+1 : a(c)=s: s=0
End If
Next i
For k=1 To 100 d(k)=0
Next k
ans=0: k=0
For i=1 To c '枚举起点
If d(i)=0 Then p=i
Do While p<=c
If d(p)=0 Then
k=k+1 :d(p)=k
Else
②
If y>ans Then ans=y k=0
Exit Do
End If
'改错Loop
End If
Next i
Text2.Text=Str(ans)
End Sub
(1)、若有7个景点，且每个景点的连接情况为：6，3，5，2，7，5，4，那么小王最多可以游玩的景点数是。(2)、在上面的程序代码中的下划线中填入代码① ②
(3)、在上面的程序代码中，加框处代码有错，请改正。16. 城堡问题。有一个城堡的地形图，城堡被分割成若干个方块，每个方块可以有 0~4 面墙（粗线表示墙）。每个方块用一个代表其周围墙的数字之和（0≤p≤15）表示：1 表示西墙，2 表示北墙，4 表示东墙，8 表示南墙。城堡的内墙被计算两次，方块（1，1）的南墙同时也是方块（2，1）的北墙。城堡至少有两个房间。例如，图a的每个方块对应数字如图b所示。
图a
图b程序运行界面如图c所示，现已知城堡地形对应的数字矩阵，要求出城堡一共有多少房间，最大 的房间有多大。小金利用深度优先搜索算法解决当 前问题，具体算法如下：
图c在城堡中按行搜索，找到第一个未被搜索过方块， 以它为起点，分别按左、上、右、下的顺序向其四个方向试探，若发现一个方向上的方块是未被搜索过且可以通往的（无墙），则以这个方块为新起点，再重复上述试探。若当前方块四个方向上均无路可走，则返回上一个方块进行其他方向上的搜索，直至返回开始当前搜索的第一个方块且这个方块四个方向上也无路可走是，则本轮搜索结束。
(1)、将界面中方块（2，2）对应的数字9改为13，方块（2，3）对应的数字6改为7，则城堡中最大的房间占块方格。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Const m = 4 Const n = 7
Dim a(1 To m * n * 4) As Integer
Dim f(1 To m * n) As Boolean
Dim c(1 To m * n) As Integer
Private Sub Command1_Click()
Dim i As Integer, j As Integer, x As Integer, y As Integer
Dim area As Integer, max As Integer, cnt As Integer
'城堡地形对应的数字矩阵,存入 c 数组中,并显示在列表框 List1 中,f 数组初值为 false, 代码略
For i = 1 To m * n
x = c(i)
For j = 1 To 4
a((i - 1) * 4 + j) = x Mod 2
x = x \ 2
Next j
Next i
max = 0
For i = 1 To m
For j = 1 To n
IfThen
cnt = cnt + 1
area = Search(i, j)
If max < area Then
max = area
End If
Next j
Next i
Label1.Caption = "城堡一共有" + Str(cnt) + "个房间,最大的房间占" + Str(max) + "块方格."
End Sub
'从方块(x, y)开始搜索，并返回其所在房间所占方块数.
Function Search(ByVal x As Integer, ByVal y As Integer) As Integer
Dim i As Integer, j As Integer, sum As Integer, r As Integer, c As Integer
Dim pre(1 To m * n) As Integer '记录当前房间搜索的路径
Dim row(1 To 4) As Integer, col(1 To 4) As Integer
row(1) = 0: row(2) = -1: row(3) = 0: row(4) = 1
col(1) = -1: col(2) = 0: col(3) = 1: col(4) = 0
sum = 1: j = 1: pre(1) = x * 10 + y
f((x - 1) * n + y) = True
Do While True
For i = 1 To 4
r = x + row(i): c = y + col(i)
If r >= 1 And r <= m And c >= 1 And c <= n Then
If f((r - 1) * n + c) = False AndThen
sum = sum + 1
x = r: y = c
f((x - 1) * n + y) = True
j = j + 1
pre(j) = x * 10 + y
Exit For
End If
End If
Next i
If i > 4 Then
If j = 0 Then
Exit Do
x = pre(j) \ 10: y = pre(j) Mod 10
End If
Loop
Search = sum
End Function