2020-2021学年浙江省精诚联盟高三(上)月考信息技术试卷(12月份)
发布:2024/4/20 14:35:0
一、选择题(本大题12小题,每小题2分,共24分。在每小题给出的四个选项中,只有一个是符合题目要求)
-
1.下列有关信息技术和信息处理的说法,正确的是( )
组卷:1引用:1难度:0.6 -
2.下列有关网页和协议的说法中,正确的是( )
组卷:2引用:1难度:0.6 -
3.下列应用中,体现了人工智能技术的有( )
①通过识别名片自动添加手机联系人
②疫情期间使用“钉钉”直播授课
③全自动无人驾驶的汽车
④手机扫描二维码自动跳转到付款页面
⑤使用在线翻译将中文转换为英文组卷:8引用:1难度:0.5 -
4.使用Access软件打开数据库,部分界面如图所示。下列说法正确的是( )
组卷:2引用:1难度:0.7 -
5.用Photoshop软件制作“中国梦”作品,在“中国梦”图层中已选择“中国”区域,如图所示。下列说法正确的是( )
组卷:3引用:2难度:0.7
二、非选择题(本大题共4小题,其中第13小题4分,第14小题8分,第15小题7分,第16小题7分,共26分)
-
15.根据对分查找的思想来查找两个递增序列中最小值所在的位置,其中第一个递增序列中的数据全部大于第二个递增序列中的数据,且两个序列中没有重复数据,如组合序列3、4、5、6、1、2是由两个递增序列“3、4、5、6”和“1、2”组成的,组合序列的最小值是1,在组合序列中的位置是第5位。
为实现上述功能,小王编写如下VB程序,首先在Text1中输入两个满足条件的序列,数字之间用“,”隔开且以“,”结尾,单击按钮“Cod1”,在Text2中输出最小值所在序列中的位置,程序运行界面如图所示。
(1)在界面中,具有Caption属性的对象有
(2)在横线处填入合适的代码。
①
②
③
(3)加框处的表达式有误,请改正。
改正:
PrivateSubCod1_Click ( )
DimsAsString,chAsString
DimiAsInteger,jAsInteger,nAsInteger,cAsInteger
Dima(100)AsInteger
s=Text1.Text:c=0:n=0
Fori=1ToLen(s)
ch=Mid(s’i,1)
Ifch>=“0“Andch<=“9“Then
①
Else
n=n+1
②
c=0
EndIf
Nexti
i=1:j=n
DoWhile
m=(i+j)\2
Ifa(m)>a(i)Then
i=m
Else
j=m
EndIf
Loop
③
EndSub组卷:0引用:1难度:0.3 -
16.某著名景点在七月份收到若干旅游公司的通告,通告中包括该公司旅游的起始时间和终止时间,如[6,10]表示该旅行团6号早上到,10号早上回。疫情期间为避免人员扎堆,公司在时间段[start,ending]进行限流操作,要求在该时间段内景点每天都接待游客,且接待的旅行团越少越好。若景点收到的旅行团的数据是[3,8]、[3,6]、[8,15]、[18,25]、[14,20]、[5,10],[10,18]、[13,18]限流时间是[4,19]。工作人员对旅行团的数据做了如下处理:
①将旅行团的旅行时间按照“到达时间”为主要关键字,“返回时间”为次要关键字升序排序。排好序的时间段是[3,6]、[3,8]、[5,10]、[8,15]、[10,18]、[13,18],[14,20]、[18,25].
②从前往后遍历时间段,选择“到达时间”不大于“限流开始时间”的时间段,若有多个时间段满足条件,且时间段未超出限流时间,应选择“返回时间”最大的时间段,选择的时间段是[3,8]。
③缩小限流时间[8,19],重复步骤2,选择满足条件的时间段是[8,15],缩小限流时间[15,19],重复步骤2,选择满足条件的时间段是[14,20],结束时间已超过限流终止时间,结束。
④若在遍历时间过程中出现“到达时间”大于“限流开始时间”,景点不能每天接待旅客,则没有满足条件的旅行社。
小王编写VB程序,程序界面如下所示,单击“排序”按钮,将旅行团的时间按照“到达时间”为主要关键字,“返回时间”为次要关键字升序排序,在Text1和Text2中输入限流的起始时间和终止时间,单击“满足条件的旅行团”按钮,在列表框输出满足条件的旅行团的时间,若没有满足条件的旅行社,则在列表框输出“没有满足条件的旅行团!”
回答下列问题:
(1)若景点接收到的旅行社的起始时间和终止时间分别为[5,17]、[7,18]、[4,12]、[3,8]、[2,10],限流时间是[3,15],筛选出的旅行团的时间是
(2)请在横线处填入合适的代码
DimiAsInteger,jAsInteger,nAsInteger,tAsIntegerDima(100)AsInteger,b(100)AsInteger
PrivateSubCommand1_Click ( )
'将旅行团个数存入n,加载n个旅行团的起始时间、终止时间并分别放在数组a和数组b中,代码略
Fori=nto2step-1
j=1
Dowhile ①
Ifa(j)>a(j+1)Ora(j)=a(j+1)Andb(j)>b(j+1)Then
t=a(j):a(j)=a(j+1):a(j+1)=t
t=b(j):b(j)=b(j+1):b(j+1)=t
EndIf
j=j+1
Loop
Nexti
'输出排好序的时间段,代码略
EndSub
PrivateSubCommand2_Click ( )
DimarrivetimeAsInteger,leavetimeAsInteger
start=Val(Text1-Text):ending=Val(Text2.Text)
Fori=1Ton
arrivetime=start
Ifa(i)<=arrivetimeThen
Ifb(i)>leavetimeThenleavetime=b(i):t=i
If ②
List2.AddItemStr(a(t))&″---″&Str(b(t))ExitFor
EndIf
Else
Ifstart<arrivetimeori=1Then
List2.Clear
List2.AddItem“没有满足条件的旅行团!“
ExitFor
EndIf
List2.AddItemStr(a(t))&″---″&Str(b(t))
③
i=i-1
EndIf
Nexti
EndSub组卷:0引用:1难度:0.6