搜索
全一卷
难度系数：0.94 
答案解析
有奖纠错
1．下列有关信息与信息技术的说法，正确的是（ ）
| A．5G技术的出现使信息可以脱离载体传播 |
| B．计算机处理信息通过执行程序完成的 |
| C．智能处理得到的信息都是真实、可信的 |
| D．当今社会信息时时处处都有，因而不再是人类的重要资源 |
2．下列有关网页与浏览器的说法，正确的是（ ）
| A．HTTP协议用于浏览器与Web服务器之间的信息传输 |
| B．收藏夹中的网址可以重命名，但不能被删除 |
| C．在IE浏览器中，保存一个网页不可能得到多个文件 |
| D．使用不同的搜索引擎搜索同一关键词，搜索的结果是相同的 |
3．使用Access软件编辑某班级图书管理数据库，该数据库当前仅包含“班级藏书”一个数据表，部分界面如图所示。
下列说法正确的是（ ）
下列说法正确的是（ ）
| A．该数据库中不可以创建一个表名为“借阅人”的数据表 |
| B．“收藏日期”字段的数据类型是“日期/时间” |
| C．可以将“班级藏书”数据表导出为Excel文件 |
| D．若添加一条新记录，则该记录中“书籍编号”字段的值为2 |
4．下列有关信息编码的说法，正确的是（ ）
| A．十六进制数82H与十进制数82的值相等 |
| B．根据GB2312-80标准，“信息”两字的内码共占2个字节 |
| C．已知大写字母“X”的ASCII码值为58H，则大写字母“Z”的ASCII码值是60H |
| D．某7位二进制数的最高位为1，将其转换为十进制数后的值大于等于64 |
5．用Photoshop软件制作“春来了”作品，部分编辑界面如图所示。下列说法错误的是（ ）
| A．“背景”图层的不透明度不可以更改为50% |
| B．“花朵”图层的名称可更改为“郁金香” |
| C．“来了”图层中的文字可用橡皮擦工具直接擦除 |
| D．对“蝴蝶”图层执行“复制图层”操作，可产生一个“蝴媒副本”图层 |
6．一幅未经压缩的2048×1536像素、24位色BMP图像，要将其存储容量减少到约1.5MB，在不改变其他参数的前提下，可调整图像大小、颜色分别为（ ）
| A．1024×768像素、16色 | B．1024×768像素、16位色 |
| C．512×384像素、256色 | D．512×384像素、24位色 |
7．VB表达式-3^2+14\4*3的值是（ ）
| A．-8 | B．0 | C．10 | D．8 |
8．某算法的部分流程图如图所示，执行这部分流程，若输入n的值为20，则输出a，b的值分别是（ ）
| A．12，10 | B．10，9 | C．9，15 | D．9，10 |
9．有百位和十位未知的5位整数“22**6，能被37或67整除。以下VB程序段的功能是：在满足条件的所有数中，将最大一个5位数的百位和十位依次显示在文本框Text1中。
i=100：flag=False
Do While i>0 And Not flag
Loop
Text1. Text = Str（i\10）+Str（i Mod 10）
方框中的代码由以下三部分组成：
①j=22006+i*10 ②i=i-1 ③If（j Mod 37）*（J Mod 67）=0 Then flag = True
下列选项中，代码顺序正确的是（ ）
i=100：flag=False
Do While i>0 And Not flag
| |
Text1. Text = Str（i\10）+Str（i Mod 10）
方框中的代码由以下三部分组成：
①j=22006+i*10 ②i=i-1 ③If（j Mod 37）*（J Mod 67）=0 Then flag = True
下列选项中，代码顺序正确的是（ ）
| A．①②③ | B．①③② | C．②①③ | D．②③① |
10．某对分查找算法的VB程序段如下：
i=1：j=30
m=（i+j）\2
Do While i < = j And key < > a（m）
If key >a（m） Then i = m+1 Else j = m-1
m=（i+j）\2 ①
Loop
数组元素a（1）到a（30）各不相同且按升序排列，若查找键key与a（9）相等，执行该程序段，①处语句的执行次数是（ ）
i=1：j=30
m=（i+j）\2
Do While i < = j And key < > a（m）
If key >a（m） Then i = m+1 Else j = m-1
m=（i+j）\2 ①
Loop
数组元素a（1）到a（30）各不相同且按升序排列，若查找键key与a（9）相等，执行该程序段，①处语句的执行次数是（ ）
| A．2 | B．3 | C．4 | D．5 |
11．有如下VB程序段：
a（1）="ABC"：a（2）="DEF"：a（3）="GHI"
s1="31，12，23，33"：s2=" "
For i = 1 To Len（s1）
ch = Mid（s1，i，1）
If ch <> "，" Then
i=i+1
执行该程序段后，变量s2的值是（ ）
a（1）="ABC"：a（2）="DEF"：a（3）="GHI"
s1="31，12，23，33"：s2=" "
For i = 1 To Len（s1）
ch = Mid（s1，i，1）
If ch <> "，" Then
i=i+1
p=Val（Mid（s1，i，1））
s2=s2+Mid（a（p），Val（ch），1）
End If
Next i执行该程序段后，变量s2的值是（ ）
| A．“CDHI” | B．“GBFI” | C．“CDH” | D．“GBF” |
12．如下VB程序段实现对数组元素a（1）到a（10）从小到大排序。
i=1
Do While i<10
End If
Next j
Loop
则代码中①处的语句可为（ ）
i=1
Do While i<10
k=i：i=10
For j=10 To k + 1 Step -1
If a（j）<a（j-1） Then
t=a（j）：a（j）=a（j-1）：a（j-1）=1
①
End If
Next j
Loop
则代码中①处的语句可为（ ）
| A．i=i+1 | B．i=j+1 | C．i=k-1 | D．i=j |
13．收集某中学两个班级体质健康测试数据，并对部分项目用Excel软件进行数据处理，如图a所示。
请回答下列问题：
（1）区域G3：G82的数据是通过公式计算得到的，在G3单元格中输入公式________ ，再使用自动填充功能完成区域G4：G82的计算。（提示：体重指数=体重/身高2，单位：千克/米2）
（2）对区域A2：G82进行相关数据分析，下列说法正确的是_______ （多选，填字母）。
A．更新C列身高数据，G列体重指数的值会随之改变
B．为了将女生身高最高的数据显示在当前工作表第3行，可选择身高为主要关键字、性别为次要关键字均按降序排序
C．为了显示男生1000/800米得分大于85的数据，可先对“性别”进行筛选，选择的值为“男”，再对“1000/800米得分”进行筛选，条件为大于85
D．为了显示女生肺活量得分最高的3位学生数据，可先对“性别”进行筛选，选择的值为“女”，再对“肺活量得分”进行筛选，选择“10个最大的值”并显示最大的3项
（3）对图a中的数据进行相关统计，结果放在新工作表中，如图b所示。根据图b中的数据制作的图表如图c所示，创建该图表的数据区域是________ 。
请回答下列问题：
（1）区域G3：G82的数据是通过公式计算得到的，在G3单元格中输入公式
（2）对区域A2：G82进行相关数据分析，下列说法正确的是
A．更新C列身高数据，G列体重指数的值会随之改变
B．为了将女生身高最高的数据显示在当前工作表第3行，可选择身高为主要关键字、性别为次要关键字均按降序排序
C．为了显示男生1000/800米得分大于85的数据，可先对“性别”进行筛选，选择的值为“男”，再对“1000/800米得分”进行筛选，条件为大于85
D．为了显示女生肺活量得分最高的3位学生数据，可先对“性别”进行筛选，选择的值为“女”，再对“肺活量得分”进行筛选，选择“10个最大的值”并显示最大的3项
（3）对图a中的数据进行相关统计，结果放在新工作表中，如图b所示。根据图b中的数据制作的图表如图c所示，创建该图表的数据区域是
14．使用Flash软件创作“绿水青山”多媒体作品，部分编辑界面如图所示。
请回答下列问题：
（1）在创作之前进行了作品设计，下列说法正确的是_________ （多选，填字母）。
A．考虑作品创作及运行需要的硬件和软件，属于作品的应用需求分析
B．考虑作品的用户情况和作品效益，属于作品的创作需求分析
C．将作品划分为片头，主交互界面、片尾等组成部分，属于系统结构设计
D．描述作品每个场景的展示内容及呈现方式，属于制订脚本大纲
E．制订处理各种多媒体素材的方案，属于媒体元素分解
（2）测试影片时，动画播放到当前场景第60帧自动停止，则“按钮”图层第60帧的动作脚本是_______ （单选，填字母：A．stop（60）；/B．stop（）；），单击第60帧中的“重播”按钮实现从该帧跳转到当前场景第1帧并播放，则该按钮实例上添加的动作脚本是on（release）_________ （单选，填字母：A．play（）；/B．gotoAndPlay（1）；）。
（3）“文字”图层第15帧中仅有的对象云朵为形状，该帧已设置形状补间。测试场景时，第15帧到第30帧没有实现从云朵渐变为“绿水青山”的形状补间效果，原因是_____ 。
（4）“小船”图层中小船都是“船”元件的实例。为了使小船在测试场景时从第41帧到第60帧在舞台上消失，其他动画效果保持不变，下列操作方法可行的是______ （多选，填字母）。
A．将该图层移动到“背景”图层下方
B．选中该图层第41帧到第60帧执行“删除帧”操作
C．选中该图层第41帧执行“清除帧”操作
D．选中该图层第41帧执行“插入空白关键帧”操作
E．选中该图层第41帧执行“插入关他帧”操作，并将该帧中小船实例的Alpha值设为0%
请回答下列问题：（1）在创作之前进行了作品设计，下列说法正确的是
A．考虑作品创作及运行需要的硬件和软件，属于作品的应用需求分析
B．考虑作品的用户情况和作品效益，属于作品的创作需求分析
C．将作品划分为片头，主交互界面、片尾等组成部分，属于系统结构设计
D．描述作品每个场景的展示内容及呈现方式，属于制订脚本大纲
E．制订处理各种多媒体素材的方案，属于媒体元素分解
（2）测试影片时，动画播放到当前场景第60帧自动停止，则“按钮”图层第60帧的动作脚本是
（3）“文字”图层第15帧中仅有的对象云朵为形状，该帧已设置形状补间。测试场景时，第15帧到第30帧没有实现从云朵渐变为“绿水青山”的形状补间效果，原因是
（4）“小船”图层中小船都是“船”元件的实例。为了使小船在测试场景时从第41帧到第60帧在舞台上消失，其他动画效果保持不变，下列操作方法可行的是
A．将该图层移动到“背景”图层下方
B．选中该图层第41帧到第60帧执行“删除帧”操作
C．选中该图层第41帧执行“清除帧”操作
D．选中该图层第41帧执行“插入空白关键帧”操作
E．选中该图层第41帧执行“插入关他帧”操作，并将该帧中小船实例的Alpha值设为0%
15．根据某场馆一天中每位参观者的进馆和出馆时间，可统计该场馆当天人流量的分布情况。每个人进、出馆的时间用一个长度为11的字符串表示，例如“08：05-08：45”表示进馆时间为8点5分，出馆时间为8点45分。现要求统计当天馆内人数超过指定人数的总时长。
根据上述要求编写VB程序，功能如下：读取n个人进，出馆的时间，显示在列表框List1中。程序运行时，在文本框Text1中输入指定人数，单击“统计”按钮Command1，在标签Label1中显示馆内人数超过指定人数的总时长。程序运行界面如图所示。
（1）在VB表达式Va1（Text1.Text）中，Va1、Text1、Text依次表示______（单选，填字母：A．方法名、属性名、事件名/B．函数名、对象名、方法名/C．函数名、对象名、属性名）。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
（3）程序中加框处代码有错，请改正。______
Const n = 800
Dim d（1 To n）As String，a（1 To 2 * n）As String
End Sub
Private Sub Command 1_ Cliek（）
a（i）=Mid（d（i），1，5）+"IN"
= Mid（d（i），7，5）+"OUT"
Next i
For i = 1 To 2 * n-1 对数组元素a（1）到a（2*n）从小到大排序
__
For i = i To 2 * n-1
If a（j） < a（k） Then k = j
Next j
s = a（i）：a（i） = a（k）：a（k）=s
Next i
If cnt > sp Then
If t = -1 Then t = mts
Elself t > -1 Then
__
t=-1
Label1.Caption = "超过指定人数的总时长："+Str（sum）+"分钟"
End Sub
根据上述要求编写VB程序，功能如下：读取n个人进，出馆的时间，显示在列表框List1中。程序运行时，在文本框Text1中输入指定人数，单击“统计”按钮Command1，在标签Label1中显示馆内人数超过指定人数的总时长。程序运行界面如图所示。
（1）在VB表达式Va1（Text1.Text）中，Va1、Text1、Text依次表示______（单选，填字母：A．方法名、属性名、事件名/B．函数名、对象名、方法名/C．函数名、对象名、属性名）。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
（3）程序中加框处代码有错，请改正。______
Const n = 800
Dim d（1 To n）As String，a（1 To 2 * n）As String
Private Sub Form_Load（）
’读取n个人进、出馆的时间，存入数组d并显示在列表框List1中，代码略End Sub
Private Sub Command 1_ Cliek（）
Dim i As Integer，j As Integer，k As Integer，sp As Integer
Dim i As Integer，cnt As Integer，mts As Integer，sum As Integer
Dim s As String
’提取每个人的进，出馆时间，分别加上IN、OUT标记后存入数组a
For i = l To na（i）=Mid（d（i），1，5）+"IN"
= Mid（d（i），7，5）+"OUT"Next i
For i = 1 To 2 * n-1 对数组元素a（1）到a（2*n）从小到大排序
__
For i = i To 2 * n-1
If a（j） < a（k） Then k = j
Next j
s = a（i）：a（i） = a（k）：a（k）=s
Next i
sp =Val（Text1，Text）
t=-1：cnt=0：sum=0
For i = 1 To 2 * n
mts=Val（Mid（a（i），1，2））*60+Val（Mid（a（i），4，2））
If Mid（a（i），6，2）=“IN” Then cnt = cnt + 1 Else __If cnt > sp Then
If t = -1 Then t = mts
Elself t > -1 Then
__
t=-1
End If
Next iLabel1.Caption = "超过指定人数的总时长："+Str（sum）+"分钟"
End Sub
16．有n个小组（编号1至n），每个小组有m个成员，每个成员都有一个大于等于0的得分。现要求按下列规则计算每个小组的成绩，并找出成绩最高的小组。
小组成绩的计算规则是：若小组成员中得分最高的前k人得分都不低于k，且其他成员得分都不超过k，则该小组成绩为k。例如，第1小组共有8个成员，得分依次为“5，2，7，11，8，6，5，1”，由此可知最高的前5人得分为“11，8，7，6，5”，其他3人得分为“5，2，1”，因此该小组成绩为5。
按上述要求，编写VB程序，功能如下：在列表框List1中显示各小组每个成员的得分，单击“计算”按钮Command1，在列表框List2中显示成绩最高的小组编号及成绩（如果有多个小组并列最高，则全部显示）。
（l）若第2小组各成员得分依次为“0，4，12，l，5，9，3，9”，则该小组的成绩是_______。
（2）请在划线处填入合适的代码。
Const n = 6
Const m = 8
Dim a（n * m）As Integer
Dim c（m）As Integer，ans（n）As Integer
Private Sulb Form_Load（）
’读取n个小组每个成员的得分，按组别从小到大依次存入数组a，并显示在List1中
’n（l）到a（m）存储第1小组m个成员的得分
’a（m+1）到a（2*m）存储第2小组m个成员的得分
’以此类推，代码略
End Sub
Privute Sub Cummand 1_Click（）
Dim i As Integer，p As Integer，g As Integer，maxg As Integer
g = GroupScore（i）
If g > maxg Then
Elself g = maxg Then
p=p+1
ans（p）=i
End If
Next i
For i = l To p
End Sulb
函数返回第w小组的成绩
Function Group Scone（w As Integer）As Integer
Nexl i
k=m
GroupScore=k
End Fuinction
小组成绩的计算规则是：若小组成员中得分最高的前k人得分都不低于k，且其他成员得分都不超过k，则该小组成绩为k。例如，第1小组共有8个成员，得分依次为“5，2，7，11，8，6，5，1”，由此可知最高的前5人得分为“11，8，7，6，5”，其他3人得分为“5，2，1”，因此该小组成绩为5。
按上述要求，编写VB程序，功能如下：在列表框List1中显示各小组每个成员的得分，单击“计算”按钮Command1，在列表框List2中显示成绩最高的小组编号及成绩（如果有多个小组并列最高，则全部显示）。
（l）若第2小组各成员得分依次为“0，4，12，l，5，9，3，9”，则该小组的成绩是_______。
（2）请在划线处填入合适的代码。
Const n = 6
Const m = 8
Dim a（n * m）As Integer
Dim c（m）As Integer，ans（n）As Integer
Private Sulb Form_Load（）
’读取n个小组每个成员的得分，按组别从小到大依次存入数组a，并显示在List1中
’n（l）到a（m）存储第1小组m个成员的得分
’a（m+1）到a（2*m）存储第2小组m个成员的得分
’以此类推，代码略
End Sub
Privute Sub Cummand 1_Click（）
Dim i As Integer，p As Integer，g As Integer，maxg As Integer
maxg = -1
For i = l To ng = GroupScore（i）
If g > maxg Then
maxg = g:p=l
__Elself g = maxg Then
p=p+1
ans（p）=i
End If
Next i
For i = l To p
List2. Addltcm“第”+Str（ans（i））+“组，成绩：”+Str（maxg）
Next iEnd Sulb
函数返回第w小组的成绩
Function Group Scone（w As Integer）As Integer
Dim i As Integer，k As Inteser
For i = 0 To me（i）=0
Next iFor i=（w-l）*m+l To w *m
k=a（i）If k > m Then __
e（k）=e（k）+1Nexl i
k=m
Do White e（k）< k And k>0
k=k-1__
LoopGroupScore=k
End Fuinction
