浙江省名校新高考研究联盟(Z20联盟)2021届高三第二次联考信息技术试卷
试卷更新日期：2020-12-22 类型：月考试卷
一、选择题(本大题共12小题，每小题2分，共24分。)
-
1. 下列有关信息与信息处理的说法错误的是( )A、二维码图是一种常见的信息载体 B、天气预报信息可以有不同的表达方式 C、计算机处理信息的能力只与CPU性能有关 D、“仁者见仁，智者见智”说明信息是可以加工处理的2. 关于浏览器和网页的说法，下列选项中正确的是( )A、浏览器可以编辑、解释执行网页中的HTML代码 B、浏览器与Web服务器之间通过HTTP协议进行通信 C、网页中的超链接只能实现该网站内部网页间的跳转 D、在浏览器中执行“添加到收藏夹”操作，可以保存网页中全部内容3. 某Access数据表编辑界面如下图所示：
当前状态下，下列说法正确的是( )
A、当前录入的“入库日期”字段值有误 B、可以将“货架号”字段类型设置成主键 C、可以直接对数据表“商品P8617”进行重命名 D、添加一条新记录后“产品ID”的字段值一定是134. 在Excel中用26个英文大写字母对单元格列标进行编码，“A” 是第1列，“B” 是第2列，……“Z”是第26列，“AA” 是第27列，则列标编码“BD” 对应的是第( )列A、19 B、35 C、56 D、1395. 使用Photoshop 软件制作“ 垃圾分类”作品，部分界面如下图所示，下列操作可行的是( )
A、将“背景”图层不透明度设置为50% B、使用油漆桶工具修改“标语1”图层中文字的颜色 C、选中“垃圾桶”图层，使用自由变换调整垃圾桶的大小 D、复制“标语1”图层的图层样式，将其粘贴到“标语2”图层6. 小青制作了一个单场景Flash动画，总帧数为60帧，帧频为12fps。现将其导出为如图所示AVI视频文件，该视频文件大小约为（ ）
A、8MB B、19MB C、94MB D、1.12GB7. 下列VB表达式的值与其它三个选项不同的是( )A、Abs(Int(-36.3)) B、Mid("3.372"，3，2) C、1*2*5+1*2^2+1*2^0 D、Int(Val("37.73"))8. 某算法的流程图如图所示。执行该流程图时，输入b、p的值为2、12，下列说法错误的是( )
A、p>0执行了5次 B、ans←ans*t语句执行了2次 C、流程执行后变量t的值为256 D、输出ans结果是表达式22的值9. 有如下VB程序段：For j=7 To 3 Step -1
If a(j-2) > a(j) Then
t=a(j-2)： a(j-2)=a(j)： a(j)=t
End If
Next j
数组元素a(1)到a(7)的值依次为“1， 4，5，2，7，6，3”，执行该程序段后，元素交换的次数为( )
A、2次 B、3次 C、4次 D、5次10. 有如下VB程序段：s ="waste" ： n = Len(s)
s1 = Text1.Text ： flag = False
For i=1Ton
If Mid(s，i，1) = Mid(s1， 1，1) Then
flag = True
For j = 2 To Len(s1)
If Mid(s1， j， 1)<>Mid(s， (j+i-2) Mod n + 1， 1) Then flag = False： Exit For
Next j
If flag Then Exit For
End If
Next i
执行该程序段后，若flag变量值为True，则文本框Text1中输入的内容不可能的是( )
A、ste B、tewa C、steaw D、Wastew11. 小辉设计了一个排序算法：从前往后、从后往前交替处理，同时尽可能减少比较次数，直至所有元素升序排列。算法的VB程序段如下：'待排序的数据存储在数组a(1)至a(N)中，代码略。
st=1：ed=N：k=1
Do While st <> ed
last = st
For i=st To ed-k
If a(i)*k>a(i+k)*kThen
t=a(i)： a(i)=a(i+k)： a(i+k)=t：
End If
Next i
ed = last：
t=st：st=ed：ed=t
Loop
上述程序段中方框处可选语句为：
①Step 1②Step k③last=i④last=i-1⑤k=-k⑥k=k+1
则⑴⑵⑶处语句依次可为( )
A、①③⑤ B、②③⑤ C、①④⑥ D、②④⑥12. 某对分查找算法的VB程序段如下：key=Int(Rnd*20)+3
i=1：j=6：id=1
Do Whilei<=j
m=(i+j)\2
If key = a(m) Then Exit Do
If key < a(m) Then
j=m-1：id=id*2
Else
i=m+1：id=id*2+1
End If
Loop
Label 1. Caption = Str(id)
数组元素a(1)到a(6)的值依次为“4，7，9，14，15，21”，执行该程度段后，标签Label1中显示的内容不可能的是（ ）
A、4 B、7 C、13 D、15二、非选择题(本大题共4小题，4+8+7+7，共26分)
-
13. 某学校对高一年级八个班进行体质健康抽测，并使用Excel软件进行数据处理，如图a所示。
请回答下列问题：
(1)、在J3单元格中使用COUNTIFS函数，通过自动填充J4：J10统计并得到各班优秀人数，则J3单元格中的公式为=COUNTIFS( $B$3：$B$306， $I3 ， )(提示： COUNTIFS 函数用于统计区域中满足多个条件的单．元格个数。例如： =COUNTIFS(B3：B306， I3， G3：G306，L2)统计出区域B3：B306中满足条件为“高一1班”，且区域G3：G306中满足条件为“及格”的人数。)(2)、根据“抽测结果统计表”中的数据，制作的图表如图b所示，创建该图表的数据区域是。
(3)、若要在图a中找出“高一1班得分”最高的学生(如果存在多个符合条件的学生，则全部选取)，下列方法正确的是 (多选，填字母)。A、先以“班级”为高一1班进行筛选，再以“得分”为最大的1项进行筛选 B、以“班级”为主要关键字升序，“得分”为次要关键字降序，选取排在前面的学生 C、以“得分”为主要关键字降序，“班级”为次要关键字升序，选取排在前面的学生 D、以“得分”为主要关键字降序，再以“班级”为高一1班进行筛选，选取排在前面的 学生14. 小青使用Flash软件制作主题为“遵守交规”的多媒体作品，如图a所示。
请回答下列问题：
(1)、该作品的系统结构设计部分内容如图b所示，若各功能模块的场景播放完成后自动停止，单击“返回”按钮则返回到“主交互界面”。下列说法正确的是(多选，填字母：A . 主交互界面中至少需要4个按钮/ B . 情境再现"场景“按钮"图层第75帧上需添加“Stop()："脚本情境再现命令/ C . 系统结构设计属于作品的需求分析/ D . 通过点击按钮跳转到其它模块，体现了多媒体技术的交互性)
(2)、“信号灯切换"图层实现绿灯闪烁3秒后转变为黄灯，再转变为红灯的效果，该动画类型为(单选，填字母：A . 逐帧动画/ B . 动画补间动画/C . 形状补间动画)(3)、测试当前场景，若要实现第30帧黄灯亮起，“摩托车刹车声” 声音才响起的效果，应进行的操作是。(4)、“动导语音”图层第40帧添加了“劝争语存mp3”文件。 其声音属性设置如图c所示：测试场景时，当播放到最后一帧动画停止，声音将会(单选，填字母：A . 停止播放/ B . 循环播放/ C . 继续播放3秒同时淡出)
(5)、测试影片时，单击当前场景中的“返回”按钮，停止当前所有声音播放，同时跳转并停止在“主交互界面”第1帧，则“返回"按钮的动作脚本为On(press)。15. 如图所示，凹槽内放置了n(3≤n≤15)个高度不等的立方柱，立方柱由多个单位为1的立方块叠加而成，立方柱之间如果有间隔则可以用来注水。
编写VB程序计算立方柱之间的最大注水体积。程序运行时随机生成的数据从左到右依
特科网了次为“3，0，2，5，0，2，0，4”，分别代表各位置点立方柱的高度(0表示无立方柱)。列表框List1中输出各立方柱高度以及所求的最大注水体积。请回答下列问题：
(1)、结合程序代码，图中按钮对象的名称是。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Const Maxn = 15
Dim h(1 To Maxn) As Integer 'h(i)存储第i个立方柱的高度
Dim b(1 To Maxn) As Integer 'b(i)存储第 i个立方柱的编 号
Private Sub Cmd1_Click( )
Dim n As Integer, i As Integer, j As Integer, k As Integer, t As Integer
Dim left1 As Integer, right1 As Integer, ans As Integer
n=
'随机生成各立方柱的高度保存到h(1)到h(n)中， 并在List1中显示，代码略。
For i=1 To n
b(i) = i
Next i
For i=1 To n- 1 '根据立方柱的高度进行排序
k =i
For j=i+1 Ton
If
Thenk=jNext j
If k <> i Then
t=h(i)：h(i)=h(k)：h(k)=t
t=b(i)：b(i)=b(k)：b(k)=t
End If
Next i
Left1= b(1)： right1 = b(1)： ans = 0
For i=2 To n
If h(i) = 0 Then Exit For
If b(i) < left1 Then
ans=ans+h(i)*(left1-b(i)-1)
left1 = b(i)
ElseIf b(i) > right1 Then
ans
right1 = b(i)
Else
ans = ans - h(i)
End If
Next i
List1. AddItem”最大注水体积是：”& Str (ans)
End Sub
(3)、程序中加框处代码有错，请改正。16. 随机生成n个大于等于1且小于等于n的不重复正整数，采用“数据块交换”方式升序排序。数据块交换方式如下：在待处理的数据区间中，对相邻且数据个数相等的数据块进行处理。若数字i恰好在第i位置，则不做交换，否则按下列两种情况处理。
情况A．待处理区间中，若数字i之前的数据个数小于等于其余数据个数，做一次交换可将数字i换到第i位置，如数字i=2时：
情况B．待处理区间中，若数字i之前的数据个数大于其余数据个数，操作如下：
◆奇数个数据：先将待处理区间中第1个数据排除，对其余数据整体做数据块交换，再按情况A处理，如数字i=3时：
◆偶数个数据：先将待处理区间整体做数据块交换，再按情况A处理，如数字i=4时：
(1)、若数组a中数据为“4，5， 1，2，3"，则第1次数据块交换后数组a中数据依次为： 。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Const Maxn = 30
Dim a(1 To Maxn) As Integer
Dim wz(1 To Maxn) As Integer
'函数功能：数据块[st1… ed1]与后面数据块交换(两数据块相邻且个数相等)
Function kSwap(st1 As Integer, ed1 As Integer) As String
Dim i As Integer, t As Integer, n1 As Integer
n1=ed1-st1+1
For i=
t=a(i)：a(i)=a(i+n1)：a(i+n1)=t
t = wz(a(i))： wz(a(i)) = wz(a(i + n1))： wz(a(i + n1)) = t
Next i
'将处理结果返回，代码略。
End Function
Private Sub Cmd1 _Click()
Dim n As Integer, num As Integer, i As Integer, s As String
n = Val (Text1. Text)
'随机生成n个不重复正整数保存到a(1)到a(n)中，并在List1中显示，代码略。
For i=1 To n
wz(a(i)) = i
Next i
For i=1 To n - 1
If i <> wz(i) Then
num =
If wz(i)-i<=num-(wz(i)-i)Then '按情况A处理
s = kSwap(i, wz(i) - 1) : List1. AddItem
Else
If num Mod 2=0 Then
s = kSwap(i, i + num\2 - 1) : List1. AddItem s
Else
s=： List1. AddItem s
End If
i=i-1 数字i交换到第i位置的处理尚未完成；
End If
End If
Next i
End Sub