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
答案:
(1).C
(2).a(n+i)或a(2*n+1-i)(3).k=2*n(4).cnt=cnt-1(5).sum=sum+mts-1
解:
.本题考查的是VB排序及数组应用。
(1)Val是函数名、Text1是对象名、text是属性名,故应选C。
(2)对数组元素a采用的是选择排序,由内循环可知,每次循环只到2*n-1,为了每一遍加工,数据要比较到最后一个,故第一空应填:
k=2*n;如果读取的是进入时间,则人数加1,如果读取的是出去的时间,则人数减1,故第二空应填:
cnt=cnt-1;呆在馆内的时间为:
入馆时间-出馆的时间。
如果记录的入馆人数第一次超过限定人数,记录下时间存在t中,如果记录的入馆人数已经没有超过限定人数,则开始统计呆在馆内的时间。
故第三空应填:
sum=sum+mts-t。
(3)先把入馆时间存储在数组前入馆时间存储在数组后,故加框处应改为:
a(n+i)或a(2*n+1-i)。
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).4
(2).ans(p)=i或ans
(1)=i(3).k=m(4).c(k)=c(k)+c(k+1)
解:
本题考查的是VB综合应用。
(1)该小组最高前4人得分为“12,9,9,5”不低于4,其它得分为“4,3,1,0”不超过4,因此该小组的成绩是4。
(2)数组ans存储的是最大得分的组别,如果第i组的得分大于maxg,则记录到数组ans的第一个位置上,故第一空为:
ans(p)=i或ans
(1)=i;数组e(k)存储的是数组a值为k的人数,m个成员最大返回值为m,如果数组a中的值大于m,全部统计在e(m)中,故第二空应为:
k=m;得分高的人数存放在数组e后头,从最大可能返回值m,依次递减的验证前k个人是否大于k,故第三空应为:
e(k)=e(k)+e(k+1)。
第二部分通用技术(共50分)
一、选择题(本大题共13小题,每小题2分,共26分。
每小题到出的四个备选项中只有一个是符合题目要求的,不选、多选、错选均不得分)
1.如图所示是一种恒温电烙铁。
从人机关系的角度,下列分析中不正确的是()
A.手柄尺寸的确定,考虑了人的静态尺寸
B.通电时指示灯发光,考虑了信息的交互
C.手柄采用绝缘材料制作,实现了人机关系的安全目标
D.电线防折护套的设计,实现了人机关系的高效目标
答案:
D
2.如图所示是一款手持充电式紫外线杀菌器及其评价坐标图。
根据坐标图,下列分析中不恰当的是()