浙江省杭州市高级中学2020届高三信息技术5月仿真模拟试卷
一、选择题（本大题共12小题，每小题2分，共24分，每小题列出的四个备选项中只有一个是符合题目要求的。）
1．（2020·杭州模拟）下列说法正确的是（ ）
A．信息可以脱离载体被存储、保存和传播
B．微信朋友圈分享身边趣闻是一种比较常见的信息表达方式
C．微电子技术、光电子技术、广播电视技术、计算机网络都是属于现代信息技术
D．在淘宝购物页面中有货品的好评率，这属于统计评价
【答案】D
【知识点】信息及其特征；信息技术的概念与关键技术；因特网信息资源评价；信息表达方式与表达技术
2．（2020·杭州模拟）某天小王老师从商场开车回学校的途中发生了以下几件事：
①在开出商场时，出口处的停车闸识别了她的车牌号，并显示相应的停车费。
②她使用微信扫描二维码的方式支付停车费
③在出发前，她不熟悉回去的路，于是用百度地图上搜索了回程路线
④在行车途中她想使用手机，喊了一声“嘿，Siri”，手机助手回应“你好，我在这儿”
⑤红绿灯停车时，她听到广播里一首歌，不知道叫什么歌名，于是使用“网易云音乐”软件中“听歌识曲”的功能。5秒钟后，软件内显示出了该歌曲的名称
⑥开到校门口，门卫大伯看到她的车，使用红外线传感遥控器，将学校的升降闸门打开，她安全地回到了学校。
上述过程中，哪几件事情运用到了人工智能技术（ ）
A．①②⑤ B．①④⑤ C．②③⑤ D．②③⑥
【答案】B
【知识点】人工智能的应用
3．（2020·杭州模拟）使用Access软件打开数据库，部分界面如图所示。下列说法正确的是 （ ）
图a
图b
A．该数据库能为多个用户共享、与应用程序彼此独立
B．当前状态下，如果添加新纪录，ID字段值一定为6
C．可以删除所有记录和字段，使该表成为一张空表
D．无论是图a还是图b，两个视图中都无法删除ID字段，因为该字段为主键
【答案】A
【知识点】数据库、数据库系统及其特征；数据表、字段、记录的编辑
4．（2020·杭州模拟）下列关于计算机信息编码的描述，正确的是（ ）
A．8位二进制数的最大值是128D
B．处理码是计算机内部用于信息处理的汉字编码，也称为交换码
C．数据具有冗余，所以可以被压缩，压缩是编码的过程
D．16色位图的每个像素必须用16位二进制数进行编码
【答案】C
【知识点】信息的编码；进制及数制转换
5．（2020·杭州模拟）使用Photoshop软件制作“抗疫”宣传图片,部分界面如图所示：
下列说法正确的是（ ）
A．“齐心抗疫情”图层设置了“投影”和“内阴影”效果，仅投影效果可见
B．左下角数值“50%”修改为“100%”，则图像大小变为原来的2倍
C．选中“中国”两字，用文字工具可以仅将“中国”两字变大
D．选择“背景”图层，将不透明改成0%，并以PNG格式存储可以得到背景透明的图像文件
【答案】C
【知识点】图层及图层的基本操作；声音、图像、视频编码
6．（2020·杭州模拟）未经压缩的BMP图像文件a.bmp和b.bmp，a.bmp的尺寸1024*768，颜色类别为RGB/8，b.bmp的尺寸768*512，颜色类别为16色，则图像文件a.bmp与b.bmp存储容量之比约为（ ）
A．4：1 B．12：1 C．16：1 D．32 ： 1
【答案】B
【知识点】声音、图像、视频编码
7．（2020·杭州模拟）某算法的部分流程图如图所示，以下说法正确的是（ ）
A．该流程执行后，变量i的值是4
B．该流程执行后，变量f的值是true
C．语句“i mod 3 = 0 ”执行的次数为2次
D．语句“i<-i+1”和“f<- not f”执行的次数为3次
【答案】B
【知识点】常量、变量及变量的赋值；流程图识读
8．（2020·杭州模拟）下列VB表达式的值为6的是（ ）
A．36 Mod 30 \ 3 B．Val("3+3")
C．abs(Int(-5.34))+1 D．mid(“2016remember”,4,1)
【答案】A
【知识点】运算符、基本运算与表达式
【解析】【解答】选项A：36 Mod 30 \ 3=36 Mod 10=6；选项B：Val("3+3")=3；选项C：abs(Int(-5.34))+1=abs(-6)+1=6+1=7；选项D：mid("2016remember",4,1)=“6”。故答案选A。
【分析】本题考查VB表达式的运算。Val(X) --将数字字符串转换为数值，abs( )是求一个数的绝对值，Mid ( )函数是从文本字符串中指定的开始位置起返回指定长度的字符。
9．（2020·杭州模拟）关于排序和查找，以下说法正确的是（ ）
A．冒泡排序算法中，数据的交换次数与比较次数一定相同
B．选择排序算法中，若某一趟排序中数组元素没有发生过交换，则数组已有序
C．有10个数据的数组，用顺序查找算法查找某个数，查找不成功的时，查找次数为11次
D．有10个数据的有序数组，利用二分查找算法查找某个数，最多的查找次数为4次
【答案】D
【知识点】排序算法及程序实现；查找算法及程序实现
10．（2020·杭州模拟）有如下 VB 程序段：
Dim s As String, ch As String
Dim i As Integer, t As Integer
s = Text1.Text : t = 0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch <> "," Then t = t * 2 + Val(ch)
Text2.Text = Text2.Text + Str(t)
Next i
执行该程序，当文本框text1中输入了“11,10”时，文本框text2中输出的是（ ）
A．3 2 B．1 3 7 14
C．1 3 3 7 14 D．1 3 3 7 14 14
【答案】C
【知识点】运算符、基本运算与表达式；常量、变量及变量的赋值
11．（2020·杭州模拟）有如下VB程序段如下:
Dim s As String, t As String
s = Text1.Text
For i = 1 To Len(s) - 1
For j = Len(s) To i + 1 Step -1
If Mid(s, j, 1) + Mid(s, j - 1, 1) > Mid(s, j - 1, 1) + Mid(s, j, 1) Then
If j>2 then s = Mid(s, 1, j - 2)
s=s + Mid(s, j, 1) + Mid(s, j - 1, 1)
If jEnd If
Next j
t = t + Mid(s, i, 1)
Next i
Text2.Text = t
执行该程序，当文本框text1中输入了“b52Ba”时，文本框text2中输出的是（ ）
A．25Bab B．baB52 C．baB5 D．25Ba
【答案】C
【知识点】运算符、基本运算与表达式；常量、变量及变量的赋值
12．（2020·杭州模拟）某对分查找算法的VB程序段如下:
Key = Int(Rnd * 30) * 2 + 41
s = 0: i = 1: j = 10
Do While i <= j
m = (i + j) \ 2
If Key > a(m) Then
i = m + 1: s = 3 * s + 2
Else
j = m - 1: s = 3 * s
End If
Loop
Text1.Text = s
数组a(1)到a(10)的值依次为“2,13,24,31,35,44,45,47,61,101”，执行该程序段后，s的值不可能为（ ）
A．8 B．18 C．60 D．78
【答案】A
【知识点】运算符、基本运算与表达式；常量、变量及变量的赋值
二、非选择题(本大题共4小题，4+8+7+7，共26分)
13．（2020·杭州模拟）小王用Excel软件制作了一张2019年家庭各月份用电统计表，如图所示。
请回答下列问题：
（1）“执行峰谷电”的电价是根据高峰、低谷不同的电价进行计算。通过I3单元格的公式，对I4：I14进行自动填充，则I7单元格中显示结果是 （单元，填字母：A .53.4 /B .0.0 /C .#REF!
/D .#DIV/0!）
（2）若要正确计算“执行峰谷电”列的数据，可以对I3单元格中的公式进行修改，并对I4:I14进行自动填充，则I3单元格的公式是
（3）下面描述正确的是____________（多选，填字母）
A．C列内容显示为“#####”，其可能的原因是列宽不足
B．若要对第三季度（七、八、九月份）的数据以“执行峰谷电”为主要关键字进行降序排序，则排序时选择的数据区域是B2：I2，B9：I11
C．若要筛选出“执行峰谷电”和“不执行峰谷电”差值最小的月份，可以以“执行峰谷电”为最大1项、“不执行峰谷电”为最小1项进行筛选
D．若将M3：M5单元格的数值小数位数设置为0，则H3：I14中显示的值不会发生变化
【答案】（1）B
（2）=E3*$M$3+F3*$M$4
（3）A；D
【知识点】表格数据的基本操作；表格数据的处理与计算
14．（2020·杭州模拟）用Flash软件打开“致敬逆行者.fla”文件，编辑界面如图a所示。
图a
请回答下列问题：
（1）创作多媒体作品需要进行需求分析和规划设计。下列属于需求分析的是 （多选，填字母：A ．确定作品的结构类型为演示型/ B ．明确作品的工作流程/ C ．确定获取原始素材的方式/ D ．确定作品的发布方式/ E ．设计作品的三个模块的交互方式）
（2）文件中导入的声音设置图b所示，动画播放一遍停止时，音乐播放时长是 秒。
（3）将动画GIF文件“飞奔．gif”导入库中直接得到一个影片剪辑元件，则该元件中动画的动画类型是 。（选填，填字母，A ．逐帧动画/B ．形状补间动画/C ．动画补间动画）
图b
（4）为了使该场景动画播放到最后一帧自动退出动画，可以在按钮图层的最后一帧添加动作脚本
（5）测试该场景时，“英雄”图层内容在播放完第30帧后消失，为了使该图层第30帧内容再延续2秒，下列操作可行的是______。（多选题）
A．选中“英雄”图层第31帧执行“清除关键帧”操作
B．将“英雄”图层第50帧执行“插入关键帧”操作
C．删除“英雄”图层第31帧，在第50帧执行“插入帧”操作
D．将“英雄”图层第31帧移动至50帧，在第50帧执行“清除关键帧”操作
E．选中“英雄”图层第50帧执行“插入帧”操作，在第31帧执行“清除关键帧”操作
【答案】（1）AD
（2）4
（3）A
（4）fscommand(“quit”)
（5）C；D；E
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；动画的实现；常用影片控制函数的应用
15．（2020·杭州模拟）某程序功能如下：将自然数从1到100按某种方式排列起来，单击“输出”按钮Command1，在列表框List1中显示排列后的数表，运行结果如图所示。
（1）下列对象中不具有Caption属性的是 （单选，填字母：mand1 /B .Form1 /C .List1）
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private
Sub Command1_Click()
Const
n = 10
Dim
i As Integer, j As Integer
Dim
d(0 To 100) As Integer
For
i = 1 To n
For j = 1 To n
If i = 1 Then
d(j) = j ^ 2
Else
If j = 1 Then
①
d((i - 1) * n + j) = d((i - 2) * n + j) - 1
Else
②
End If
End If
Next j
Next i
‘在列表框List1中按每行10个输出数组d的所有元素，代码略
End Sub
① ②
（3）程序中加框处代码有错，请改正。
【答案】（1）C
（2）d((i - 1) * n + 1) = (i - 1) ^ 2 + 1；d((i - 1) * n + j) = d((i - 1) * n + j - 1) + 1
（3）ElseIf j > i Then
【知识点】常见数据类型、数组；常量、变量及变量的赋值
16．（2020·杭州模拟）某地为各个村之间建立灌溉管道，现需实现用最短的管道距离使得所有村庄可以连通。如图a所示，[V1,V2,V3,V4,V5]每个节点表示村庄，两个节点之间的数值表示两个村庄之间的边距离。
图c
算法思路如下：
①首先按边距离升序排序；
②找到边距离最小值1，以及相应的两个节点V1 和V3；
③以V1 或V3 作为起点，搜寻连接新节点且距离最小的边，发现(V1,V4)边最小为4；
④以V1、V3、V4 作为起点，搜寻连接新节点且距离最小的边，发现(V4,V5)边最小为2；
⑤以V1、V3、V4、V5 作为起点，搜寻连接新节点且距离最小的边，发现(V2,V5)边最小为3；因此可知，连通5个村庄的最短管道距离是1+4+2+3=10，效果如图b所示。
现设计了如下VB 程序，界面如图c所示，请回答下列问题：
（1）V2到V5的边距离若为6，则连通5个村庄的最短管道距离是 。
（2）请在划线处填入合适的代码。
Const n = 5 '村庄数
Const m = 8 '管道线路数
Dim pointAB(1 To 2 * m)
As Integer '存储连接的两个村庄节点
Dim length(1 To m) As Integer
'存储两个村庄之间的距离
Dim res(1 To 100) As Integer
'存储管道规划结果
Private Sub Form_Load()
'村庄节点数据存储在pointAB数组，两个村庄的距离数据存储在length 数组。
'如图c 所示，(V1,V3)边距离为1，则pointAB(1)=1，pointAB(2)=3，length(1)=1；
(V1,V2)边距离为6，则pointAB(3)=1，pointAB(4)=2，length(2)=6；其他依次类推，代码略。
End Sub
Function check(x As Integer)
As Integer '判断x 节点是否已在规划中
check = 0
For i = 1 To 100
If x = res(i) Then check
= 1: Exit Function
Next i
End Function
Private Sub Command1_Click()
Dim i As Integer, j As
Integer, tmp As Integer
Dim total As Integer, sum
As Integer
For i = 1 To m - 1
For j = m To i + 1 Step
-1
If ① Then
tmp= pointAB(2 * j - 1)
:pointAB(2 * j - 1) = pointAB(2 * j - 3) :pointAB(2 * j - 3) = tmp
tmp = pointAB(2 * j) :
pointAB(2 * j) = pointAB(2 * j - 2) :pointAB(2 * j - 2) = tmp
tmp = length(j): length(j)
= length(j - 1): length(j - 1) = tmp
End If
Next j
Next i
'开始规划管道
total = 1
res(1) = pointAB(1): res(2)
= pointAB(2)
sum = length(1)
Do While total < ②
For i = 2 To m
If ③ Then
total = total + 1
res(2 * total - 1) = pointAB(2
* i - 1)
res(2 * total) = pointAB(2
* i)
sum = sum + length(i)
Exit For
End If
Next i
Loop
'输出连通结果res 以及管道总长度sum，代码略。
End Sub
① ② ③
【答案】（1）12
（2）length(j)【知识点】常量、变量及变量的赋值；过程与自定义函数；排序算法及程序实现
1 / 1浙江省杭州市高级中学2020届高三信息技术5月仿真模拟试卷
一、选择题（本大题共12小题，每小题2分，共24分，每小题列出的四个备选项中只有一个是符合题目要求的。）
1．（2020·杭州模拟）下列说法正确的是（ ）
A．信息可以脱离载体被存储、保存和传播
B．微信朋友圈分享身边趣闻是一种比较常见的信息表达方式
C．微电子技术、光电子技术、广播电视技术、计算机网络都是属于现代信息技术
D．在淘宝购物页面中有货品的好评率，这属于统计评价
2．（2020·杭州模拟）某天小王老师从商场开车回学校的途中发生了以下几件事：
①在开出商场时，出口处的停车闸识别了她的车牌号，并显示相应的停车费。
②她使用微信扫描二维码的方式支付停车费
③在出发前，她不熟悉回去的路，于是用百度地图上搜索了回程路线
④在行车途中她想使用手机，喊了一声“嘿，Siri”，手机助手回应“你好，我在这儿”
⑤红绿灯停车时，她听到广播里一首歌，不知道叫什么歌名，于是使用“网易云音乐”软件中“听歌识曲”的功能。5秒钟后，软件内显示出了该歌曲的名称
⑥开到校门口，门卫大伯看到她的车，使用红外线传感遥控器，将学校的升降闸门打开，她安全地回到了学校。
上述过程中，哪几件事情运用到了人工智能技术（ ）
A．①②⑤ B．①④⑤ C．②③⑤ D．②③⑥
3．（2020·杭州模拟）使用Access软件打开数据库，部分界面如图所示。下列说法正确的是 （ ）
图a
图b
A．该数据库能为多个用户共享、与应用程序彼此独立
B．当前状态下，如果添加新纪录，ID字段值一定为6
C．可以删除所有记录和字段，使该表成为一张空表
D．无论是图a还是图b，两个视图中都无法删除ID字段，因为该字段为主键
4．（2020·杭州模拟）下列关于计算机信息编码的描述，正确的是（ ）
A．8位二进制数的最大值是128D
B．处理码是计算机内部用于信息处理的汉字编码，也称为交换码
C．数据具有冗余，所以可以被压缩，压缩是编码的过程
D．16色位图的每个像素必须用16位二进制数进行编码
5．（2020·杭州模拟）使用Photoshop软件制作“抗疫”宣传图片,部分界面如图所示：
下列说法正确的是（ ）
A．“齐心抗疫情”图层设置了“投影”和“内阴影”效果，仅投影效果可见
B．左下角数值“50%”修改为“100%”，则图像大小变为原来的2倍
C．选中“中国”两字，用文字工具可以仅将“中国”两字变大
D．选择“背景”图层，将不透明改成0%，并以PNG格式存储可以得到背景透明的图像文件
6．（2020·杭州模拟）未经压缩的BMP图像文件a.bmp和b.bmp，a.bmp的尺寸1024*768，颜色类别为RGB/8，b.bmp的尺寸768*512，颜色类别为16色，则图像文件a.bmp与b.bmp存储容量之比约为（ ）
A．4：1 B．12：1 C．16：1 D．32 ： 1
7．（2020·杭州模拟）某算法的部分流程图如图所示，以下说法正确的是（ ）
A．该流程执行后，变量i的值是4
B．该流程执行后，变量f的值是true
C．语句“i mod 3 = 0 ”执行的次数为2次
D．语句“i<-i+1”和“f<- not f”执行的次数为3次
8．（2020·杭州模拟）下列VB表达式的值为6的是（ ）
A．36 Mod 30 \ 3 B．Val("3+3")
C．abs(Int(-5.34))+1 D．mid(“2016remember”,4,1)
9．（2020·杭州模拟）关于排序和查找，以下说法正确的是（ ）
A．冒泡排序算法中，数据的交换次数与比较次数一定相同
B．选择排序算法中，若某一趟排序中数组元素没有发生过交换，则数组已有序
C．有10个数据的数组，用顺序查找算法查找某个数，查找不成功的时，查找次数为11次
D．有10个数据的有序数组，利用二分查找算法查找某个数，最多的查找次数为4次
10．（2020·杭州模拟）有如下 VB 程序段：
Dim s As String, ch As String
Dim i As Integer, t As Integer
s = Text1.Text : t = 0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch <> "," Then t = t * 2 + Val(ch)
Text2.Text = Text2.Text + Str(t)
Next i
执行该程序，当文本框text1中输入了“11,10”时，文本框text2中输出的是（ ）
A．3 2 B．1 3 7 14
C．1 3 3 7 14 D．1 3 3 7 14 14
11．（2020·杭州模拟）有如下VB程序段如下:
Dim s As String, t As String
s = Text1.Text
For i = 1 To Len(s) - 1
For j = Len(s) To i + 1 Step -1
If Mid(s, j, 1) + Mid(s, j - 1, 1) > Mid(s, j - 1, 1) + Mid(s, j, 1) Then
If j>2 then s = Mid(s, 1, j - 2)
s=s + Mid(s, j, 1) + Mid(s, j - 1, 1)
If jEnd If
Next j
t = t + Mid(s, i, 1)
Next i
Text2.Text = t
执行该程序，当文本框text1中输入了“b52Ba”时，文本框text2中输出的是（ ）
A．25Bab B．baB52 C．baB5 D．25Ba
12．（2020·杭州模拟）某对分查找算法的VB程序段如下:
Key = Int(Rnd * 30) * 2 + 41
s = 0: i = 1: j = 10
Do While i <= j
m = (i + j) \ 2
If Key > a(m) Then
i = m + 1: s = 3 * s + 2
Else
j = m - 1: s = 3 * s
End If
Loop
Text1.Text = s
数组a(1)到a(10)的值依次为“2,13,24,31,35,44,45,47,61,101”，执行该程序段后，s的值不可能为（ ）
A．8 B．18 C．60 D．78
二、非选择题(本大题共4小题，4+8+7+7，共26分)
13．（2020·杭州模拟）小王用Excel软件制作了一张2019年家庭各月份用电统计表，如图所示。
请回答下列问题：
（1）“执行峰谷电”的电价是根据高峰、低谷不同的电价进行计算。通过I3单元格的公式，对I4：I14进行自动填充，则I7单元格中显示结果是 （单元，填字母：A .53.4 /B .0.0 /C .#REF!
/D .#DIV/0!）
（2）若要正确计算“执行峰谷电”列的数据，可以对I3单元格中的公式进行修改，并对I4:I14进行自动填充，则I3单元格的公式是
（3）下面描述正确的是____________（多选，填字母）
A．C列内容显示为“#####”，其可能的原因是列宽不足
B．若要对第三季度（七、八、九月份）的数据以“执行峰谷电”为主要关键字进行降序排序，则排序时选择的数据区域是B2：I2，B9：I11
C．若要筛选出“执行峰谷电”和“不执行峰谷电”差值最小的月份，可以以“执行峰谷电”为最大1项、“不执行峰谷电”为最小1项进行筛选
D．若将M3：M5单元格的数值小数位数设置为0，则H3：I14中显示的值不会发生变化
14．（2020·杭州模拟）用Flash软件打开“致敬逆行者.fla”文件，编辑界面如图a所示。
图a
请回答下列问题：
（1）创作多媒体作品需要进行需求分析和规划设计。下列属于需求分析的是 （多选，填字母：A ．确定作品的结构类型为演示型/ B ．明确作品的工作流程/ C ．确定获取原始素材的方式/ D ．确定作品的发布方式/ E ．设计作品的三个模块的交互方式）
（2）文件中导入的声音设置图b所示，动画播放一遍停止时，音乐播放时长是 秒。
（3）将动画GIF文件“飞奔．gif”导入库中直接得到一个影片剪辑元件，则该元件中动画的动画类型是 。（选填，填字母，A ．逐帧动画/B ．形状补间动画/C ．动画补间动画）
图b
（4）为了使该场景动画播放到最后一帧自动退出动画，可以在按钮图层的最后一帧添加动作脚本
（5）测试该场景时，“英雄”图层内容在播放完第30帧后消失，为了使该图层第30帧内容再延续2秒，下列操作可行的是______。（多选题）
A．选中“英雄”图层第31帧执行“清除关键帧”操作
B．将“英雄”图层第50帧执行“插入关键帧”操作
C．删除“英雄”图层第31帧，在第50帧执行“插入帧”操作
D．将“英雄”图层第31帧移动至50帧，在第50帧执行“清除关键帧”操作
E．选中“英雄”图层第50帧执行“插入帧”操作，在第31帧执行“清除关键帧”操作
15．（2020·杭州模拟）某程序功能如下：将自然数从1到100按某种方式排列起来，单击“输出”按钮Command1，在列表框List1中显示排列后的数表，运行结果如图所示。
（1）下列对象中不具有Caption属性的是 （单选，填字母：mand1 /B .Form1 /C .List1）
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private
Sub Command1_Click()
Const
n = 10
Dim
i As Integer, j As Integer
Dim
d(0 To 100) As Integer
For
i = 1 To n
For j = 1 To n
If i = 1 Then
d(j) = j ^ 2
Else
If j = 1 Then
①
d((i - 1) * n + j) = d((i - 2) * n + j) - 1
Else
②
End If
End If
Next j
Next i
‘在列表框List1中按每行10个输出数组d的所有元素，代码略
End Sub
① ②
（3）程序中加框处代码有错，请改正。
16．（2020·杭州模拟）某地为各个村之间建立灌溉管道，现需实现用最短的管道距离使得所有村庄可以连通。如图a所示，[V1,V2,V3,V4,V5]每个节点表示村庄，两个节点之间的数值表示两个村庄之间的边距离。
图c
算法思路如下：
①首先按边距离升序排序；
②找到边距离最小值1，以及相应的两个节点V1 和V3；
③以V1 或V3 作为起点，搜寻连接新节点且距离最小的边，发现(V1,V4)边最小为4；
④以V1、V3、V4 作为起点，搜寻连接新节点且距离最小的边，发现(V4,V5)边最小为2；
⑤以V1、V3、V4、V5 作为起点，搜寻连接新节点且距离最小的边，发现(V2,V5)边最小为3；因此可知，连通5个村庄的最短管道距离是1+4+2+3=10，效果如图b所示。
现设计了如下VB 程序，界面如图c所示，请回答下列问题：
（1）V2到V5的边距离若为6，则连通5个村庄的最短管道距离是 。
（2）请在划线处填入合适的代码。
Const n = 5 '村庄数
Const m = 8 '管道线路数
Dim pointAB(1 To 2 * m)
As Integer '存储连接的两个村庄节点
Dim length(1 To m) As Integer
'存储两个村庄之间的距离
Dim res(1 To 100) As Integer
'存储管道规划结果
Private Sub Form_Load()
'村庄节点数据存储在pointAB数组，两个村庄的距离数据存储在length 数组。
'如图c 所示，(V1,V3)边距离为1，则pointAB(1)=1，pointAB(2)=3，length(1)=1；
(V1,V2)边距离为6，则pointAB(3)=1，pointAB(4)=2，length(2)=6；其他依次类推，代码略。
End Sub
Function check(x As Integer)
As Integer '判断x 节点是否已在规划中
check = 0
For i = 1 To 100
If x = res(i) Then check
= 1: Exit Function
Next i
End Function
Private Sub Command1_Click()
Dim i As Integer, j As
Integer, tmp As Integer
Dim total As Integer, sum
As Integer
For i = 1 To m - 1
For j = m To i + 1 Step
-1
If ① Then
tmp= pointAB(2 * j - 1)
:pointAB(2 * j - 1) = pointAB(2 * j - 3) :pointAB(2 * j - 3) = tmp
tmp = pointAB(2 * j) :
pointAB(2 * j) = pointAB(2 * j - 2) :pointAB(2 * j - 2) = tmp
tmp = length(j): length(j)
= length(j - 1): length(j - 1) = tmp
End If
Next j
Next i
'开始规划管道
total = 1
res(1) = pointAB(1): res(2)
= pointAB(2)
sum = length(1)
Do While total < ②
For i = 2 To m
If ③ Then
total = total + 1
res(2 * total - 1) = pointAB(2
* i - 1)
res(2 * total) = pointAB(2
* i)
sum = sum + length(i)
Exit For
End If
Next i
Loop
'输出连通结果res 以及管道总长度sum，代码略。
End Sub
① ② ③
答案解析部分
1．【答案】D
【知识点】信息及其特征；信息技术的概念与关键技术；因特网信息资源评价；信息表达方式与表达技术
2．【答案】B
【知识点】人工智能的应用
3．【答案】A
【知识点】数据库、数据库系统及其特征；数据表、字段、记录的编辑
4．【答案】C
【知识点】信息的编码；进制及数制转换
5．【答案】C
【知识点】图层及图层的基本操作；声音、图像、视频编码
6．【答案】B
【知识点】声音、图像、视频编码
7．【答案】B
【知识点】常量、变量及变量的赋值；流程图识读
8．【答案】A
【知识点】运算符、基本运算与表达式
【解析】【解答】选项A：36 Mod 30 \ 3=36 Mod 10=6；选项B：Val("3+3")=3；选项C：abs(Int(-5.34))+1=abs(-6)+1=6+1=7；选项D：mid("2016remember",4,1)=“6”。故答案选A。
【分析】本题考查VB表达式的运算。Val(X) --将数字字符串转换为数值，abs( )是求一个数的绝对值，Mid ( )函数是从文本字符串中指定的开始位置起返回指定长度的字符。
9．【答案】D
【知识点】排序算法及程序实现；查找算法及程序实现
10．【答案】C
【知识点】运算符、基本运算与表达式；常量、变量及变量的赋值
11．【答案】C
【知识点】运算符、基本运算与表达式；常量、变量及变量的赋值
12．【答案】A
【知识点】运算符、基本运算与表达式；常量、变量及变量的赋值
13．【答案】（1）B
（2）=E3*$M$3+F3*$M$4
（3）A；D
【知识点】表格数据的基本操作；表格数据的处理与计算
14．【答案】（1）AD
（2）4
（3）A
（4）fscommand(“quit”)
（5）C；D；E
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；动画的实现；常用影片控制函数的应用
15．【答案】（1）C
（2）d((i - 1) * n + 1) = (i - 1) ^ 2 + 1；d((i - 1) * n + j) = d((i - 1) * n + j - 1) + 1
（3）ElseIf j > i Then
【知识点】常见数据类型、数组；常量、变量及变量的赋值
16．【答案】（1）12
（2）length(j)【知识点】常量、变量及变量的赋值；过程与自定义函数；排序算法及程序实现
1 / 1
