浙江省“七彩阳光”新高考研究联盟2021-2022学年高三上学期信息技术返校考试试卷
试卷更新日期：2021-10-14 类型：开学考试
一、选择题(本大题共12小题，每小题2分，共24分。每小题列出的四个备选项中只有一个是符合题目要求的。)
-
1. 下列关于信息和信息技术的描述，正确的是（ ）A、信息技术包含通信技术、计算机技术、微电子技术和遥感技术 B、虚假信息的产生可源于错误信息的加工 C、信息无处不在，因此信息的传递可以脱离载体 D、信息一旦被利用和加工，便会具有更高的真实性2. 下列关于网页与浏览器的说法，正确的是（ ）A、把关键的词与它相关的内容用“超链接”链接起来，这样的文本称之为超文本 B、因特网上存储着海量信息，是信息获取的唯一渠道 C、收藏夹主要用于网页内容的收藏 D、搜索引擎的两大核心技术是主题目录搜索技术和关键字搜索技术3. 用 Access 软件打开某数据表，部分界面如下图所示。下列说法正确的是（ ）
A、当前数据库名为“成员信息.accdb” B、若“项目名称”表中已有记录，仅将“编号”字段的值清空，可将该字段改为“自动编号”类型 C、当前状态下，不能交换“说明”和“日期”字段的顺序 D、当前状态下，可以新增一个表名为“说明”数据表4. 按位取反指二进制数每一位取反，0变1，1变0。十六进制正整数 n 转换为二进制数，该二进制数共6位，下列说法正确的是（ ）A、n的值必大于十进制数32 B、若该二进制数的末位为1，则十六进制数n+1可能为3位数 C、该二进制数首位去掉，所得的值是原来的一半 D、该二进制数按位取反，转换为十六进制数，与n相加的结果必为3FH5. 使用GoldWave软件编辑某音频文件，部分界面如图所示。
下列说法正确的是（ ）
A、执行“删除”操作后直接保存，音频文件的存储容量约为原来的2/3 B、执行“剪裁”操作后，左声道第0~3秒将出现选中音频 C、执行“复制”操作，再执行“粘贴”操作后，音频时长增加了3秒 D、执行“插入静音”操作1秒后，音频的最后将出现1秒静音6. 将一幅未压缩的768×512像素、256级灰度BMP图像，经过一定处理，保存为未压缩的256×170像素、黑白BMP图像，其前后图像文件的存储容量比约为（ ）A、72:1 B、36:1 C、18:1 D、4:17. VB表达式14 mod 14 \ 3 + -3 ^2的值是（ ）A、-9 B、-7 C、9 D、118. 某算法的部分流程图如图所示。执行这部分流程，若输入 n，m，s的值分别为3，4，“ABCDE”，则输出 s1 的结果中不可能出现的是（ ）
A、BAE B、BAB C、CBA D、EDC9. 某 VB 程序段如下：Dim a(1 To 3) As Single，i As Integer
Randomize
a(1) = 1
For i =2 To 3
a(i) = (Int(Rnd() * 3)) *2- 2
a(i) = Abs(a(i - 1)) / Sqr(a(i))
Next i
List1.AddItem Str(a(i))
运行该程序段，下列错误提示不可能会出现的是（ ）
A、下标越界 B、无效的过程调用或参数 C、类型不匹配 D、除数为零10. 有如下 VB 程序段：Dim a(1 To 6) As Integer
Dim d(1 To 6) As Integer
a(1) = 10: a(2) = 21: a(3) = 28: a(4) = 11: a(5) = 12: a(6) = 30
Const n = 6
For i = n To 1 Step -1
d(i) = 0
For j = n To i +1 Step -1
If a(j) > a(i) Then d(i) = d(j) + 1
Next j
If d(i) > Max Then Max = d(i)
Next i
Text1.Text = Str(Max)
执行该程序段，文本框Text1中显示的是（ ）
A、1 B、2 C、3 D、411. 有如下VB程序段：n = 7
d(1) = 123: d(2) = 35: d(3) = 43: d(4) = 23: d(5) = 56: d(6) = 78: d(7) = 132
k = 1
For i =2 To n
For j = ⑴
If ⑵ Then
tmp = d(j): d(j) = d(j + 2): d(j + 2) = tmp
End If
Next j
k = -k
Next i
执行该程序段后，d 数组各元素为“132，23，123，35，56，78，43”，上述程序段中方框处可选语句为：
①i -1 To n - 2
②1 To n - i
③d(j) * k > d(j + 2) * k
④d(j) * (-k) > d(j + 2) * (-k)
则（1）（2）处语句依次可为（ ）
A、①③ B、②③ C、①④ D、②④12. 某对分查找算法的 VB 程序如下：Private Sub Command1_Click()
Dim d(1 To 10) As Integer, i As Integer, j As Integer
Dim m As Integer, key As Integer, s As String
key = Int(Rnd( ) * 50) *2+ 1
s = "": i = 1: j = 10
Do While i <= j
m = (i + j) \ 2
If key = d(m) Then Exit Do
If key < d(m) Then
j = m - 1: s = s + "L"
Else
i = m + 1: s = s + "R"
End If
Loop
Label1.Caption = s
End Sub
若数组d(1)至d(10)的值依次为"11，13，20，48，51，67，70，73，80，91"，若执行后 Label1 上显示2个“L”和1个“R”或2个“R”和1个“L”，则key的可取值个数为（ ）
A、6 B、13 C、17 D、22二、非选择题(本大题共4小题，4+8+7+7，共26分)
-
13. 某同学收集2020年全国主要城市平均气温的相关数据，并使用 Excel 软件进行数据处理，如图所示。
请回答下列问题：
(1)、区域B13:M13的数据是通过公式计算各月各城市间温差的最大值。在B13单元格中的输入公式后，再用自动填充功能完成C13：M13的计算。(2)、分别对图中的“1月”和“2月”两列数据进行筛选操作，筛选出这两月月平均气温均高于-2摄氏度的记录，则筛选出的城市有个。(3)、根据图中的数据，制作了一张反映北京和杭州各月气温变化趋势的图表，该图表合适的类型是 ， 创建该图表的数据区域是。14. 某同学制作主题为“狼与羊”的多媒体作品。首先使用Photoshop软件处理图像，然后用Flash软件制作动画作品。请回答下列问题：(1)、处理图像的部分界面如图a所示。
图a
该同学想将图中灰色背景去除，另存为透明背景的图片文件，导入Flash中。正确的操作步骤是⑤-⑦-。（选取序号，按操作顺序填写）
①在工具箱中选择“魔棒”工具；
②在工具箱中选择“套索”工具；
③设置合适的“容差”值；
④设置合适的“羽化”值；
⑤复制“背景”图层；
⑥单击灰色背景部分，点[delete]键；
⑦选择“背景副本”图层；
⑧隐藏“背景”图层；
(2)、制作动画作品的部分界面如图b所示。测试影片时，发现影片在第1帧停止，而“羊”图层中羊的双脚一直在动，则“羊”元件的类型为（单选，填字母：A .影片剪辑/ B .图形/C .位图）。去除第1帧中的“stop();”命令后，“云”图层中实现了云朵由舞台外进入舞台中上方，并由白变黑，最后变为“完”字，该动画类型为（单选，填字母：A .动画补间/B .形状补间/C .逐帧动画）；
图b
(3)、测试影片时，发现3秒后背景画面就消失了，想要使背景一直持续到本场景结束，在不影响其他动画效果的前提下，下列操作可行的是 （多选，填字母）A、在“背景”图层第80帧插入关键帧 B、对“背景”图层第1帧复制帧，在第37帧粘贴帧 C、将“背景”图层第37帧移动到第80帧 D、复制“背景”图层第1帧中内容，在第37帧中粘贴 E、对“背景”图层的第37帧“清除关键帧”(4)、测试影片时，希望该场景播放到最后一帧时，能跳转到“片尾”场景的第1帧停止，则可在“文字”图层的第80帧上添加的动作命令是 （多选，填字母）A、On(release){gotoandstop(“片尾”，1);} B、gotoandplay("片尾"，1);stop(); C、gotoandstop("片尾"，1); D、stop();gotoandplay("片尾"，1);15. 某班级（人数不超过40人）参加合唱比赛，需要整理队形。先将所有人按身高升序排好，再将人数每10人排成1排，每排中间低两边高。编写VB程序，依据上述要求排队。运行程序，在列表框 List1中显示了排序前的人员身高，单击“排序”按钮Command1后，在列表框List2中显示身高升序排序结果，再单击“站位”按钮Command2后，按10人一排站好，结果显示在列表框List3中。界面如图所示。
Dim h(0 To 40) As Integer '学生身高
Dim n As Integer
Private Sub Form_Load()
'从数据库中读取身高，共n条记录，存入h数组中，代码略
End Sub
Private Sub Command1_Click()
For i =2 To n
h1 = h(i): j = i – 1
Do While
j = j - 1
Loop
For k = i To j +2 Step -1
h(k) = h(k - 1)
Next k
①
Next i
'在列表框 List2中输出排序结果，代码略
End Sub
Private Sub Command2_Click()
'按人数每10人一排
Dim x As Integer
x = n \ 10
For i =1 To x
Call fenpai( ② ) '过程fenpai作用：将人员按中间低两边高排好，代码略
Next i
If n Mod 10 >0 Then Call fenpai(x * 10 + 1， n)
'将站位结果输出在列表框 List3 中，代码略
End Sub
(1)、下列对象中，不具有Caption 属性的是（单选，填字母：A . Command1 / B .Form1 / C .List1 / D .Label1）。(2)、请将划线处补充完整① ②
(3)、加框处代码有错误，请改正16. 班长为合唱比赛准备礼物，预算总金额有n元钱，预计购买p件礼物，每件礼物对应有商品编号、单价、数量和喜爱度。礼物不可分割，每人至多一份，班长希望每位获得礼物的同学都尽可能喜爱获得的礼物。按上述要求，编写VB程序，功能如下：在文本框Text1中输入预计礼物数，在文本框 Text2中输入总金额，单击“计算”按钮Command1，在列表框List1中显示各类商品的编号、单价、数量、喜爱度，以及最佳购买方案、剩余金额和总喜爱度，若有多种最佳方案，则输出第一个找到的方案信息，如图a所示。
图a
(1)、请在划线处填入合适的代码。Const m = 4 '有 m 种商品
Dim sph(1 To m) As String '商品号
Dim dj(1 To m) As Single '单价
Dim sl(1 To m) As Integer '数量
Dim xa(1 To m) As Integer '喜爱度
Dim hh(1 To m * 10) As Integer '每件商品对应的货号
Dim p As Integer，n As Integer，nc As Integer 'p个朋友，n元钱，共nc件商品
Dim zxa As Integer '总喜爱度为每件购买商品的喜爱度*购买数量的总和
Private Sub Form_Load()
'各商品的商品号、单价、数量、喜爱度分别存入数组 sph、dj、sl 和 xa 并输出，代码略
End Sub
Private Sub Command1_Click()
Dim goumai(1 To m * 10) As Integer
Dim i As Double，j As Integer，k As Integer，t As Integer
Dim fs As Integer，je As Integer，maxi as Integer，maxje As Integer，maxzxa As Integer
p = Val(Text1.Text): n = Val(Text2.Text)
nc = 0
For i =1 To m
For j =1 To sl(i)
nc = nc + 1: ①
Next j
Next i
For i =0 To 2^ nc - 1
t = i
For j =1 To nc
goumai(j) =②
t = t \ 2
Next j
fs = 0: je = 0: zxa =0 '初始化份数，金额，总喜爱度
For j =1To nc
fs = fs + goumai(j): je = je + dj(hh(j)) * goumai(j): zxa = zxa + xa(hh(j)) * goumai(j)
Next j
If fs = p And ③ Then maxi = i: maxje = je: maxzxa = zxa
Next i
'输出maxi对应的购买方案，代码略
If maxje >0 Then List1.AddItem "剩余金额:" & CStr(n - maxje) & " 总喜爱度:" & CStr(maxzxa)
Else
List1.AddItem "钱太少"
End if
End Sub
(2)、根据题意，现有4种商品对应的信息如图b所示，若预算总金额为400元，预计购买10件礼物，则图中购买方案中三种商品的购买数量分别为（填数字，中间用逗号分隔）。
图b