搜索
全一卷
难度系数：0.85 
答案解析
有奖纠错
1．下列有关信息的说法，正确的是（ ）
| A．信息在计算机内部采用二进制代码表示 |
| B．只有最新的信息才具有价值 |
| C．只能借助计算机才能处理信息 |
| D．信息不能脱离它所反应的事物被存储 |
2．超文本标记语言用于描述网页的内容，该语言的简称是（ ）
| A．WWW | B．URL | C．HTTP | D．HTML |
3．使用某OCR软件进行字符识别，发现识别正确率较低，可能的原因有（ ）
①识别前没有进行倾斜校正 ②识别前没有进行合理的区域划分
③识别前没有放大显示 ④扫描原始文稿时设置的扫描分辨率较低
①识别前没有进行倾斜校正 ②识别前没有进行合理的区域划分
③识别前没有放大显示 ④扫描原始文稿时设置的扫描分辨率较低
| A．①②③ | B．①②④ | C．①③④ | D．②③④ |
4．使用Access软件打开数据库，部分界面如下图所示。下列说法正确的是（ ）
| A．当前打开的数据库文件名是“2016年.accdb” |
| B．当前正在编辑的数据表中共有6条记录 |
| C．删除当前记录，原第4条记录“编号”字段值变为“3” |
| D．可在“编号”和“地市”字段之间插入一个新字段 |
5．使用UltraEdit软件查看字符内码，部分界面如下图所示（）
图中内码所对应的字符是（）
图中内码所对应的字符是（）
| A．bdoaMLNV |
| B．填充颜色 |
| C．背景back |
| D．技术abcd |
6．使用GoldWave软件对文件“背景.wav”进行处理，处理前后的部分界面分别如图a和图b所示，下列操作可实现该处理效果的是（ ）
| A．设置标记后剪裁 | B．设置标记后插入静音 |
| C．设置标记后删除 | D．设置标记后静音 |
7．某算法部分流程图如图所示。执行这部分流程，依次输入12、-5、29、18、7，则输出值是（ ）
| A．12 | B．-5 | C．29 | D．7 |
8．使用Photoshop软件制作“端午”作品，部分界面如图所示。下列说法正确的是（ ）
| A．可对“节日”图层直接设置滤镜效果 |
| B．“封底”图层设置了“内发光”图层样式 |
| C．可用文字工具修改“端午”图层中文字大小 |
| D．交换“粽叶”与“点心”图层的顺序，不影响作品的呈现效果 |
9．小王使用Flash软件制作动画，其中“进入”按钮元件的部分编辑界面如下图所示。
下列操作中，可使“进入”按钮能响应鼠标单击的是
下列操作中，可使“进入”按钮能响应鼠标单击的是
| A．选中“边框”图层的“点击”帧执行“删除帧”操作 |
| B．选中“形状”图层的“按下”帧执行“删除帧”操作 |
| C．选中“颜色”图层的“弹起”帧执行“清除关键帧”操作 |
| D．选中“文本”图层的“指针经过”帧执行“清除关键帧”操作 |
10．一段时长为10秒、1024×800像素、24位真彩色、NTSC制式（30帧/秒）的未经压缩AVI格式无声视频，其文件存储容量约为（ ）
| A．23MB | B．70 MB | C．703 MB | D．5625 MB |
11．有如下VB程序段：
a(1) = 1: a(2) = 1
b(1) = 1: b(2) = 2
For i = 3 To 5
执行该程序段后，数组元素b(5)的值为（ ）
a(1) = 1: a(2) = 1
b(1) = 1: b(2) = 2
For i = 3 To 5
a(i) = a(i - 1) + a(i - 2)
b(i) = b(i - 1) + a(i)
Next i执行该程序段后，数组元素b(5)的值为（ ）
| A．12 | B．8 | C．5 | D．-5 |
12．数组a为一组正整数，奇数在前，偶数在后。奇数与偶数已分别按升序排序。依据对分查找思想：设计一个在数组a中查找数据Key的程序。实现该功能的VB程序段如下：
i = 1: j = 10
Key = Val(Text1.Text)
Do While i <= j
If i > j Then s = "没有找到！" Else s = "位置：" + Str(m)
Text2.Text = s
上述程序中划线处处可选语句为：
①i = m + 1
②j = m - 1
③If Key < a(m) Then j = m - 1 Else i = m + 1
则（1）、（2）、（3）处语句依次是（ ）
i = 1: j = 10
Key = Val(Text1.Text)
Do While i <= j
m = (i + j) \ 2
If a(m) = Key Then Exit Do 'Exit Do 表示退出循环
If Key Mod 2 = 1 And a(m) Mod 2 = 0 Then
（1）ElseIf Key Mod 2 = 0 And a(m) Mod 2 = 1 Then
（2）Else
（3）End If
LoopIf i > j Then s = "没有找到！" Else s = "位置：" + Str(m)
Text2.Text = s
上述程序中划线处处可选语句为：
①i = m + 1
②j = m - 1
③If Key < a(m) Then j = m - 1 Else i = m + 1
则（1）、（2）、（3）处语句依次是（ ）
| A．①、②、③ | B．①、③、② | C．②、①、③ | D．③、②、① |
13．小林收集了2015、2016年浙江省各地区生产总值数据，并使用EXCEL软件进行数据处理，如图a所示。
请回答下列问题：
（1）要在表格第2行输入标题，格式如图b所示，下列操作正确的是______。
（单选，A.在B2单元格输入标题，选择B2：F2区域后居中 / B.在D2单元格输入标题后居中 / C.在B2单元格输入标题，合并B2：F2区域后居中）。
（3）根据图a中数据制作的图表如图c所示，创建图表的数据区域是________。
（4）在F15单元格中使用COUNTIF函数统计区域F4：F14中“增幅%”大于10的地区个数，则F15单元格中的公式是_______________。
（提示：COUNTIF函数用于统计某个区域满足条件的单元格个数。例如：＝COUNTIF（B4：B20，"<100"）表示在数据区域B4：B20中统计数值小于100的单元格个数。）
请回答下列问题：
（1）要在表格第2行输入标题，格式如图b所示，下列操作正确的是______。
（单选，A.在B2单元格输入标题，选择B2：F2区域后居中 / B.在D2单元格输入标题后居中 / C.在B2单元格输入标题，合并B2：F2区域后居中）。
（2）图a所示，区域B4：F14数据已进行了排序，则排序的主要关键字是_________。
（3）根据图a中数据制作的图表如图c所示，创建图表的数据区域是________。
（4）在F15单元格中使用COUNTIF函数统计区域F4：F14中“增幅%”大于10的地区个数，则F15单元格中的公式是_______________。
（提示：COUNTIF函数用于统计某个区域满足条件的单元格个数。例如：＝COUNTIF（B4：B20，"<100"）表示在数据区域B4：B20中统计数值小于100的单元格个数。）
14．某种编码以4位二进制码为一组，每组前两位表示方向，后两位表示距离。编写一个程序,将编码翻译成方向和距离，距离值为每组编码后两位二进制码转换为十进制数的值。具体功能如下：在 文本框Text1中输入连续多组编码，单击“翻译”按钮Commandl，结果显示在列表框List1中。
程序运行界面如右图所示。
（1）要使程序运行时，文本框Text1的Width属性值为2018，可在Form_Load事件过程中添加语句________（单选，填字母：A. Width=2018 / B.Textl. Width = 2018 / C. Width. Textl=2018）。
（2）实现上述功能的VB程序如下，请在划线处填人合适的代码。
Private Sub Command1_Click()
Dim s As String, c As String, d As String
Dim n As Integer, bl As Integer, b2 As Integer, v As Integer, i As Integer
s = Textl.Text: n = Len(s): i = 1
Do While i <= n
c = Mid(s, i, 2)
If c = "00" Then
d = "东"
ElseIf c = "01" Then
d = "南"
ElseIf c = "10" Then
d = "西"
Else
d = "北"
End If
b1 = Val(Mid(s, i + 2, 1))
b2 = Val(Mid(s, i + 3, 1))
v=_______________①
List1.AddItem d + " " + Str(v)
_____________②
Loop
End Sub
（3）若文本框Textl中输入的内容为“1111”，单击“翻译”按钮，列表框List1中显示的内容是_________。
程序运行界面如右图所示。
（1）要使程序运行时，文本框Text1的Width属性值为2018，可在Form_Load事件过程中添加语句________（单选，填字母：A. Width=2018 / B.Textl. Width = 2018 / C. Width. Textl=2018）。
（2）实现上述功能的VB程序如下，请在划线处填人合适的代码。
Private Sub Command1_Click()
Dim s As String, c As String, d As String
Dim n As Integer, bl As Integer, b2 As Integer, v As Integer, i As Integer
s = Textl.Text: n = Len(s): i = 1
Do While i <= n
c = Mid(s, i, 2)
If c = "00" Then
d = "东"
ElseIf c = "01" Then
d = "南"
ElseIf c = "10" Then
d = "西"
Else
d = "北"
End If
b1 = Val(Mid(s, i + 2, 1))
b2 = Val(Mid(s, i + 3, 1))
v=_______________①
List1.AddItem d + " " + Str(v)
_____________②
Loop
End Sub
（3）若文本框Textl中输入的内容为“1111”，单击“翻译”按钮，列表框List1中显示的内容是_________。
15．小王要创作一个关于“古诗欣赏”的多媒体作品。请回答下列问题：
（1）在制作作品前，小王进行了相应的分析和规划。下列不属于需求分析的是_________
（单选，填字母：A.该作品要求使用Flash软件制作/ B.该作品面向小学生演示播放/ C.该作品的主题思想为“赏析经典诗词，弘扬传统文化”/ D.根据主题思想和内容，制订该作品的脚本大纲）。
（2）小王使用Flash软件制作该多媒体作品，如下图所示。
图中“人物”图层第1帧到第10帧的补间动画实现了“人物”实例从完全透明到完全显示的效果，第1帧中“人物”实例的Alpha值是________ 。
（3）图中“白云”图层第15帧到第48帧的动画补间实现了由一朵云逐渐变化为两朵云的效果，该动画的补间类型是________ 。
（4）测试场景时，“标题”图层内容在播放完第40帧后消失。为了使该图层第40帧内容延续显示至场景动画结束，下列操作方法可行的有________ （多选，填字母：A.选中“标题”图层第41帧执行“清除关键帧”操作 / B.删除“标题”图层第41帧到第60帧 / C.选中“标题”图层第40帧执行“复制帧”操作，在第41帧执行“粘贴帧”操作 / D.选中“标题”图层第60帧执行“插入关键帧”操作）。
（5）要将当前场景动画播放时长从6秒调整为5秒，则需设置Flash文档的帧频为______ fps。
（6）测试影片时，单击“赏析”按钮，实现在浏览器中显示位于同一文件夹下“赏析.txt”文件的内容，并停止当前动画的播放，则“赏析”按钮的动作脚本为on(release){___________ }。
（1）在制作作品前，小王进行了相应的分析和规划。下列不属于需求分析的是
（单选，填字母：A.该作品要求使用Flash软件制作/ B.该作品面向小学生演示播放/ C.该作品的主题思想为“赏析经典诗词，弘扬传统文化”/ D.根据主题思想和内容，制订该作品的脚本大纲）。
（2）小王使用Flash软件制作该多媒体作品，如下图所示。
图中“人物”图层第1帧到第10帧的补间动画实现了“人物”实例从完全透明到完全显示的效果，第1帧中“人物”实例的Alpha值是
（3）图中“白云”图层第15帧到第48帧的动画补间实现了由一朵云逐渐变化为两朵云的效果，该动画的补间类型是
（4）测试场景时，“标题”图层内容在播放完第40帧后消失。为了使该图层第40帧内容延续显示至场景动画结束，下列操作方法可行的有
（5）要将当前场景动画播放时长从6秒调整为5秒，则需设置Flash文档的帧频为
（6）测试影片时，单击“赏析”按钮，实现在浏览器中显示位于同一文件夹下“赏析.txt”文件的内容，并停止当前动画的播放，则“赏析”按钮的动作脚本为on(release){
16．有一组正整数，要求供对其中的素数进行升序排序。排序后素数在前，非素数在后。排序示例如下。
Const n = 8
Dim a(1 To n) As Integer
Private Sub Command1_Click()
Dim i As Integer, j As Integer, k As Integer, t As Integer
Dim flag As Boolean
'读取一组正整数，存储在数组 a 中，代码略
For i = 1 To n - 1
k = 1 ‘①
If IsPrime(a(k)) Then flag = True
Else flag = False
For j = i + 1 To n
k = j
flag = True
End If
If k <> i Then
If Not flag Then Exit For 'Exit For 表示退出循环
Next i
'依次输出排序后的数据。代码略
End Sub
Function IsPrime(m As Integer) As Boolean
'本函数判断 m 是否是素数：是素数返回值为 True，不是素数返回值为 False'代码略
End Function
划线处代码有误，请将正确的代码填到横线上。
①_________________________
②_________________________
Const n = 8
Dim a(1 To n) As Integer
Private Sub Command1_Click()
Dim i As Integer, j As Integer, k As Integer, t As Integer
Dim flag As Boolean
'读取一组正整数，存储在数组 a 中，代码略
For i = 1 To n - 1
k = 1 ‘①
If IsPrime(a(k)) Then flag = True
Else flag = False
For j = i + 1 To n
If IsPrime(a(j)) Then
If a(j) < a(k) Then ‘②k = j
flag = True
End If
End If
Next jIf k <> i Then
t = a(k): a(k) = a(i): a(i) = t
End IfIf Not flag Then Exit For 'Exit For 表示退出循环
Next i
'依次输出排序后的数据。代码略
End Sub
Function IsPrime(m As Integer) As Boolean
'本函数判断 m 是否是素数：是素数返回值为 True，不是素数返回值为 False'代码略
End Function
划线处代码有误，请将正确的代码填到横线上。
①_________________________
②_________________________
17．为分析数组a中各元素依次变化的情况，进行如下定义：
变化段：数组中相邻两个元素构成一个变化段。变化段有上升段（a(i)>a(i-1)）、下降段（a(i)<a(i-1)）和持平段（a(i)=a(i-1)）。数组a中的n个元素可构成n-1个依次排列的变化段。
波峰：从上升段转到下降段形成一个波峰。波峰的起点是峰顶前所有连续上升段中的第1个，终点是峰顶后所有连续下降段中的最后1个。
对称波峰：上升段与下降段个数相同的波峰称为对称波峰。
下图为一组数据的变化段及波峰示意图。
（1）数组元素“1,4,3,3,2,6,8,7,9,3,4,7,9,6,3,1”依次变化过程中“对称波峰”的个数为_____。
（2）请在划线处填入合适的代码。
Const n = 20
Dim a(1 To n) As Integer
Private Sub Form_Load()
'读取数据，并存储到数组a中，代码略
End Sub
Private Sub Command1_Click()
Function IsSymPeak(flag As Integer, steps As Integer) As Boolean
变化段：数组中相邻两个元素构成一个变化段。变化段有上升段（a(i)>a(i-1)）、下降段（a(i)<a(i-1)）和持平段（a(i)=a(i-1)）。数组a中的n个元素可构成n-1个依次排列的变化段。
波峰：从上升段转到下降段形成一个波峰。波峰的起点是峰顶前所有连续上升段中的第1个，终点是峰顶后所有连续下降段中的最后1个。
对称波峰：上升段与下降段个数相同的波峰称为对称波峰。
下图为一组数据的变化段及波峰示意图。
（1）数组元素“1,4,3,3,2,6,8,7,9,3,4,7,9,6,3,1”依次变化过程中“对称波峰”的个数为_____。
（2）请在划线处填入合适的代码。
Const n = 20
Dim a(1 To n) As Integer
Private Sub Form_Load()
'读取数据，并存储到数组a中，代码略
End Sub
Private Sub Command1_Click()
Dim flag As Integer '存储变化段的状态：1表示升，-1表示降，0表示平
Dim count As Integer '存储对称波峰段的个数
Dim steps As Integer
Dim i As Integer
flag = 0: steps = 0: count = 0
For i = ________ To n
If a(i) > a(i - 1) Then
If IsSymPeak(flag, steps) Then count = count + 1
If flag = 0 Or flag = -1 Then
_________
Else
steps = steps + 1
End If
flag = 1
ElseIf a(i) = a(i - 1) Then
If IsSymPeak(flag, steps) Then count = count + 1
steps = 0
flag = 0
Else
steps = steps - 1flag = -1
End If
Next i
If IsSymPeak(flag, steps) Then count = count + 1
Text1.Text = Str(count)
End SubFunction IsSymPeak(flag As Integer, steps As Integer) As Boolean
If __________________ Then
IsSymPeak = True
Else
IsSymPeak = False
End If
End Function