浙江省嘉兴市2021届高三上学期信息技术9月教学测试
试卷更新日期：2021-06-15 类型：月考试卷
一、选择题(本大题共12小题，每小题2分，共24分。每小题列出的四个选项中只有一个是符合题目要求的，不选、多选、错选均不得分)
-
1. 某同学利用百度搜索得到的部分界面如下图所示。下列说法错误的是( )
A、该检索方式是“搜索引擎” B、该同学正在搜索的是“新型冠状病毒”的相关信息 C、用“百度”搜索到有关新型冠状病毒的信息都是可信的 D、百度搜索采用全文检索技术2. 下列应用中，体现了人工智能技术的有( )①门卫使用红外测温枪，不接触就能测量体温
②使用翻译笔直接将普通话翻译成英语
③某网站将用户上传的视频自动转化为统一格式
④通过人脸识别，直接获取“健康码”信息
A、①②③ B、②③④ C、②④ D、③④3. 使用UltraEdit软件查看字符“2020新冠肺炎！”的内码，部分界面如下图所示。下列说法正确的是 ( )
A、字符“10”的ASCII码是“31H 30H" B、图中使用ASCII编码的有5个字符 C、汉字“炎”存储时所占存储空间为4字节 D、图中“！”为全角字符，内码为“A1”4. 关于数据库系统，下列说法错误的是( )A、数据库管理系统是为了建立、使用和维护数据库而设计的数据管理软件 B、自动编号类型字段的数据由系统随机或递增形成，用户不能输入 C、在数据表视图不能删除已设为主键的字段，也不能将某个字段设置为主键 D、Excel工作表中的数据只能拷贝至Access数据表中，不能直接导入数据库5. 使用GoldWave软件打开某音频文件，选中一段音频后的部分界面如下图所示。下列说法正确的是( )
A、可以使用GoldWave软件将该音频文件格式转换为MP3格式 B、执行“更改音量”命令将音量提高，音频采样频率和量化位数都会提高 C、执行“静音”命令后，整个音频第10秒至第20秒为静音 D、执行“删除”命令后直接保存，文件存储容量为原来的三分之二6. 一段时长为2分钟、1 280x1 024像素、24位真彩色、PAL制式的未经压缩AVI格式无声视频，其文件存储容量约为( )A、187.5MB B、225MB C、10.99GB D、13.18GB7. 下列VB表达式的值一定为True的是( )①Val("10") + 10 = 20
②123Mod100\10=3
③"true"="True"
④Int(Rnd*2)=1
A、①③ B、②④ C、①② D、①②④8. 某算法部分流程图如图所示。执行这部分流程图后，输出s的值为( )
A、19 B、25 C、38 D、509. 有如下VB程序段：Private Sub Command1_Click( )
Const s1 = "tea"
s2="老师Happy Teacher's Day！"：s3 = ""
For i=1 To Len(s2)
If bjiao(s1，Mid(s2, i, 1))Then s3=s3 + Str(i) + "，"
Next i
Text1.Text = s3
End Sub
Function bijiao(x As String, y As String) As Boolean
bjiao = False
For i=1 To Len(x)
If y = Mid(x, i, 1) Then
bijiao = True：Exit Function
End If
Next i
End Function
执行上述程序段后，文本框Text1中显示的内容是（ ）
A、6，11，12，13，16，22 B、6，12，13，16，22 C、4，9，10，11，14，20 D、4，10，11，14，2010. 有如下VB程序段：Const n=10
Dim a(1 To 10) As Integer
m = Int(Rnd( ) *n+ 1)
For i=1 To n
a(i)= 0
Next i
i=0：j=0：c=1：ans=""
Do While c<=3
i=i Mod n+1
If a(i)=0 Then j=j+1
If j=m Then
a(i)=1：c=c+1
j=0： ans = ans+ str(i)
End If
Loop
Text1．Text = ans
执行上述程序段后，文本框Text1中不可能显示的内容是( )
A、2 4 6 B、7 4 2 C、5 10 6 D、6 2 811. 有如下VB程序段：a(1)=72：a(2)=78：a(3)=71：a(4)=82：a(5)=5：a(6)=41
n=6
For i=1 To n\ 2
k=i
For j=i To n- i
If a(j)>a(j+1)Then t=a(j)：a(j)=a(j+1)：a(j+1)=t
If a(j)<a(k) Then k=j
Next j
temp=a(k)：a(k)=a(i)：a(i)=temp
Next i
执行上述程序段后，数组元素a(1)到a(6)的值为( )
A、5，41，71，72，78，82 B、5，41，72，71，78，82 C、71，5，41，72，78，82 D、71，72，5，41，78，8212. 下面VB程序段功能为：将一组升序排列的数据“1，3，3，5，5，7，10，11，12，15”依次存储到数组元素a(1)到a(10)中，在文本框Text1中输人k的值，找出大于k的数据的起始位置并显示在标签Label1中。n=10：k =Val(Text1.Text)
i=0：j= ①
Do While i<j
m =(i+j+1)\2
If k<a(m) Then j=m-1 Else i= ②
Loop
L= ③
Label1.Caption =">"+Str(k)+"的数据位置为："+Str(L)
上述程序段横线①②③处的语句依次为( )
A、①n-1 ②m ③i B、①n ②m ③i+1 C、①n ②m+1 ③i D、①n-1 ②m+1 ③i+1二、非选择题(本大题共4小题，4+8+7+7，共26分)
-
13. 小河收集了“2019年中国一线城市与部分新一线城市指数”数据，并使用Excel软件进行数据处理，如图a所示。
(1)、将单元格H9中的公式向上自动填充至H3，依次出现#VALUE！和#REF！的错误提示，其中，显示为#REF！的错误原因是(单选，填字母：A .除数为0/B .引用地址出错/C .引用单元格内容出错)。(2)、为了避免出现以上错误，应将单元格H9中的公式修改为。(3)、根据图a中的数据制作的图表如图b所示，下列描述正确的是 (多选，填字母)。
A、建立图b所示的图表数据区域为A2：G2，A7：G9 B、图b所示的图表系列产生在列 C、对新一线城市以“城市人活跃度”为关键字从大到小进行排序，则排序的数据区域是B7：H9，排序后图表发生相应改变 D、筛选“未来可塑性”最高的20%后，显示的城市为北京，图表不会发生变化 E、将C3：C9区域单元格格式设置为保留1位小数后，图表不会发生改变14. 小嘉制作主题为“绿色出行”的多媒体作品。他首先使用Photoshop软件制作一张背景图片，然后使用Flash软件制作动画。(1)、使用Photoshop软件编辑“绿色出行.psd”文件，当前状态部分界面如图a所示。下列说法正确的是 (多选，填字母)。
A、选中“背景”图层，使用“油漆桶”工具，对其内容进行填充 B、选中“大树”图层，执行“复制图层”命令，新产生的图像内容将直接出现在“小树”图层中 C、选中“绿色出行”图层，添加“描边”效果，“低碳生活”图层将不会同时添加“描边”效果 D、将“绿色出行.psd”直接保存后能直接作为素材导入到Flash库中(2)、使用Flash软件编辑“绿色出行.fla”文件。“main”场景的部分制作界面如图b所示。回答下列问题。
①“自行车”图层关键帧中的对象是由“自行车”元件生成的实例，则该图层第5帧到第60帧的补间类型是(选填：逐帧动画/动画补间/形状补间)；
②在“自行车”图层第50帧执行“插入关键帧”操作(选填：会/不会)影响动画效果；
③“声音”图层添加了“bj.mp3"，其声音属性如图c所示。测试影片时，为了使该场景动画播放完后能自动停止和静音，可在“按钮”图层最后1帧添加动作脚本；
④“重播”按钮元件的部分编辑界面如图d所示。测试影片时，该按钮不能正常使用，下列说法正确的是(多选，填字母)。
A．测试影片时，当鼠标指针经过该按钮时，该按钮将不可见
B．“文字”图层中“弹起”帧和“按下”帧的内容一定相同
C．选中“文字”图层的“点击”帧执行“插入帧”操作，测试影片时，该按钮能正常使用
D．选中“矩形”图层的“点击”帧执行“删除帧”操作，测试影片时，该按钮能正常使用
E．选中“矩形”图层的“点击”帧执行“清除帧”操作，测试影片时，该按钮能正常使用
15. 疫情期间，学校开展“教室就餐”，食堂提供A、B、C、D四种套餐，学生通过网络订餐，订餐后的数据都存在数据库中(如图a所示)，已按班级由小到大排列，套餐字母均为大写。
现需要设计一程序，在窗体加载时，读取数据库中学生的订餐情况，以班级+姓名+订餐情况输出至列表框List1中，在文本框Text1中输人班级，单击命令按钮Command1统计该班级的订餐情况，程序运行如图b所示。
(1)、将结果输出至列表框List2中，使用的语句为：List2.Addltem s。 其中“AddItem”是列表框类ListBox对象的(单选，填字母：A .属性名/B .过程名/C .方法名/D .事件名)。(2)、实现上述功能的VB程序段如下，请在画线处填入合适的代码。Dim xm(1 To 1000) As String， bj(1 To 1000) As Integer
Dim tc1(1 To 1000) As String， tc2(1 To 1000) As String
Dim n As Integer '学生总人数
Private Sub Form_ Load( )
'从数据库中按班级、学号有序地读取学生的姓名、班级、中午套餐、晚上套餐，
'依次存人xm、bj、tc1、tc2数组中，在List1中显示，总人数存人n中，代码略
End Sub
Private Sub Command1_ Click( )
Dim k As Integer， i As Integer， j As Integer， m As Integer
Dim zc(1 To 4) As Integer， wc(1 To 4) As Integer '用于统计套餐数量
k = Val(Text1.Text)
For i=1 To 4 '为数组赋初始值
zc(i)=0：wc(i)=0
Next i
i=1：j=n '查找班级里第一-位同学的序号
Do While i<=j
m=(i+j)\2
If Then i=m+1 Else j= m-1
Loop
For i=j+1 To n
If bj(i) = k Then
'改错wc(fx(tc2(i)))= wc(fx(tc2(i))) + 1
End If
If Then Exit For
Next i
's为班级订餐统计信息，代码略
List2.AddItem s
End Sub
Function fx(a As String) As Integer '将套餐字母转换为数字序号
End Function
(3)、程序中加框处代码有错，请改正：。16. 学校准备开展班级篮球对抗赛，采用瑞士轮赛制。该赛制的规则是：(1)参数队伍数为偶数，如2n支队伍，编号为1~2n；(2)对阵规则：根据排名规则对队伍进行排序，两两对阵，由第1名对第2名、第3名对第4名……；(3)积分规则：每场比赛必须分出胜负，胜者积分增加1分，负者积分不变；(4)排名规则：积分高的队伍排名靠前，积分相同则编号较小的队伍排名靠前，每轮比赛结束后重新排名。要求编写程序计算在R轮比赛后，积分排名第Q的队伍编号。为解决此问题，小明编写了一个VB程序。在窗体加载时，从数据库中读取编号为1~2n的队伍实力值，编号存储在数组bh中，实力值存储在数组s1中(每支队伍的实力值两两不同，且每场比赛中实力值较高的总能获胜)。在文本框Text1中输人查询轮次R，在文本框Text2中输人待查询排名Q，单击“查询"按钮Command1后在文本框Text3中输出相应队伍的编号、排名等信息。程序运行效果如图所示。
(1)、根据上述算法，编号为1~8，实力值依次为6、5、4、8、7、3、1、2的八支队伍参加比赛，则第三轮比赛后，排名第五的队伍编号是。(2)、实现上述功能的VB程序段如下，请在画线处填入合适代码。Constn=4
Dim bh(1 To 2*n) As Integer '队伍编号
Dim sl(1 To 2*n) As Integer '队伍实力
Dim jf(1 To 2*n) As Integer '队伍积分
Sub Form_ load( )
'在窗体加载时读取数据库数据并显示在list1中，代码略
End Sub
Private Sub Command1_ Click()
Dim Q As Integer, R As Integer
Dim i As Integer, j As Integer
R = Val(Text1.Text) : Q = Val(Text2.Text)
For i=1 To R
For j=1 To 2*n Step 2
If Then
jf (bh(j)) = jf(bh(j)) + 1
Else
End If
Next j
Call sort '调用积分排序过程sort
Next i
Text3.Text = "编号：" + CStr(bh(Q)) + "，实力：" + CStr(sl(bh(Q)))+ "，排名："+ CStr(Q) + "，积分：" + CStr(jf(bh(Q)))
'在List2中输出R轮后的积分表，代码略。
End Sub
Sub sort( )
Dim i As Integer, j As Integer, t As Integer
For i=1 To 2*n-1
For j=2*n To i+1 Step -1
If Then
t=bh(j)：bh(j)=bh(j-1)：bh(j-1)=t
End If
Next j
Next i
End Sub