浙江省浙南名校联盟2021届高三上学期信息技术第一次联考试卷
试卷更新日期：2020-11-11 类型：月考试卷
一、选择题（本大题共12小题，每小题2分，共24分，每小题列出的四个备选项中只有一个是符合题目要求的）
-
1. 下列有关信息说法不正确的是（ ）A、“鱼目混珠”体现了信息具有真伪性 B、验证码在 60 秒后失效，体现了信息的时效性 C、信息可以从一种形态转变为另一种形态 D、信息具有载体依附性，因此信息不可以脱离它所反映的事物而独立存在2. 下列关于网页和电子邮件的说法正确的是（ ）A、记事本不可以对网页文件进行编辑 B、超链接只能实现网页之间的跳转 C、电子邮件服务器之间传送邮件采用的协议是 SMTP D、POP3 协议的功能是把电子邮件发送到收件人的电子邮箱中3. 使用 Word 软件编辑某文档，部分界面如图所示。
下列说法正确的是（ ）
A、该文档中图片的环绕方式为“嵌入型” B、使用“查找和替换”功能可实现在键入“蓝色”两个字时将自动替换成“黄色” C、该文档中共有 3 处批注 D、修订前，第四行开始的文字是“受亚热带扰动的影响，估计：7 月 31 日夜间到 8 月 1 日中午，”4. 使用 UltraEdit 软件查看字符的内码，部分界面如图所示。
下列说法不正确的是（ ）
A、图中字符“《”内码占 2 个字节 B、字符串中共有 3 个 ASCII 码字符 C、根据图中字符的内码可推得字符“J”的内码为 50 D、字符“火”的二进制编码为“10111011 11110000”5. 使用 Photoshop 软件制作“小龙虾”作品，部分界面如图所示。
下列说法正确的是（ ）
A、选择“小龙虾”图层后，使用“文字工具”可改变该图层字体的大小 B、将作品存储为 jpg 格式文件，该 jpg 文件的存储容量是 2.25MB C、可将“图片”图层的图层样式拷贝到“麻辣”图层 D、“背景”图层处于锁定状态，则该图层不能被删除6. 一段未压缩的 AVI 格式无声视频，其参数如下图所示，且存储容量约为 640MB，则表示该视频每个像素颜色的二进制位数为（ ）
A、1 B、3 C、16 D、247. 下列表达式的值与其它三个选项不同的是（ ）A、Len（"浙C-202OV"） B、Sqr(4)^3 C、5678 mod 1000\100 D、mid("2020/8/8",6,1)8. 某算法的部分流程图如图所示。执行这部分流程，若输入 i 的值为5，则输出 r 的值为（ ）
A、11 B、9 C、7 D、59. 有如下VB 程序段：s = "20210606"
c1 = 6
n = 0
For i = 1 To Len(s)
c = Val(Mid(s, i, 1))
If c < c1 Then
n = n + 1: c1 = c
Next i
运行该程序段后，n 的值为（ ）
A、0 B、2 C、6 D、810. 给定正整数 n(1≤n≤26),要得到中间以“A”开始,两边各递增 n-1 个字符的对称字符串s，例如 n=5，则 s=“EDCBABCDE”。实现该功能的 VB 程序段如下：s = ""
For i = 2 * n - 1 To 1 Step -1
If i <= n Then
S=
Else
S=
End If
Next i
上述程序段方框处的语句分别为：（ ）
A、Chr(Asc("A") + n - i) + s 和Chr(Asc("A") + i - n) + s B、Chr(Asc("A") + n - i) + s和s + Chr(Asc("A") + i - n) C、Chr(Asc("A") + n – i+1) + s和Chr(Asc("A") + i – n+1) + s D、Chr(Asc("A") + n - i) + s和s + Chr(Asc("A") + i – n+1)11. 有如下 VB 程序段：For i = 1 To 6
x = Int(Rnd * 10) + 1
If i Mod 2 <> x Mod 2 Then
a(i) = x
Else
a(7 - i) = x
End If
Next i
数组a各元素的初始值为0，执行程序后a数组各元素的值不可能是（ ）
A、8，7，0，0，6，5 B、0，9，8，3，6，3 C、6，7，2，3，2，0 D、2，9，4，7，10，312. 有如下VB程序段：'生成6个随机正整数，依次存入数组a(1)到(6)，代码略
Const n = 6
k = Int(Rnd * 3)
For i = 1 To 2
For j = 1 To n - i - k
If a(j) > a(j + 1) Then
t = a(j): a(j) = a(j + 1): a(j + 1) = t
End If
Next j
Next i
执行上述程序段后，下列选项中，a(1)到a(6)各元素的值不可能是（ ）
A、2，1，4，5，5，8 B、5，6，7，7，9，1 C、1，7，6，7，6，5 D、8，5，1，2，8，8二、非选择题（本大题共4小题，4+8+7+7，共26分）
-
13. 小董收集了部分热门景点某天的天气情况，并用excel软件进行数据处理，如图a所示。
图 a
请回答下列问题：
(1)、区域L3:L13的数据是通过对L3单元格自动填充得到的，小董在填充过程中，不小心填充到L14，则L14单元格显示的是（选填，填字母：A . 0.00/B . #DIV/0!/C . #VALUE!）(2)、根据图a中数据制作的图表如图b所示，创建该图表的数据区域是
图 b
(3)、小董为了找出“登山”类中平均气温最低的地点，下列方法可行的是 （多选，填字母）A、以“类别”为主要关键字（按字母），以“平均气温”为次要关键字，均升序排序，选排在前面的地点 B、以“类别”为登山、以“平均气温”为最小1项进行筛选，选排在前面的地点 C、以“类别”为登山进行筛选，以“平均气温”为关键字升序排序，选排在前面的地点 D、以“平均气温”为关键字升序排序，以“类别”为登山进行筛选，选排在前面的地点14. 小李使用Flash软件创作“山水诗”多媒体作品，编辑界面如图a所示。
图 a
请回答下列问题：
(1)、系统结构框架图如图b所示，图中“片头”“主交互界面”和“片尾”对应的场景名为“load”“main”和“end”，“load”和“main”场景播放完毕后自动停止。下列说法中正确的是 （多选，填字母）。
图 b
A、系统结构设计描述了整个作品的组成部分、工作流程和主要界面 B、在“main”场景可以自由选择进入“load”或“end”场景 C、“load”和“main”场景的最后一帧可添加帧动作脚本 stop()； D、为实现从“load”场景跳转到“main”功能，可在“进入”按钮上添加动作脚本on(release){gotoandplay(1);} E、为实现从“main”场景跳转到“end”场景，可在“退出”按钮上添加动作脚本on(release){fscommand(“quit”);}(2)、“小鸟”图层中的小鸟实例实现了由透明逐渐显示又逐渐消失的动画效果，该“ 小鸟”图层中第25帧到40帧的动画类型是 (选填，填字母：A . 逐帧动画 / B . 形状 补间 / C . 动画补间)，若对“小鸟”实例的Alpha属性值进行修改，则小鸟元件将 (选填：会 /不会)同步改变。(3)、测试影片时，自动生成的动画文件名为 （选填，填字母：A . 山水诗.fla / B . 山水诗.swf / C . 山水诗.exe），该动画“main”场景播放到最后一帧时，“声音”图层中的声音未完整播放就被暂停，则该“声音”属性中同步属性被设置了（选填：事件/数据流）。(4)、“main”场景开始播放同时出现“重播”“退出”两个按钮，要使这两个按钮在该场景最后才出现，在选中“按钮”图层的第1帧后，下列操作可行的是（多选，填字母A . 执行“删除帧”操作/B . 执行“插入空白关键帧”操作 /C . 执行“清除关键帧”操作 /D . 将其移动到最后一帧 /E .将该帧的内容删除）15. 有一组原来按升序排列的正整数，第p个至第q个数据（p和q的值分别由文本框Text1和Text2输入，且p<q）的区间被打乱，其他数据的位置不变，小陈首先依据冒泡排序的思想对该区间中的数据进行升序排序使得整组数据恢复升序排列，然后依据对分查找的思想在该组数据中查找满足[k1, k2]（k1和k2的值分别由文本框Text3和Text4输入，且k1<k2）范围的数据个数并显示在标签Label1中。相关示例如下（其中p=4，q=7，k1=70，k2=80）。排序前
55
70
70
78
71
79
75
80
80
90
排序后
55
70
70
71
75
78
79
80
80
90
查找该组数据中满足[k1, k2]范围的数据个数为：8
实现上述功能的VB程序如下，请回答下列问题：
(1)、下列对象中没有Caption属性的是 (单选，填字母:A . 标签 Label1 /B . 命令按钮 Command1 /C . 文本框 Text1)。(2)、程序加框处代码有错，请改正。Private Sub Command1_Click()
Const n = 10
Dim a(1 To n) As Integer, k As Integer
Dim i As Integer, j As Integer, k1 As Integer, k2 As Integer
Dim p As Integer, q As Integer
Dim b As Integer '查找满足条件的第一个数据所在数组元素的下标
'读取排序前的一组正整数，存储在数组a中。代码略
p= Val(Text1.Text)
q = Val(Text2.Text)
For i = p To q - 1
For j =
Step -1 If a(j) < a(j - 1) Then
k = a(j): a(j) = a(j - 1): a(j - 1) = k
End If
Next j
Next i
k1 = Val(Text3.Text)
k2 = Val(Text4.Text)
i = 1: j = n
Do While i <= j
m = (i + j) \ 2
If ① Then
i = m + 1
Else
j = m - 1
End If
Loop
b = ②
i = 1: j = n
Do While i <= j
m = (i + j) \ 2
If a(m) <= k2 Then
i = m + 1
Else
j = m - 1
End If
Loop
Label1.Caption = Str ③
End Sub
(3)、请在划线处填入合适的代码。① ② ③
16. 有一批货物，已知每件货物的重量和货架号，机器人在可承受的载量范围内，每趟按货物顺序连续装载尽量多的货物，并将各货物送到其货架号相应的货架上。如图a所示，货架构成是环形结构，货架是按顺时针方向从1到10进行编号，第10号货架（即图中A处）不装货物，机器人在A处装载货物。每趟装载货物后，机器人按所装载货物的倒序配送货物，配送过程中尽可能走更短的路线，例如：某趟机器人所装载货物的货架号依次为：3，1，7，9，则机器人按倒序配送货物的路线如图a中带箭头虚线所示，配送完成后回到A处继续下一趟配送任务。现要求在限定配送趟数内完成任务时，计算机器人所能承受装载的最大重量至少为多少？机器人完成所有趟数的配送任务并回到A点的总行程是多少？
图 a
小李编写VB程序实现上述功能：在列表框List1中按货物顺序显示其重量和货架号，在文本框Text1中输入机器人送货趟数，单击“结果”按钮Command1后，标签Label3和Label4中分别显示要求机器人可承受的最大载重最小值和送货总行程。程序运行界面如图b所示。
图 b
请回答下列问题：
(1)、如图b所示，机器人最大载量达到20时，机器人第3趟配送的货物数量是件。(2)、实现机器人送货功能的VB程序如下，请在划线处填入合适的代码。Const num = 8 '货物数量
Const shelf = 10 '货架数量，1-9号货架可供存储货物，第10号货架用作机器人装货点
Dim g(1 To num) As Integer '各货物的重量
Dim s(1 To num) As Integer '各货物的货架号
Private Sub Form_Load()
'从数据库中读入num件物品的重量、货架号，分别存储在数组g、s中
'将各物品数据显示在list1中，代码略。
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, n As Integer, max As Integer, total As Integer
Dim head As Integer, tail As Integer, dis As Integer, part As Integer
total = g(1)
For i = 2 To num
If g(i) > max Then max = g(i)
total = total + g(i)
Next i
n = 0
For i = max To total
part = 0: n = 0: head = 1: dis = 0
For j = 1 To num
part = part + g(j)
If part > i Then
n = n + 1: j = j - 1: tail = j
dis = dis + tran(head, tail)
part = 0: head = tail + 1
End If
Next j
If part > 0 Then
n = n + 1
dis = dis + tran(head, tail)
End If
If n <= Val(Text1.Text) Then Exit For
Next i
Label3.Caption = "机器人可承受的最大载量至少为：" + Str(i)
Label4.Caption = "机器人完成各趟任务的总行程为：" + Str(dis)
End Sub
Function tran(p As Integer, q As Integer) As Integer '计算机器人每趟按装货倒序配送并回到A 处的行程
Dim temp As Integer, t1 As Integer, t2 As Integer, k As Integer
temp = 0: t2 = shelf
For i = q To p Step -1
t1 = t2: t2 = s(i)
k =
If k > (shelf + 1) \ 2 Then k = shelf - k
temp = temp + k
Next i
If t2 <= shelf \ 2 Then temp = temp + t2 Else temp = temp + shelf - t2
tran = temp
End Function