搜索
全一卷
难度系数：0.94 
答案解析
有奖纠错
1．下列有关信息技术的说法，不正确的是
| A．信息技术是伴随着计算机和互联网技术的发展而诞生的 |
| B．信息技术是对信息进行采集、处理、传输、存储、表达和使用的技术 |
| C．信息技术包含微电子技术、通信技术、计算机技术和传感技术等 |
| D．物联网、人工智能、云计算等技术都是当前信息技术发展的热点 |
2．电子邮件服务器之间传送邮件时采用的协议名称是
| A．URL | B．SMTP | C．HTTP | D．POP3 |
3．使用Word软件编辑某文档，部分界面如图所示。下列说法正确的是
| A．实现图中的图文环绕效果可以采用“嵌入型”环绕方式 |
| B．删除图中批注后，批注对象和批注内容同时被删除 |
| C．当前光标位于标题行，按“Delete”键一次，“离”字被删除 |
| D．拒绝文档中的所有修订后，文字“应该说”被保留 |
4．使用Access软件打开数据库，部分界面如图所示。下列说法正确的是
| A．“表1”中第1条记录的“借阅ID”字段值一定为“1” |
| B．“表1”中“是否赔偿”字段的有效输入值可以为“已赔偿” |
| C．“表1”中不同记录的“图书编号”字段值可以相同 |
| D．“读者信息表”中不能包含“读者编号”字段 |
5．某算法的部分流程图如图所示。执行这部分流程，分别输入35、50、60，则输出值依次为
| A．10，3 | B．10，4 | C．7，10，4 | D．10，12，3 |
6．下列关于多媒体技术的说法，正确的是
| A．多媒体技术中的媒体是指承载信息的载体，如文字、声音、图形和图像等 |
| B．多媒体数据压缩标准中，MPEG是静态图像压缩标准，JPEG是动态图像压缩标准 |
| C．某软件能根据文本内容自动朗读，该功能主要应用了多媒体技术中的语音识别技术 |
| D．智能手机的指纹识别功能，主要应用了多媒体技术中的OCR技术 |
7．使用UltraEdit软件观察字符“A-Z a-z 0-9”的内码，部分界面如图所示。
下列说法正确的是
下列说法正确的是
| A．字符“F”、“d”、“6”的内码值由小变大 |
| B．字符“a”与“A”内码值之差的十进制表示为20 |
| C．字符“2”内码值的二进制表示为“00000010” |
| D．图中所有字符内码值的十进制表示均小于128 |
8．使用Photoshop软件制作“阅读”作品，部分界面如图所示，将作品存储为JPEG格式文件 “阅读.jpg”。关于文件“阅读.jpg”，下列说法正确的是（ ）。
| A．存储容量为2. 25MB | B．包含3个图层 |
| C．不包含“书”图层的图像 | D．图像四角处透明 |
9．使用Flash软件编辑“云”元件，实现了云朵由小变大再变回原样的形状补间动画，界面如图所示。下列说法正确的是
| A．“图层1”中第10帧的云朵与第1帧的相同 |
| B．云朵由小到大的变化速度比由大到小的变化速度慢 |
| C．在舞台上创建的该元件实例，大小、颜色必定与该元件相同 |
| D．由该元件创建的影片剪辑实例，不具有循环播放的功能 |
10．一个时长为8分钟、采样频率为32kHz、量化位数为16、双声道未经压缩的Wave 格式音频文件，其存储容量约为
| A．1MB | B．29MB | C．59MB | D．469MB |
11．有如下VB程序段：
For i = 1 To 6
a（i） = Int（Rnd * 10） + 1
Next i
For i = 1 To 5
If i Mod 2 = 1 And a（i） > a（i + 1） Then
t = a（i） ： a（i） = a（i + 1） ： a（i + 1） = t
Else
a（i） = a（i） + 1
End If
Next i
执行该程序段后，a（l）~a（6）各元素可能的值是
For i = 1 To 6
a（i） = Int（Rnd * 10） + 1
Next i
For i = 1 To 5
If i Mod 2 = 1 And a（i） > a（i + 1） Then
t = a（i） ： a（i） = a（i + 1） ： a（i + 1） = t
Else
a（i） = a（i） + 1
End If
Next i
执行该程序段后，a（l）~a（6）各元素可能的值是
| A．11，11，7，9，3，9 | B．6，2，8，10，5，9 |
| C．6，9，3，7，8，12 | D．3，9，0，8，2，7 |
12．下列VB程序段功能为：根据文本框Text1中各字符的大小关系，计算各字符升序排列的序号，并将序号保存在数组y中。如文本框内容为“2011”，程序运行后y（1）〜y（4）各元素的值分别为“4，1，2，3”。
s = Text1. Text
n = Len（ s）
For i = 1 To n
y（ i） = 1
Next i
For i=1 To （ 1）
For j=（ 2） To n
If （ 3） Then
y（ j）=y（ j）+1
Else
y（ i） = y（ i） + 1
End If
Next j
Next i
上述程序段3个方框处的表达式分别为
s = Text1. Text
n = Len（ s）
For i = 1 To n
y（ i） = 1
Next i
For i=1 To （ 1）
For j=（ 2） To n
If （ 3） Then
y（ j）=y（ j）+1
Else
y（ i） = y（ i） + 1
End If
Next j
Next i
上述程序段3个方框处的表达式分别为
| A．（1）n（2）1（3）Mid（s，j，1）>= Mid（s，i，1） |
| B．（1）n（2）1（3）Mid（s，j，1）> Mid（s，i，1） |
| C．（1）n-1（2）i+1（3）Mid（s，j，1）>= Mid（s，i，1） |
| D．（1）n-1（2）i+1（3）Mid（s，j，1）> Mid（s，i，1） |
13．小张收集了某地部分市场菜篮子价格数据，并使用Excel软件进行数据处理，如图所示。
请回答下列问题：
（1） 若将C3：H3单元格的数值小数位数设置为0，则I3单元格中显示的值______（填字母：A.变大/ B.不变/ C.变小）。
（2）表中“最大差价”数据是用函数MAX和函数MIN计算得到的：选择J3单元格输入公式，然后用自动填充功能完成其他单元格的计算。则J3单元格中的公式为______（提示：“最大差价”是各市场中同一商品的最高价格与最低价格之差。函数MAX（数据区域）的功能为求该数据区域中的最大值，函数MIN（数据区域）的功能为求该数据区域中的最小值）。
（3）小张要找出在六个市场中“最大差价”最小的水产类商品（若存在符合条件的多个商品，则全部选取）。下列方法可行的是______（多选，填字母）。（注：全部选对的得2分，选对但不全的得1分，不选或有选错的得0分）
A.以“类别”为水产、“最大差价”为最小1项进行筛选，然后选取筛选出的全部商品
B.以“类别”为水产进行筛选，再以“最大差价”为关键字升序排序，选取排在最前面的商品
C.以“最大差价”为主要关键字、“类别”为次要关键字，均按升序排序，选取排在最前面 的商品
D.以“最大差价”为关键字升序排序，再以“类别”为水产进行筛选，选取排在最前面的 商品
请回答下列问题：
（1） 若将C3：H3单元格的数值小数位数设置为0，则I3单元格中显示的值______（填字母：A.变大/ B.不变/ C.变小）。
（2）表中“最大差价”数据是用函数MAX和函数MIN计算得到的：选择J3单元格输入公式，然后用自动填充功能完成其他单元格的计算。则J3单元格中的公式为______（提示：“最大差价”是各市场中同一商品的最高价格与最低价格之差。函数MAX（数据区域）的功能为求该数据区域中的最大值，函数MIN（数据区域）的功能为求该数据区域中的最小值）。
（3）小张要找出在六个市场中“最大差价”最小的水产类商品（若存在符合条件的多个商品，则全部选取）。下列方法可行的是______（多选，填字母）。（注：全部选对的得2分，选对但不全的得1分，不选或有选错的得0分）
A.以“类别”为水产、“最大差价”为最小1项进行筛选，然后选取筛选出的全部商品
B.以“类别”为水产进行筛选，再以“最大差价”为关键字升序排序，选取排在最前面的商品
C.以“最大差价”为主要关键字、“类别”为次要关键字，均按升序排序，选取排在最前面 的商品
D.以“最大差价”为关键字升序排序，再以“类别”为水产进行筛选，选取排在最前面的 商品
14．在平面坐标系中，给定一组有序的点。从原点出发，依次用线段连接这些点，构成一条折线。要求编写一个“计算折线长度”的程序，功能如下：在文本框Text1中依次输入这些点的坐标值（数据都用逗号分隔并以逗号结尾），单击“计算”按钮Cmd后，程序计算这条折线的长度，结果显示在Label1中。例如，三个点的坐标（5，10）、（8，12）、（6，17）输入格式如图所示。
（单选，填字母：A. Form / B. Label / C.TextBox / D. CommandButton ）
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Cmd_Click（）
Dim i As Integer，j As Integer，k As Integer
Dim x1 As Single，y1 As Single，x2 As Single，y2 As Single
Dim d As Single，Totald As Single，v As Single，s As String
s =______①
x1 = 0： y1 = 0'出发点为坐标原点
k = 1 ： j = 1 ： Totald = 0
For i = 1 To Len（s）
If Mid（s，i，1） ="，"Then
v = Val（Mid（s，j，i - j））'提取坐标值，保存在变量v中
j = i + 1
If ② Then
x2 = v
Else
y2 = v
d = Sqr（（x2 — x1）^2 + （y2 — y1）^ 2）
Totald = Totald + d
x1 = x2 ： y1 = y2
End If
k = k + 1
End If Next i
Label1. Caption = Str（Totald）
End Sub
（3） 运行该程序，输入数据如上图所示，程序执行到循环结束时，变量k的值为______。
（单选，填字母：A. Form / B. Label / C.TextBox / D. CommandButton ）
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Cmd_Click（）
Dim i As Integer，j As Integer，k As Integer
Dim x1 As Single，y1 As Single，x2 As Single，y2 As Single
Dim d As Single，Totald As Single，v As Single，s As String
s =______①
x1 = 0： y1 = 0'出发点为坐标原点
k = 1 ： j = 1 ： Totald = 0
For i = 1 To Len（s）
If Mid（s，i，1） ="，"Then
v = Val（Mid（s，j，i - j））'提取坐标值，保存在变量v中
j = i + 1
If ② Then
x2 = v
Else
y2 = v
d = Sqr（（x2 — x1）^2 + （y2 — y1）^ 2）
Totald = Totald + d
x1 = x2 ： y1 = y2
End If
k = k + 1
End If Next i
Label1. Caption = Str（Totald）
End Sub
（3） 运行该程序，输入数据如上图所示，程序执行到循环结束时，变量k的值为______。
15．使用Flash软件创作“荷塘月色”多媒体作品，如图所示。请回答下列问题：
（2）图中“荷塘”图层第5帧到第15帧实现了“荷叶”渐变为汉字“荷塘”的动画，则第5帧中的“荷叶”为______（填文字：形状/实例）。
（3）图中“蜻蜓”图层创建了蜻蜓飞舞的动画，各关键帧中的“蜻蜓”影片剪辑实例均由库中“蜻蜓”元件（仅含展翅动作）创建。从左至右，各关键帧中“蜻蜓”实例的坐标（X，Y）依次为（50，120）、（200，180）、（300，80）。若仅对第25帧执行清除关键帧操作，则测试场景时______（多选，填字母：A.蜻蜓飞行路径变为直线/ B.蜻蜓在坐标（50，120）处原地展翅/C.蜻蜓展翅频率不变/D.蜻蜓飞行时间变短）。
（4）如图所示，为使“荷花”图层的动画从第5帧开始，并持续到第45帧。正确的操作是______。
（5）测试影片时，单击当前场景中的“播放”按钮，停止当前声音的播放，然后影片跳转到“荷叶田田”场景第1帧并开始播放，则“播放”按钮的动作脚本为on（release）{______}。
（2）图中“荷塘”图层第5帧到第15帧实现了“荷叶”渐变为汉字“荷塘”的动画，则第5帧中的“荷叶”为______（填文字：形状/实例）。
（3）图中“蜻蜓”图层创建了蜻蜓飞舞的动画，各关键帧中的“蜻蜓”影片剪辑实例均由库中“蜻蜓”元件（仅含展翅动作）创建。从左至右，各关键帧中“蜻蜓”实例的坐标（X，Y）依次为（50，120）、（200，180）、（300，80）。若仅对第25帧执行清除关键帧操作，则测试场景时______（多选，填字母：A.蜻蜓飞行路径变为直线/ B.蜻蜓在坐标（50，120）处原地展翅/C.蜻蜓展翅频率不变/D.蜻蜓飞行时间变短）。
（4）如图所示，为使“荷花”图层的动画从第5帧开始，并持续到第45帧。正确的操作是______。
（5）测试影片时，单击当前场景中的“播放”按钮，停止当前声音的播放，然后影片跳转到“荷叶田田”场景第1帧并开始播放，则“播放”按钮的动作脚本为on（release）{______}。
16．数组a中存储的是左右交替上升的n个正整数，如下表所示：
依据对分查找思想，设计一个在数组a中查找数据key的程序。实现该功能的VB程序如下，但加框处代码有错，请改正。
Private Sub Command1_Click（）
Const n = 6
Dim a（1 To n）As Integer，flag As Boolean
Dim i As Integer，j As Integer，m As Integer，key As Integer
'读取一组正整数，按上述规则存入数组a中，代码略。
key = Val（Text1. Text）
i = 1
j = (n + 1)\2
flag = False
Do While
And Not flag '（ 1）
m =(i + j)\2
If key = a(m) Then
flag = True
ElseIf key< a(m) Then
j = m - 1
Else
i = m + 1
End If
Loop
If Not flag And j > 0 Then
m=n-i
If key = a(m) Then flag = True
End If
If flag Then
Text2. Text = Str(m)
Else
Text2. Text = "找不到"
End If
End Sub
| a（1） | a（2） | a（3） | …… | a（n —2） | a（n—1） | a（n） |
| 3 | 25 | 38 | …… | 55 | 31 | 12 |
依据对分查找思想，设计一个在数组a中查找数据key的程序。实现该功能的VB程序如下，但加框处代码有错，请改正。
Private Sub Command1_Click（）
Const n = 6
Dim a（1 To n）As Integer，flag As Boolean
Dim i As Integer，j As Integer，m As Integer，key As Integer
'读取一组正整数，按上述规则存入数组a中，代码略。
key = Val（Text1. Text）
i = 1
j = (n + 1)\2
flag = False
Do While
And Not flag '（ 1）m =(i + j)\2
If key = a(m) Then
flag = True
ElseIf key< a(m) Then
j = m - 1
Else
i = m + 1
End If
Loop
If Not flag And j > 0 Then
m=n-i
If key = a(m) Then flag = True
End If
If flag Then
Text2. Text = Str(m)
Else
Text2. Text = "找不到"
End If
End Sub
17．某种数据加密方法描述如下（加密前后的数值都是0-255）：
以m个数据为一段，将n个待加密数据依次分割成若干个数据段，剩余数据（个数小于m）为独立数据段。
数据加密规则：
数据个数等于m的数据段，先进行值变换，再进行位置变换，得到加密数据段。
数据个数小于m的数据段，只进行值变换，直接得到加密数据段。
依次合并加密数据段，即为最后的加密数据。
值变换：用值变换密钥数组x（元素个数为m，值为0~255的整数），将待加密数据段中的数据进行值变换，方法如下：
值变换后第i个元素=（待加密数据段第i个元素+x（i））Mod 256，其中i=1,2,……,m
位置变换：用位置变换密钥数组y（元素个数为m，值为1~m的不重复整数），将上述
值变换后的m个元素进行段内位置变换，方法如下：
加密后数据段第y（i）个元素=值变换后第i个元素，其中i=1,2,……,m
例如，n=5，m=3的数据加密过程如下：
（1）已知m=3，数组x与数组y中的数据如下表所示。则待加密数据段“155,1,250”加密后的数据段为______________（填数据，用逗号分隔）
（2）小张根据上述加密算法，设计了一个对应的解密程序，其VB代码如下，请在划线处填入合适的代码（解密与加密使用相同的密钥数据）
Private Sub Command1_Click()
For j = 1 To m
②_________
Next j
Next i
For i = (n \ m) * m + 1 To n
b(i) = a(i)
Next i
'下面进行值变换：值变换后数据仍保存到数组 b 中
j = 1
For i = 1 To n
b(i) = ③________
j = j + 1
If j > m Then j = 1
Next i
'输出解密后数据，代码略
End Sub
以m个数据为一段，将n个待加密数据依次分割成若干个数据段，剩余数据（个数小于m）为独立数据段。
数据加密规则：
数据个数等于m的数据段，先进行值变换，再进行位置变换，得到加密数据段。
数据个数小于m的数据段，只进行值变换，直接得到加密数据段。
依次合并加密数据段，即为最后的加密数据。
值变换：用值变换密钥数组x（元素个数为m，值为0~255的整数），将待加密数据段中的数据进行值变换，方法如下：
值变换后第i个元素=（待加密数据段第i个元素+x（i））Mod 256，其中i=1,2,……,m
位置变换：用位置变换密钥数组y（元素个数为m，值为1~m的不重复整数），将上述
值变换后的m个元素进行段内位置变换，方法如下：
加密后数据段第y（i）个元素=值变换后第i个元素，其中i=1,2,……,m
例如，n=5，m=3的数据加密过程如下：
（1）已知m=3，数组x与数组y中的数据如下表所示。则待加密数据段“155,1,250”加密后的数据段为______________（填数据，用逗号分隔）
| x(1) | x(2) | x(3) | | y(1) | y(2) | y(3) |
| 10 | 20 | 30 | | 3 | 1 | 2 |
（2）小张根据上述加密算法，设计了一个对应的解密程序，其VB代码如下，请在划线处填入合适的代码（解密与加密使用相同的密钥数据）
Private Sub Command1_Click()
Const n = 100
Const m = 6
Dim i As Integer, j As Integer
Dim a(1 To n) As Integer, b(1 To n) As Integer
Dim x(1 To n) As Integer, y(1 To n) As Integer
'读取值变换与位置变换密钥数据，分别保存在数组 x 与 y 中，代码略
'读取待解密数据，保存在数组 a 中，代码略
'下面进行位置变换：位置变换后数据保存到数组 b 中
For i = 1 To ①______For j = 1 To m
②_________
Next j
Next i
For i = (n \ m) * m + 1 To n
b(i) = a(i)
Next i
'下面进行值变换：值变换后数据仍保存到数组 b 中
j = 1
For i = 1 To n
b(i) = ③________
j = j + 1
If j > m Then j = 1
Next i
'输出解密后数据，代码略
End Sub
