2020年浙江省选考高考信息技术模拟试卷(6月份)
发布:2024/11/23 9:30:2
一、选择题(本大题共12小题,每小题2分,共24分,每小题列出的四个备选项中只有一个是符合题目要求的,不选、错选、多选均不得分。)
-
1.下列关于信息的说法,不正确的是( )
组卷:1引用:2难度:0.9 -
2.下列有关网页和电子邮件的说法,不正确的是( )
组卷:0引用:2难度:0.6 -
3.下列应用中,使用了人工智能技术的有( )
①通过在线翻译网站把中文翻译成英文
②word软件中的“自动更正”功能
③通过语音控制智能音箱播放音乐
④使用二维码生成器生成二维码
⑤通过人脸识别功能登录某支付软件组卷:5引用:2难度:0.6 -
4.用GoldWave软件编辑某音频文件,部分界面如图所示。下列说法正确的是( )
组卷:2引用:2难度:0.2 -
5.使用UltraEdit软件观察字符“AI,人工智能!”的内码,部分界面如图所示:下列说法正确的是( )
组卷:3引用:3难度:0.6
二、非选择题(本大题共4小题,其中第13小题4分,第14小题8分,第15小题7分,第16小题7分,共26分)
-
15.小李基于选择排序思想编写了一个VB程序实现数据排序,排序后奇数在前、偶数在后,奇数和偶数都按升序排序。具体功能如下:产生10个随机整数存数组a,在列表框List中显示,单击“排序”按钮Command1,对数组a排序后在列表框List2中显示。程序运行界面如图所示,实现上述功能的ⅤB代码如下:
Constn=10
Dima(0Ton)AsInteger
PrivateSubForm_Load ( )
′程序功能:产生n个随机整数存数组a,在列表框Listl中显示,代码略。
Endsub
PrivateSubCommand1_Click ( )
DimiAsInteger,jAsInteger,kAsInteger,tAsInteger,flagAsBoolean
i=1:flag=True
DoWhileI<=n-1
IfflagThen
k=0:flag=False
Forj=iTon
Ifa(j)Mod2=1Then
IfThenk=j:flag=True‘改正:
EndIf
Nextj
IfflagThen
IfI<>kThent=a(i):a(i)=a(k):a(k)=t
Else
EndIf
Else
K=i
Forj=i+1Ton
Ifa(j)<a(k)Thenk=j
Nextj
Ifi<>kThent=a(i):a(i)=a(k):a(k)=t
EndIf
i=i+1
Loop
Fori=1Ton
List2.AddItemStr(a(i))
Endsub
(1)代码“Privatesubcommand1_click ( )”中的Click是
(2)将程序代码中横线处代码补充完整。
(3)程序代码中的加框处代码有误,请改正。
(4)程序代码中,flag值为组卷:16引用:2难度:0.3 -
16.小王编写一个VB程序模拟数据筛选,功能如下:程序运行时从数据库中读取成绩数据,按升序排序后在列表框List1中显示,在文本框Text1中输入成绩1,在文本框Text2中输入成绩2,单击“筛选”按钮Command1,筛选出大于等于成绩1且小于等于成绩2的记录,并显示在列表框List2中,程序运行界面如图所示。
(1)运行上述程序,若在文本框Text1中输入75,Text2中输入85,单击“筛选”按钮,则筛选到的记录有
(2)实现上述功能的VB程序如下,请在横线处填入合适代码。
Constn=20
Dimscore(1Ton)AsSingle
Functionadj(sAsString,nAsInteger)
‘此函数功能:在字符串s前添加若干个空格,使其长度变为n。代码略
EndFunction
Functionsearch_left(keyAsInteger)
‘此函数功能:返回大于等于key的数组元素的起始位置。代码略。
EndFunction
Functionsearch_right(keyAsInteger)
DimiAsInteger,jAsInteger,mAsInteger
i=1:j=n
DoWhileI<=j
①
Ifkey>=score(m)Theni=m+1Elsej=m-1
Loop
②
Endfunction
PrivateSubForm_Load ( )
‘从数据库中读取成绩存数组score,记录数存n,并对此数组score升序排序,代码略
Endsub
PrivateSubCommand1Click ( )
DimnumlAsInteger,num2AsInteger,firstAsInteger,lastAsInteger
List2.Clear
num1=Val(Text1.Text):num2=Val(Text2.Text)
first=search_left(num1):last=search_right(num2)
③
Iftotal<=0Then
List2.AddItem″无筛选到的记录!″
Else
List2.AddItem″筛选到″+Str(total)+″条记录!″
List2.AddItem“依次是:″
Fori=firstTolast
List2.AddItemadj(Str(i),3)+adj(Str(score(i)),6)
Nexti
EndIf
Endsub组卷:9引用:1难度:0.3