最新 高三 信息 技术 统练试题
第一部分 : 信息技术（共 0 50 分）
命题：张雄
审题：罗呈娇
一、选择题（本大题共 2 12 小题，每小题 2 2 分，共 4 24 分。每小题列出的四个选项中，只有一个
符合题目要求的，不选、多选、错选均不得分）
1．下列描述中正确的是 A．IE 浏览器可以解释并执行 HTML 语言 B．网上交流表达信息时要遵循一定的标准，目的是信息表达的数字化 C．商家将超市 APP 的链接地址制作成二维码过程属于信息的发布 D．通过无线网络传输的信息不依附与任何载体 2．某协议的主要功能是完成对数据包的确认、流量控制和网络拥塞；自动检测数据包，并提供错误重发的功能，该协议的简称是 A．HTTP
B．SMTP
C．TCP
D．POP 3．使用 WinHex 软件查看字符“2017 第一学期”的内码，部分界面如图所示。
下列说法正确的是 A．原文包含 4 个 ASCII 码
B．这些字符的内码共占 10 个字节 C．由图中可以推出关系表达式“10”>“2”的值为True
D．字符“期”的内码是“C6 DA” 4．某算法的部分流程图如右图所示，执行这部分流程后，输出 c 的值是 A．50
B．34
C．55
D．60
5．使用 Access 软件打开数据库，部分界面如下图所示，下列说法正确的是
A．当前数据库包含 3 张数据表
B．“学生联系”数据表有 3 条记录 C．可以将 Access 数据表中的数据导出到 Excel
D．在数据表“学生联系”中输入多条记录时，可以先不输入学号 6．把十进制数 160 转化为八位二进制数后，高（左）4 位加 2，低（右）四位加 6 后，再转化为十进制数，结果为 A．168
B．198
C．166
D．182 7．使用 Goldwave 软件打开某音频文件，选取其中一段音频后的部分界面如图所示。下列说法正确的是
A．单击“剪裁”按钮后，音频文件的大小变为原来的 1/3 B．单击“删除”按钮后，再执行“插入静音”10 秒，音频的时长不变 C．执行“录音”命令 10 秒后，音频文件的大小变为原来的 4/3 D．执行“静音”命令后，音频的时长不变
8．某 Photoshop 作品部分界面如下。下列说法正确的是
A．“制作人”图层使用了滤镜效果 B．“背景”图层可以移动到“米老鼠”图层上方，并遮住该图层的内容 C．“尾巴”图层和“米老鼠”图层设置的图层样式效果肯定相同 D．通过移动“尾巴”图层的尾巴或“米老鼠”图层的米老鼠，使它们的相对位置变得更合理
9．用 Flash 软件制作动画作品，其中一个场景的部分时间轴界面如下图所示。下列说法正确的是
A．“背景”图层的前面 20 帧的内容和后面 20 帧的内容肯定相同 B．在“音乐”图层的第一帧可以添加声音 C．不能删除“音乐”图层 D．为了实现该场景的循环播放，可以直接在第 40 帧添加帧动作 gotoAndPlay(1); 10．【 加试题】某 psd 格式的文件以默认的方式保存为 bmp 格式，该 bmp 图像用 Photoshop打开后的部分界面如右图所示。已知该图像宽度 400 像素，高度 300 像素，则该图像的大小约为 A．351．6KB
B．117．2KB
C．58．6KB
D．175.8KB 11．【 加试题】
有如下 VB 程序段：
Max=-10000 For i = 1 To 10
s = 0
For j = i To 10
s = s + a(j)
If s > max Then max = s
Next j
Next i 已知数组 a(1)到 a(10)的原始数据为 6，-6，8，-7，7，2，-2，-1，-2，4．程序执行后，变量 max 的值为 A．9
B．10
C．27
D．4 12．【 加试题】有如下 VB 程序段：
k = Val(Text1．Text) left1 = 1: right1 = 10 Do While (left1 <= right1)
mid1 = (left1 + right1) \ 2
If a(mid1) <=k Then
left1 = mid1 + 1
Else
right1 = mid1-1
End If Loop Text2．text=str(right1) 已知数组 a(1)到 a(10)的原始数据为 1,4,5,5,5,5,8,9,9,10．程序运行时，在文本框 text1 中输入 5，文本框 text2 显示的内容是 A．5
B．10
C．3
D．6
二、非选择题（本大题共 5 5 小题，其中第 3 13 小题 4 4 分，第 4 14 小题 5 5 分，第 5 15 小题 8 8 分，第 第 6 16 小题 题 3 3 分，第 7 17 小题 6 6 分，共 6 26 分）
13．小王对高三（1）、高三（2）的学生期末考、期中考成绩进行一个简单的处理和分析，如下图
请回答下列问题：
（1）小王已经把期末成绩按班级和姓名排序，并把期中工作表中的数据复制到 F3:J23,为了能够统计出每个学生两次考试每科成绩之差，对高三（1）班期中数据已进行了处理，使两次考试同一个学生在同一行，为了使高三（2）数据达到同样的目的、写出处理的方法：
（2）区域 K4:M23 的数据是通过公式计算得到的：在 K4 单元格输入公式后，用自动填充功能完成K4:M23 的计算，则 K4 单元格中的公式是
（3）根据图 a 中的数据制作的图表如下所示，创建该图表的数据区域是
图 a
14．编“字符串缩写”程序，实现如下功能:在文本框 Text1 中输入 Ascii 字符串，字符串中如果有由 Ascii 表中相邻字符（升序）组成的子串，则把该子串缩写成由第一个字符、“-”和最后一个字符组成，比如“abcdfpxcba”则缩写成“a-dfpxcba”。程序运行界面如下图所示。
（1）代码“Private Sub Command1_Click()”中的 Command1 是
(单选，填字母：A．对象名 / B．事件
/ C．事件处理过程)
（2）实现上述功能的 VB 程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click() Dim s As String, result As String， i As Integer, j As Integer, t As Integer s = Text1．Text
：t = Len(s) ：result = "" i=1 Do While i <= t
j = i
Do While i < t
If Asc(Mid(s, i + 1, 1)) = Asc(Mid(s, i, 1)) + 1 Then
i = i + 1
Else
Exit Do
End If
Loop
If i > j Then
result =
①
Else
result = result + Mid(s, i, 1)
End If
i = i + 1 Loop Text2．Text =
②
End Sub （3）如果输入的字符串是“aBcucwxyzdcb”,输出结果为____________ 15．Flash 作品“剪纸艺术．fla”的“main”场景的制作脚本如下：
场景：main 类别序号：2 进入方式：由“load”场景单击“播放”按钮进入 呈现方式：
1．“剪纸简介”从舞台右下方慢慢向上移动。
2．单击“中国剪纸网”按钮，链接到网址为“http://www．zhjz．com”的网页，单击“退出”按钮，转入到“end”场景。
3．其他动画略。
呈现顺序说明：
1．一开始出现“退出”按钮，“中国剪纸网”按钮，“背景”动画，再依次出现 “剪纸人物”、“剪纸简介”、“剪纸1”、“剪纸2”和“剪纸3”的动画。
（1）测试“main“场景时，鼠标经过“退出”按钮时没有出现小手形状，其元件编辑状态如图 b所示，为解决这个问题，下列操作方法可行的有
(多选，填字母：A．删除“文字”图层的点击帧 /
B．在“矩形”图层的点击帧插入帧
/ C． 在“文字”图层的点击图 b 图 a
帧，执行清除关键帧/ D．在“文字”图层的点击帧，执行转换为关键帧 （2）该 Flash 作品的场景顺序
(填：是/否)符合脚本要求。
（3）观察图 a,“剪纸 1”图层第 18 帧到第 30 帧的补间类型是
。
（4）测试场景时，背景画面播放到 30 帧时消失，为了使画面一直延续到最后一帧，正确的操作是
（5）为了使“main”场景自动循环播放，直到单击“退出”按钮后转入“end”场景, 应在“main”场景最后一帧上添加动作脚本为
16．【 加试题】小明基于选择排序算法编写了一个 VB 程序,功能如下：某班有 50 个学生，从中选择10 个身高最高的同学，要求被选的任何两个人不能身高一样（所给的数据保证能选 10 个）。
实现上述功能的 VB 程序如下，但加框 处代码有错，请改正。
Const
n = 50 Dim d(0 To n) As single , name(1 to n) as string "读入 50 个学生的身高，依次存入 d(1)…d(50),姓名存入 name(1)…name(50) "代码略 Private Sub Command1_Click() Dim i As Integer, j As Integer, temp As single, k As Integer,r as string d(0) = 2 For i = 1 To 10
For j = i To n
If d(j) < d(i - 1) Then
If
Then
k = j
End If
End If
Next j
If k <> i Then
temp = d(k):
d(k) = d(i):
d(i) = temp
r=name(k) : name(k)=name(i) : name(i)=r
End If Next i For i = 1 To 10
‘输出被选的 10 个人的名字和身高。
List2．AddItem
name(i) & d(i) Next i k = 0 and d(k) < d(j) k=i
End Sub 17．【 加试题】酒店房间管理：酒店房间(房间数小于 10000)编号按 1、2、3…连续编号，老板对于没有出租的房子使用如下的方法来登记管理。连续的空房间，登记第一间的编号和连续的空房间数，比如空房间 1，2， 6，7，8，10，则登记 3 条记录，分别为（1
2），（6
3），（10
1）． 某旅客退房了，需要把这房子也登记上去，有四种情况需要处理：
1）上靠，例如退的房间号为 3，则原来登记的 3 条记录变成（ 1
3 ）
， （6
3）， （10
1）．
2）下靠，例如退的房间号为 5，则原来登记的 3 条记录变成（1
2）， （ 5
4 ）
， （10
1）． 3）上下不靠，例如退的房间号为 4，则登记的记录数变成 4 条（1
2）
，（ 4
1 ）
， （6
3），（10
1）． 4）上下靠，例如退的房间号为 9，则登记的记录数变成 2 条（1，2）， （6 6 ，5 5）
）．
小王依据上述描述设计了如下 VB 程序。请回答下列问题：
（1）当登记的记录有 3 条，分别为（1，4），（6，2），（10，3）．现在某旅客退掉 5 号房间，则登记的记录变成
（2）请在划线处填入合适的代码。
Const n = 5000 Dim a(0 To n) As Integer
"a(i)保存第 i 条记录的开始房间号 Dim b(0 To n) As Integer
" b(i)保存第 i 条记录的房间数 Dim c As Integer, k As Integer, sp As Integer
"k 为原始记录数 " 读取原始 k 条记录的数据，依次存入 a(1),b(1),a(2),b(2)…a(k),b(k),代码略 "为了程序处理方便，虚设了下面 2 条记录
a(0) = 0
:
b(0) = 0:
sp = k + 1 ：
a(sp) = 10000 ：
b(sp) = 0 Private Sub Command1_Click() Dim i As Integer c = Val(Text1Text)
"c 为退掉的房间号 i = 1 Do While a(i) < c
"查找房间 c，应该登记在某位置
i = i + 1 Loop i = i - 1 "下面为处理退房登记问题 If a(i) + b(i) = c Then
If
①
Then
"第 4 种情况，上下靠
b(i) = b(i) + 1 + b(i + 1)
For j = i + 1 To sp - 1
a(j) = a(j + 1)
:
b(j) = b(j + 1)
Next
j
sp = sp - 1
Else
"第 1 种情况，上靠
b(i) = b(i) + 1
End If ElseIf
c + 1 = a(i + 1) Then
"第 2 种情况，下靠
a(i + 1) = c
:
b(i + 1) = b(i + 1) + 1 Else
"第 3 种情况，上下不靠
For j =
②
a(j) = a(j - 1) :
b(j) = b(j - 1)
Next j
a(i + 1) = c
:
b(i + 1) = 1 :
sp = sp + 1 End If ‘下面为输出登记的记录，不包括虚设的两条记录 For i =1 to
③
List3．AddItem "第" & Str(i) & "记录（" & Str(a(i)) & "，" & Str(b(i)) & ")" Next i End Sub