资源简介

1
2019学年第一学期期中杭州地区(含周边)重点中学
高三年级信息学科 试题
信息命题： 萧山中学 朱城聪
通用命题： 萧山中学 桑金玉
考生须知：
1．本卷满分 100分，考试时间 90分钟；
2．答题前，在答题卷指定区域填写班级、姓名、考场号、座位号及准考证号并填涂相应数字。
3．所有答案必须写在答题卷上，写在试卷上无效；
4．考试结束后，只需上交答题卷。
第一部分 信息技术（共 50分）
一、 选择题（本大题共 12 小题，每小题 2 分，共 24 分。在每小题给出的四个选项中，只有一个符合
题目要求。）
1.关于信息和信息技术，下列说法正确的是（ ）
A.声音以模拟信号的形式存储在计算机中
B.近代信息技术包括摄影技术、电影技术、光电子技术
C.报刊杂志是生活中重要的信息表达方式
D.汉字输入时通常是利用音码和形码进行编码
2.关于网络和浏览器，下列说法正确的是（ ）
A.保存网页时选择“网页，全部”选项能将网页中所有的媒体内容都保存下来
B.静态网页可根据情况的变化、用户的需要生成不同的页面
C.收藏夹一旦清空，历史记录也将清空
D.浏览器访问 web 服务器时，一定会用到 TCP 协议
3. 使用 Word 软件编辑某文档，部分界面如图所示。
第 3 题图
下列说法正确的是（ ）
A. 图中图文混排方式不可能是紧密型
B. 文中有 4 处修订
C. 执行“拒绝所有修订”，第三行第一句话是“中国同 12 国接壤，与 8 国海上相邻。”
D. 可以利用替换功能先设置好替换的内容，在输入时程序会自动将内容替换成预先设置好的内容
4.小陈利用 Access 软件创建了某数据表，如下图第 4 题-1 所示，其表结构如图第 4 题-2 所示：
2

下列操作说法正确的是（ ）
第 4 题-1 图 第 4 题-2 图
A. 图中出生年月字段中可以输入数据“1990-1-5”
B. Access 中不可以将“出生年月”的字段类型修改成数字类型
C. 性别字段中的数据存储时存储大小为 1B
D. 当前视图中可以删除“编号”字段
5.使用 UltraEdit 软件观察字符“China!生日快乐！”的内码，部分界面如下所示，下列说法正确的是（ ）
第 5 题图
A. 图中共有 4 个 GB-2312 编码
B. 英文字符“J”的内码表示成十六进制为 50
C. 字符“生”的内码表示成二进制为“11001001 11111010”
D. “乐”字的内码是 D6 A3
6.下图是 Photoshop 软件设计作品的部分界面，下列说法正确的是（ ）
第 6 题图
A. 不可以把“文字 2”图层的文字内容修改成“中华人民共和国成立 70 周年”
B. 背景图层不能修改不透明度
C. 可以对“文字 1”图层执行“拷贝图层样式”操作
D. 可以用画笔工具将“背景”图层的白色区域填充成红色
7.用 GoldWave 软件编辑某音频文件，部分界面如图所示，下列说法正确的是（ ）
第 7 题图
A. 该音频是 Wave 格式的文件，每秒钟采样 22050 千次
3

B. 当前状态下执行“插入静音”操作，时间为 5 秒，再执行“删除”操作，文件存储容量变大
C. 当前状态下执行“删除”操作，音频时长变成 25s
D. 当前状态下执行“选定部分另存为”按原格式进行保存，文件大小约为 107KB
8.某算法的部分流程图如右图所示，其中 a(1)到 a(5)中的数据
为 7,13,19,9,25 执行完这部分流程后，输出的结果是（ ）
A. s=9,i=1,k=5
B. s=11,i=1,k=6
C. s=7,i=1,k=6
D. s=11,i=3,k=6
9.有如下 VB 程序段
Dim i As Integer
Dim a(1 To 9) As Integer
a(1) = 1: a(2) = 2
For i = 3 To 10
a(i) = a(i - 1) * i
Next i
Text1.Text = Str(a(i))
运行程序，单击命令按钮 Command1 后，出现的错误提示为（ ）
A.下标越界 B.溢出 C.子程序或函数未定义 D.类型不匹配
10.有如下 VB 程序段：
i = 1: j = 9: flag = False
Key = Val(Text1.Text)
Do While i < j
m = (i + j + 1) \ 2
If a(m) > Key Then j = m - 1 Else i = m + 1
If a(m) = Key Or a(m + 1) = Key Then flag = True: Exit Do
Loop
If flag Then
If a(m) = Key Then Text2.Text = Str(m) Else Text2.Text = Str(m + 1)
Else
Text2.Text = "找不到"
End If
程序运行时，数组元素 a(1)到 a(9)中的数据为 12,24,27,34,39,46,68,73,84，在文本框 Text1 中输入“68”，
执行该程序段，则下列表达式正确的是（ ）
A. j=8 B. i=8 C. j=9 D.m=6
11. 有如下 VB 程序段：
k = 1: start = 1: end = 8: flag = 1
Do While k <= 3
For i = start To end - flag Step flag
If a(i) > a(i + flag) Then
t = a(i): a(i) = a(i + flag): a(i + flag) = t
End If
Next i
end = end – flag : flag = -flag : k = k + 1
t = start: start = end: end = t
Loop
第 8 题图
4

For i = 1 To 8
List1.AddItem Str(a(i))
Next i
已知 a(1) 到 a(8)的值是 39,18,24,14,2,76,65,59，运行之后 a(1) 到 a(8)的值是（ ）
A. 65 39 18 2 14 24 59 76 B. 65 18 14 2 24 39 59 76
C. 65 18 2 14 24 39 59 76 D. 65 18 14 24 2 39 59 76
12.有如下 VB 程序段：
i = 0: s = "": n = 0
Do While i <= 3
k = i: j = i + 1
Do While j <= 7
If a(j) < a(k) Then k = j
j = j + 1
Loop
If i <> k Then
t = a(i): a(i) = a(k): a(k) = t
n = n + 1
End If
s = s + Str(a(i)): i = i + 1
Loop
Label1.Caption = Str(n) + ":" + s
数组 a(0)到 a(7)依次为 16, 19, 8, 20, 4, 12,6, 15， 程序运行后，标签框 Label1 中显示的值为（ ）
A. 3:4 6 8 B.4:4 6 8 C. 3:4 6 8 12 D.4:4 6 8 12
二、非选择题（本大题共 4 小题，其中第 13 小题 4 分，第 14 小题 8 分，第 15 小题 7 分，第 16 小
题 7 分，共 26 分。）
13.小张统计了企业老员工的 1999 年月工资和 2019 年工资信息数据，并使用 EXCEL 软件进行数据处理，
如第 13 题图 a 所示











请回答下列问题：
（1）图 a 中区域 F3：F13 中的计算公式是由 F2 单元格自动填充得到的，则 F8 单元格编辑栏中的内容为
_________________________________。（平均月工资增幅=（2019 月工资-1999 年平均月工资）/1999 年平
均月工资）
（2）图 a 中的数据已经经过排序，则排序时应选的数据区域是_________________，其中主要关键字是“1999
年月工资”，次要关键字是_______________________。
（3）利用 13题图 a的数据建立如第 13题 b中的柱形图，则该图表的数据区域为________________________。

第 13 题图 a

5


第 13 题图 b
14.小丹同学为 70 年国庆制作了多媒体作品。她利用 Flash 软件制作了一个动画，请回答下列问题：
第 14 题图 a
（1）下列关于多媒体作品创作说法正确的是 （多选，填字母：A.在片头场景中需要一张图
片，需要上网获取，经过 Photoshop 处理，名字命名成“BG.JPG”，这一过程属于媒体元素分解；B.Flash 作
品主要界面需要链接到三个场景“开国篇”、“富国篇”、“强国篇”，这一过程是模块设计；C.最终作品通过
微博发布，这一过程是应用需求分析；D.完成制作脚本后还需要编写文字脚本；E.作品主要展示界面可分“片
头”，“主交互界面”，“片尾”，这一过程是结构设计。）
（2）“BIRD1”图层中补间动画的类型是 。（单选，填字母：A.形状补间动画；B.动画补间动画）
（3）动画播放到最后一帧便停止播放，点击舞台上的“退出”按钮，便关闭整个动画的播放，则最后一帧上
的动作命令是 。
（4）“TEXT”图层从第一帧就开始播放，形成文字淡入的效果，在不改变动画时长的前提下要求该图层动
画推迟一秒钟播放，则该如何操作 。
（5）小丹同学在测试时发现“主界面”按钮无法响应鼠标事件，按钮的属性状态如下图 b 和图 c 所示，下列
说法正确的是 。（多选，填字母：A.在“背景”图层的点击帧执行清除关键帧操作，按
钮可以响应鼠标事件；B.在“音乐”图层的点击帧执行插入关键帧操作，按钮可以响应鼠标事件；C.“图样 1”
图层按下帧执行插入帧操作，按钮不能响应鼠标事件；D.在“文字”图层点击帧执行插入帧操作，按下按钮
时可以听到声音；E.在“图样 1”图层按下帧执行插入空白关键帧，测试时能看到指针经过帧舞台上的内容）

6

第 14 题图 b 第 14 题图 c
15.小张要对一批数据加密，数据内容全部由英文单词和空格组成（不包含数字和标点符号，数据最终以英
文单词结尾，每个单词至少由两个字母组成）。加密时小张先从文本框中读取整段原文内容，然后对每个
单词进行如下操作：每个单词中第一个和第二个字母交换位置，第三个字母按字母表顺序向后移动 3 位，
并后移到整个单词的最后面，其余字母前移，过程如图所示。例如：单词“Hazarded”，经过转换之后得到
的密文是“aHardedc”。







代码和程序运行界面如下所示，请在划线处填入合适的代码，并且在加框处代码有错误，请改正：
Const n = 1000
Dim mw(0 To 1000) As String '存放转换后密文的字符
Function zh(s As String) As String '按字母表后移 3 位进行转换
Dim p As Integer，flag As Boolean
If s >= "a" And s <= "z" Then
p = Asc(s) - 96: flag = True
Else
p = Asc(s) - 64: flag = False
End If
①
If flag Then zh = Chr(p + 96) Else zh = Chr(p + 64)
End Function
Private Sub Command1_Click()
Dim i As Integer, j As Integer, t As String, a As Integer
Dim tmp As String, k As Integer, s As String
s = Text1.Text
k = 1: a = 1
For i = 1 To Len(s)
t = Mid(s, i, 1)
If t = " " Then
k = 0: mw(i) = t
Else
If k < 3 Then
mw(i + a) = t: a = -a
Else
tmp = zh(t)
j = i
Do While j <= Len(s) or Mid(s, j + 1, 1) <> " "
②
j = j + 1
Loop
mw(j) = tmp
第 15 题图
7

③
End If
End If
k = k + 1
Next i
For i = 1 To Len(s)
Text2.Text = Text2.Text + mw(i)
Next i
End Sub
请回答下列问题：
（1）如果输入的原文单词是“TextBox”，则加密后的密文是
（2）加框处代码有错误，则正确的是___________________________
（3）请将划线处补充完整
①_________________________
②_________________________
③_________________________
16.对 k（k<=100）个数据进行排序时，可以利用一种排序方式进行处理，算法如下：
① 每次将第 i 个数据和第 2*i 以及第 2*i+1 个位置的数据进行比较，将较大值交换到第 i 个位置上；
② 从数组的第 i(未排序数据个数一半位置)个位置重复步骤①一直比较到最前面，这样就可以将最大值交
换到第 1 个位置；
③ 最终将 1 号位置上的值与未排序数据的最后一个进行交换，得到最大值；
④ 反复执行① ② ③三个步骤就可以将数据按升序排序
过程如下图所示，其中 a(1)=11,a(2)=25,a(3)=52,a(4)=39,a(5)=46，开始比较的位置从 i=k\2 个位置开始：
第一次排序过程：


步骤①：




步骤②：




步骤③：


第二次排序过程：






8


现要求在文本框 Text1 中输入一个整数 k，对 k 个随机生成的两．位．奇．数．按上述排序方法进行排序，代码和
程序运行界面如下所示，请在划线处填入合适的代码，并且在加框处代码有错误，请改正：
Dim a(1 To 100) As Integer
Dim k As Integer
Private Sub Command1_Click()
Dim i As Integer
k = Val(Text1.Text)
Randomize
For i = 1 To k
a(i) = ①
List1.AddItem Str(a(i))
Next i
End Sub
Private Sub Command2_Click()
Dim i As Integer, j As Integer, t As Integer, flag As Integer
For i = 1 To k - 1
For j = k \ 2 To 1 Step -1
If Not judge(i, j) Then
If ② Then
t = a(j): a(j) = a(2 * j): a(2 * j) = t
Else
t = a(j): a(j) = a(2 * j + 1): a(2 * j + 1) = t
End If
End If
Next j
t = a(1): a(1) = a(k - i + 1): a(k - i + 1) = t
Next i
For i = 1 To k
List2.AddItem Str(a(i))
Next i
End Sub
Function judge(t As Integer, s As Integer) As Boolean
③
If a(s) > a(2 * s) And a(s) > a(2 * s + 1) Or a(s) > a(2 * s) And 2 * s > k - t Then
judge = True
End If
End Function
根据以上代码回答问题：
（1）如果现有数据 a(1)=27,a(2)=12,a(3)=33,a(4)=78,a(5)=61，完成一次排序之后 a(2)的值是
（2）加框处代码有错误，则正确的是___________________________
（3）请将划线处补充完整
①_________________________
②_________________________
③_________________________

高三技术参考答案 第 1 页 共 3 页
2019学年第一学期期中杭州地区(含周边)重点中学
高三年级技术学科参考答案
第一部分：信息技术（共 50 分）
一、选择题（本大题共 12 小题，每小题 2 分，共 24 分。在每小题给出的四个选项中，只有一个
符合题目要求。）
1 2 3 4 5 6 7 8 9 10 11 12
D D C A C B B A B B B C
二、非选择题（本大题共 4 小题，其中第 13 小题 4 分，第 14 小题 8 分，第 15 小题 7 分，
第 16 小题 7 分，共 26 分。）
13．（4分）
（1）（1分）=(E8-$D$14)/ $D$14
（2）（2分）A1：F13或 A2：F13或 A1：E13或 A2：E13 部门
（3）（1分）B1,F1,B4:B13,F4:F13
14．（8分）
（1）（2分）ABE
（2）（1分）B
（3）（1分）stop();
（4）（2分）“TEXT”图层第 1帧到第 35帧整体移动至第 13帧到第 47帧 （移动后前后帧差必
须是 34帧）
（5）（2分）ACD
15．（7分）
（1）（1分）eTtBoxa
（2）（2分）j < Len(s) And Mid(s, j + 1, 1) <> " "
（3）①（1分）p = (p + 2) Mod 26 + 1
②（1分）mw(j) = Mid(s, j + 1, 1)
③（2分）i = j
16．（7分）
（1）（1分）27
（2）（2分）(k-i+1)\2
（3）①（1分）Int(Rnd * 45) * 2 + 11 等同答案即可
②（2分）2 * j + 1> k – i + 1 Or a(2 * j) > a(2 * j + 1) 等同答案即可
③（1分）judge = False

展开更多......

收起↑