浙江省五湖联盟2020-2021学年高三上学期信息技术期末统考试卷
试卷更新日期：2021-03-18 类型：期末考试
一、选择题
-
1. 下列有关信息的说法，正确的是（ ）A、信息一旦产生，其价值就不会改变。 B、信息可以脱离载体而存在。 C、信息无处不在，且呈现形式多样，可重复使用，但多次使用会产生损耗。 D、信息可以脱离它所反应的事物被存储。2. 下列行为合法的是（ ）A、某软件公司的职工将公司软件转于他人使用，并私自获利。 B、某娱乐场所以卡拉OK方式放映已授权于他的音乐电视作品。 C、在未经过作家授权的情况下，某公司向其用户提供能够免费下载该作家收费作品的应用软件。 D、某网民因无法联系著作权人，就擅自修改该著作的网络游戏软件，供其他网民使用。3. 使用 Access 软件打开数据库中的表，其部分界面如图所示，下列说法正确的是（ ）
A、该数据表中共有 15 条记录 B、“学号”字段不可以设置成 “文本”类型 C、删除当前记录后，不可以通过“撤销”命令恢复数据 D、Access 数据库中的数据可以从 Excel 导入，所以Excel也是小型数据库管理系统4. 用Ultra Edit软件观察字符“2021，cheer up！”的内码如图所示，以下说法正确的是（ ）
A、图中有16个ASCII码编码的字符。 B、“2”的十六进制内码为32，则“10”的十六进制内码为3A。 C、大写字母“E”的内码用二进制表示为 010001 01。 D、小写字母“p”的内码转十进制的过程应为 6*16^2+15*16^1。5. 使用GoldWave软件编辑某音频文件，部分界面如图所示。
下列说法正确的是（ ）
A、该音频文件为mp3格式，采样频率为44100Hz B、当前状态下，执行“删除”操作，音频文件将变为单声道 C、当前状态下，执行“插入静音”添加1秒静音后，右声道时长不变 D、当前状态下，先执行“复制”，再执行“粘贴”，音频时长将变成8秒6. 一段时长为40秒、像素为1024*768，采用PAL制式（25帧/秒）且未经压缩的无声视频，以压缩比10:1转换为容量为75MB的MPG文件，则原始视频的颜色模式可能是（ ）A、16色彩色 B、16位彩色 C、24位真彩色 D、256级灰度7. 某算法的部分流程图如图所示。执行这部分流程，输入n的值为4，则输出值不可能的是（ ）
A、0 B、0.5 C、0.8 D、18. 下列有关VB表达式的描述，正确的是（ ）A、VB的基本表达式包括算术表达式、关系表达式和条件表达式 B、VB表达式“Int(3.14159＊1000) / 1000”的值为3.142 C、VB表达式“Abs(Int(-20.19)) + Len(Mid(＂20.19＂，2))”的值是25 D、VB表达式“20201 \ 10 + Int(Sqr(5))”和“Len(＂2020＂) + 2”的值相等9. 有如下 VB 程序段：s = " Good Luck 2021！"：n = 0 : m = 0 : k = 0
For i = 1 To Len(s)
c = Mid(s,i,1)
If c >= "0" And c <= "9" Then
n = n + 1
ElseIf c >= "a" And c <= "z" Then
k = k + 1
Else
m = m + 1
End If
Next i
执行该程序段后，变量 m 的值为（ ）
A、3 B、4 C、5 D、210. 有如下 VB 程序段：Dim a(1 To 5) As Integer
a(1) = 1
For i = 2 To 5
a(i) = Int(Rnd * 9) +1
If a(i) Mod 2 = 1 Then
a(i) = a(i) + a(i - 1)
ElseIf a(i) mod 2 = 0 Then
a(i) = a(i) / 2
End If
Next i
执行程序后，a 数组各元素不可能是（ ）
A、1,8,11,20,2 B、1,4,2,11,4 C、1,1,8,17,20 D、1,4,7,6,811. 完成某排序算法的VB程序段如下：For i = 1 To 7
k = 0
For j = 8 To i+1 Step -1
If a(j) <a (j-1) Then
t = a(j): a(j) = a(j-1): a(j-1) = t: k = 1
Next j
If k = 0 Then
Exit For
Next i
如果用上述算法对数据序列：38，11，21，62，59，65，77，79 进行排序（数据分别储存在数组元素 a(1)～a(8)中），执行程序后，数据的交换次数和比较次数分别为（ ）
A、2，11 B、3，13 C、4，13 D、7，1112. 有如下VB程序段：i = 1: j = 10
x = Int(Rnd * 50) * 2 + 1
Do While i <= j
m = (i + j) \ 2
If x = f(m) Then Exit Do
If x < f(m) Then
j = m - 1
Else
i = m + 1
s = s + Str(m)
Loop
数组元素f(1)到f(10)的值依次为：3,6,9,11,18,20,25,39,76,98，该程序运行后，s的值不可能的是（ ）
A、5 2 B、5 8 7 C、5 2 3 4 D、5 8 6二、操作题
-
13. 小李收集了近2年双十一部分商品的销售情况数据，并使用Excel软件进行数据处理，如图a所示。
图a
请回答下列问题：
(1)、G4单元格统计的是“服饰”类商品销售总金额。通过G4单元格中的公式，对区域H4:I4进行自动填充，则H4单元格中显示的结果是(单选，填字母:A .＃VALUE！/B .5793.56.84/C .＃DIV/0！/D .0.00)。（提示：SUMIF函数用于对满足条件的单元格求和。例如“=SUMIF(B4:B33,G3,E4:E33)”，用于统计2020年11月类别为“服饰”的金额总和。）
(2)、若要正确计算H4和I4单元格中的数据，可对G4单元格中的公式进行修改，并对区域H4:I4进行自动填充，则G4单元格中的公式是。(3)、在数据分析和数据挖掘前，通常先对数据进行各种处理。在完成以上计算的基础上，下列对数据处理和分析正确的是 （多选，填字母）。
图b
A、已知以G3:I4为数据区域创建了如图b所示的图表，则选中A3:E33区域，以“人数”为主要关键字进行升序排序，不会影响图表的呈现效果。 B、按“类别”为医疗器械，“金额（万元）”为最大1项进行筛选，筛选结果为金额最大的医疗器械类商品 C、假如G3单元格中“服饰”字样被误删，则G4单元格中的显示结果变为#REF。 D、先以“类别”为医疗器械进行筛选，再以“金额（万元）”为关键字降序排序，与先以“金额（万元）”为关键字降序排序，再以“类别”为医疗器械进行筛选，两种操作后选取排在最前面的商品相同。14. 小王创作主题为“春节”的多媒体作品。请回答下列问题：(1)、在多媒体作品设计的过程中，下列属于脚本编写的是（多选，填字母：A .逐一列出所涉及的媒体元素，分类登记/ B .根据需求确定该作品的结构类型/ C .确定作品的主题思想和主要内容/ D .该作品产生的经济效益/ E .编写该作品的文字脚本）。
(2)、使用Flash软件制作动画，部分界面如图a所示。在不改变“女娃娃”图层中“女娃娃”动画时长的前提下，要想让女娃娃和男娃娃同时出现，对“女娃娃”图层应该进行的操作是。
(3)、进行以下 操作，在测试场景时会改变动画效果（多选，填字母）。A、将该动画的帧频改为6.0fps B、对按钮图层第一帧执行清除关键帧操作 C、选中“背景”图层第55帧执行删除帧操作 D、在“女娃娃”图层第一帧添加帧命令 stop();(4)、“音乐”图层第1帧上的声音属性如图b所示，若将重复次数设置为2次，则声音播放的总时长为。
(5)、测试影片时，“退出”按钮最后出现在舞台右下角。单击该按钮可以关闭整个动画，则该按钮动作脚本应设置成。15. 凯凯学习了桶排序和冒泡排序，他发现桶排序占空间比较多而冒泡排序的效率又较低，于是他想到综合两个算法来对数据进行排序。凯凯对n个由二位数组成的数据进行排序，排序步骤如下：1）以每个数的十位数来区分，放置到各个桶里(如图①)；
2）分别对每个桶中的数据进行冒泡排序(如图②)；
3）最后依次输出各个桶中的数据即可(如图③)。
Dim a(1 To 100) As Integer, b(1 To 100) As Integer
Dim c(0 To 10) As Integer Dim n As Integer
Private Sub Form_Load( )
'读取若干个二位数到a(i)中，并保存个数到n
End Sub
Private Sub Command1_Click()
Dim i As Integer, t As Integer
For i = 1 To n
c(a(i) \ 10) = c(a(i) \ 10) + 1
Next i
c(0) = 1 : c(10) = ①
For i = 1 To 9
c(i) = c(i) + c(i - 1)
Next i
For i = 1 To n
t = a(i) \ 10
c(t) = c(t) - 1
②
Next i
For i = 1 To 9
Call px(c(i), c(i + 1) – 1)
Next i
For i = 1 To n
List2.AddItem b(i)
Next i
End Sub
Sub px(x As Integer, y As Integer)
Dim t As Integer, i As Integer, j As Integer
For i =
For j = x To y - i
If b(j) > b(j + 1) Then
t = b(j): b(j) = b(j + 1): b(j + 1) = t
End If
Next j
Next i
End Sub
(1)、若要修改“桶排”按钮上显示的文字，应修改的属性名是。(2)、加框处代码有错，请改正。(3)、请在划线处填入合适的代码。① ②
16. 信息科代表楠楠想给美丽的信息老师写一段心里话，又怕被人发现，于是想了一个两全其美的方法。楠楠有两张n*n大小的纸，一张是透明的，一张是有字的。楠楠在透明的纸上涂黑了一些格子，然后把两张纸一起给信息老师，并告诉老师阅读方法：首先把透明的纸盖在另一张纸上，然后把露出来的字母从上到下从左到右写下来并将每个字母向左循环移一位(如取出是D，则左移为C)，然后将透明的纸顺时针旋转90度，再读一遍，这样子一共读四遍，就得到情书内容。(1)、若透明纸上的涂黑处（“O”没有涂黑的地方，“#”代表被涂黑的地方）如图a所示，有字纸张内容如图b所示，则获取的情书内容的前八位内容
(2)、楠楠根据上述阅读规则，结合学科特点，发挥自己特长，设计了一个获取心里话的小程序。其VB代码和运行界面如图所示，请在划线处填入合适的代码。
Dim a(1 To 1000) As String
Const n = 4
Private Sub Form_Load()
Dim x As Integer, s As String
Dim b(1 To n * n) As Boolean
Randomize
For i = 1 To n ‘随机产生n个位置，使得这些位置表示未被涂黑
If b(x) = False Then
a(x) = "0"
b(x) = True
Else
i = i - 1
End If
Next i
‘将其余位置赋值为“#”，存入数组a相应的位置中，并将结果按n行n列的方式显示在列表框list1上，代码略
End Sub
Private Sub Command1_Click()
Dim s As String, jg As String, ch As String
s = "HAOXUEXIHAODUSHU"
For i = 1 To n * n Step n
List2.AddItem Mid(s, i, n)
Next i
For i = 1 To n
For j = 1 To n * n
If a(j) = "0" Then
ch = Mid(s, j, 1)
ch =
jg = jg + ch
End If
Next j
Call turn(n) ‘调用过程turn，完成矩阵顺时针旋转90度
Next i
Label1.Caption = jg
End Sub
Sub turn(x As Integer)
Dim i As Integer, j As Integer
Dim c(1 To n * n) As String
For i = 1 To x
For j = 1 To x
c((i - 1) * x + j) =
Next j
Next i
For i = 1 To n * n
a(i) = c(i)
Next i
End Sub