Nextj
s=a（i）：
a（i）=a（k）：
a（k）=s
Nexti
sp=Val（Text1，Text）
t=-1：
cnt=0：
sum=0
Fori=1To2*n
mts=Val（Mid（a（i），1，2））*60+Val（Mid（a（i），4，2））
IfMid（a（i），6，2）=“IN”Thencnt=cnt+1Else__
Ifcnt>spThen
Ift=-1Thent=mts
Elselft>-1Then
__
t=-1
EndIf
Nexti
Label1.Caption="超过指定人数的总时长：
"+Str（sum）+"分钟"
EndSub
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）请在划线处填入合适的代码。
Constn=6
Constm=8
Dima（n*m）AsInteger
Dimc（m）AsInteger，ans（n）AsInteger
PrivateSulbForm_Load（）
’读取n个小组每个成员的得分，按组别从小到大依次存入数组a，并显示在List1中
’n（l）到a（m）存储第1小组m个成员的得分
’a（m+1）到a（2*m）存储第2小组m个成员的得分
’以此类推，代码略
EndSub
PrivuteSubCummand1_Click（）
DimiAsInteger，pAsInteger，gAsInteger，maxgAsInteger
maxg=-1
Fori=lTon
g=GroupScore（i）
Ifg>maxgThen
maxg=g:
p=l
__
Elselfg=maxgThen
p=p+1
ans（p）=i
EndIf
Nexti
Fori=lTop
List2.Addltcm“第”+Str（ans（i））+“组，成绩：
”+Str（maxg）
Nexti
EndSulb
函数返回第w小组的成绩
FunctionGroupScone（wAsInteger）AsInteger
DimiAsInteger，kAsInteser
Fori=0Tom
e（i）=0
Nexti
Fori=（w-l）*m+lTow*m
k=a（i）
Ifk>mThen__
e（k）=e（k）+1
Nexli
k=m
DoWhitee（k）0
k=k-1
__
Loop
GroupScore=k
EndFuinction
绝密★启用前
技术试题
注意事项：
1、答题前填写好自己的姓名、班级、考号等信息2、请将答案正确填写在答题卡上
第一部分信息技术（共50）
一、选择题（本大题共12小题，每小题2分，共24分。
每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分）
1.下列有关信息与信息技术的说法，正确的是（）
A.5G技术的出现使信息可以脱离载体传播
B.计算机处理信息通过执行程序完成的
C.智能处理得到
信息都是真实、可信的
D.当今社公信息时时处处都有，因而不再是人类的重要资源
答案：
B
解：
本题考查的是信息与信息技术相关知识。
信息必须依附在载体上，故选项A说法错误；计算机处理信息都是通过执行程序完成的，选项B说法正确；智能处理得到的信息不一定是真实、可信的，选项C说法错误；信息是构成人类社会重要资源之一，故选项D说法错误。
2.下列有关网页与浏览器的说法，正确的是（）
A.HTTP协议用于浏览器与Web服务器之间的信息传输
B.收藏夹中的网址可以重命名，但不能被删除
C.在IE浏览器中，保存一个网页不可能得到多个文件
D.使用不同的搜索引擎搜索同一关键词，搜索的结果是相同的
答案：
A
解：
本题考查的是网页与浏览器相关知识。
HTTP是超文本传输协议，用于浏览器和Web服务器之间的信息传输，选项A说法正确；收藏夹中的网址可以重命名也可以删除，故选项B说法错误；浏览器中以“网页，全部”保存，可以保存网页的所有内容，会生成多个文件，故选项C说法错误；不同的搜索引擎采集的数据不一样，故搜索的结果是不同的，选项D说法错误。
3.使用Access软件编辑某班级图书管理数据库，该数据库当前仅包含“班级藏书”一个数据表，部分界面如图所示。
下列说法正确的是（）
A.该数据库中不可以创建一个表名为“借阅人”的数据表
B.“收藏日期”字段的数据类型是“日期/时间”
C.可以将“班级藏书”数据表导出为Excel文件
D.若添加一条新记录，则该记录中“书籍编号”字段的值为2
答案：
C
解：
本题考查的是Access数据库相关知识。
该数据库当前仅有“班级藏书”表，故还可以创建一个“借阅人”表，选项A说法错误；收藏日期字段含有数据“2020/11/15”又有“2020-12-1”故不可能为日期/时间类型，选项B说法错误；Access表可以导出为Excel文件，故选项C说法正确；由图中可知书籍编号为自动编号，删除后添加新记录该序号也不会再出现，故选项D说法错误。
4.下列有关信息编码的说法，正确的是（）
A.十六进制数82H与十进制数82的值相等
B.根据GB2312-80标准，“信息”两字的内码共占2个字节
C.已知大写字母“X”的ASCII码值为58H，则大写字母“Z”的ASCII码值是60H
D.某7位二进制数的最高位为1，将其转换为十进制数后的值大于等于64
答案：
D
解：
本题考查的是信息编码相关知识。
十六进制数82H转换为十进制数为：
8*16+2=130。
故选项A说法错误；GB2312编码规则，一个汉字占两个字节，“信息”两字的内码共占4个字节，故选项B说法错误；ASCII码中大写字母编码是从A~Z依次进行，“H”表示十六进制数，故字母“Z”的ASCII码值是5AH，选项C说法错误；7位二进制数的最高位为1，最高位权值为：
2^6=64，故其转换为十进制数后的值大于等于64，选项D说法正确。
5.用Photoshop软件制作“春来了”作品，部分编辑界面如图所示。
下列说法错误的是（）
A.“背景”图层的不透明度不可以更改为50%
B.“花朵”图层的名称可更改为“郁金香”
C.“来了”图层中的文字可用橡皮擦工具直接擦除
D.对“蝴蝶”图层执行“复制图层”操作，可产生一个“蝴媒副本”图层
答案：
C
解：
本题考查的是Photoshop相关知识。
斜体“背景”图层不能更改图层名、图层顺序、图层不透明度（填充）、图层混合选项，不能添加图层样式，故选项A说法正确；锁定图层可以修改图层名称，故选项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位色
答案：
B
解：
本题考查的是图像大小计算。
未压缩图像存储容量=水平像素×垂直像素×每个像素色彩所需位数/8（单位：
字节）。
16色需要4位二进制，256需要8位二进制数，根据图像容量计算公式可知选项A大小为：
0.375MB，选项B大小为：
1.5MB，选项C大小为：
0.185MB，选项D大小为：
0.5625MB，故本题应选B。
7.VB表达式-3^2+14\4*3的值是（）
A.-8B.0C.10D.8
答案：
A
解：
本题考查的是VB表达式。
运算顺序：
“^”是乘幂>“*”乘法>“\”整数除。
-3^2+14\4*3=-9+14\12=-9+1=-8，故本题应选A。
8.某算法的部分流程图如图所示，执行这部分流程，若输入n的值为20，则输出a，b的值分别是（）
A.12，10B.10，9C.9，15D.9，10
答案：
D
解：
本题考查的是流程图相关知识。
初始值：
n=20a=0b=0。
n>=3成立，a<=b成立，执行a=a+3=3，n=n-3=17
n>=3成立，a<=b不成立，执行b=b+5=5，n=n-5=12
n>=3成立，a<=b成立，执行a=a+3=6，n=n-3=9
n>=3成立，a<=b不成立，执行b=b+5=10，n=n-5=4
n>=3成立，a<=b成立，执行a=a+3=9，n=n-3=1
n>=3不成立，输出a=9，b=10，故本题应选D。
9.有百位和十位未知的5位整数“22**6，能被37或67整除。
以下VB程序段的功能是：
在满足条件的所有数中，将最大一个5位数的百位和十位依次显示在文本框Text1中。
i=100：
flag=False
DoWhilei>0AndNotflag
Loop
Text1.Text=Str（i\10）+Str（iMod10）
方框中的代码由以下三部分组成：
①j=22006+i*10②i=i-1③If（jMod37）*（JMod67）=0Thenflag=True
下列选项中，代码顺序正确的是（）
A.①②③B.①③②C.②①③D.②③①
答案：
C
解：
本题考查的是VB循环及选择语句。
要先从22996开始，依次递减来判断能否被37或67整除，找到第一个能被整除的数，即为所要找的数，i初始值为100，故要先执行i=i-1。
故正确的代码顺序是：
②①③，选项C正确。
10.某对分查找算法的VB程序段如下：
i=1：
j=30
m=（i+j）\2
DoWhilei<=jAndkey<>a（m）
Ifkey>a（m）Theni=m+1Elsej=m-1
m=（i+j）\2①
Loop
数组元素a
（1）到a（30）各不相同且按升序排列，若查找键key与a（9）相等，执行该程序段，①处语句的执行次数是（）
A.2B.3C.4D.5
答案：
B
解：
本题考查
是对分查找。
初始i=1，j=30，m=（i+j）\2=15，数组升序排序。
i=1<=j=30key<>a（15）成立，key>a（15）不成立，执行j=m-1=14，m=（i+j）\2=7。
i=1<=j=14key<>a（7）成立，key>a（7）成立，执行i=m+1=8，m=（i+j）\2=11。
i=8<=j=14key<>a（11）成立，key>a（11）不成立，执行j=m-1=10，m=（i+j）\2=9。
i=8<=j=10key<>a（9）不成立，跳出循环。
故①处语句的执行次数是3次，选项B正确。
11.有如下VB程序段：
a
（1）="ABC"：
a
（2）="DEF"：
a（3）="GHI"
s1="31，12，23，33"：
s2=""
Fori=1ToLen（s1）
ch=Mid（s1，i，1）
Ifch<>"，"Then
i=i+1
p=Val（Mid（s1，i，1））
s2=s2+Mid（a（p），Val（ch），1）
EndIf
Nexti
执行该程序段后，变量s2的值是（）
A.“CDHI”B.“GBFI”C.“CDH”D.“GBF”
答案：
A
解：
本题考查的是VB循环及选择语句。
阅读程序可知s1中每个数字中第二个数字是决定从哪个数组a中取值，第一个数字是决定取第几个值，取完后依次链接在后面。
读取31时候取到的字符是“C”，读取12时候取到的字符是“D”，读取23
升级会员 