2020年浙江省杭州市建人高复高考信息技术模拟试卷（4月份）
发布：2024/11/2 12:0:2
一、选择题（本大题共12小题，每小题2分，共24分．每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分）
-
1．下列有关信息说法错误的是（ ）
组卷：3引用：1难度：0.7 -
2．使用OCR软件将一篇报纸中的文字识别为文字，后在Word软件中进行排版与编辑，部分编辑界面如图所示，下列说法正确的是（ ）
组卷：2引用：1难度：0.6 -
3．下列不属于人工智能技术应用的是（ ）
组卷：2引用：2难度：0.6 -
4．使用ACCESS软件创建“图书馆藏书登记”数据表，其设计视图部分界面如图所示。下列说法正确的是（ ）组卷：0引用：1难度：0.7 -
5．使用UltraEdit软件查看字符内码，界面如图所示，下列分析正确的是（ ）
组卷：6引用：1难度：0.5
二、非选择题（本大题共4小题，第13小题4分，第14小题8分，第15小题7分，第16小题7分，共26分）
-
15．小明编写了一个有关整数闭区间合并操作的VB程序：从数据库读取闭区间数据（左端点和右端点），存储在数组a中，按区间数据左端点升序排序，然后进行合并操作，操作结果存储在数组b中。
例如，读取的数据为2、3、15、25、10、14、1、5、30、60、15、25，过程是：
（1）设置区间信息为[2，3]，[15，25]，[10，14]，[1，5]，[30，60]，[15，25]；
（2）按区间左端点升序排序，得到J区间信息为[1，5]，[2，3]，[10，14]，[15，25]，[15，25]，[30，60]，[15，25]；
（3）合并区间，得到[1，5]，[10，25]，[30，60]．说明：区间[1，5]和[2，3]合并为[1，5]，区间[10，14]和[15，25]合并为[10，25]，区间[10，25]和[15，25]合并为[10，25]，因此合并后的结果为：[1，5]，[10，25]，[30，60]三个区间。
程序功能如下：单击“读数据库”按钮Command1，程序从数据库读取数据，输出在文本框Text1中；单击“开始处理”按钮Command2，程序进行区间排序，并进行区间合并操作，操作后的结果输出在文本框Text2中。程序运行结果如图所示。
实现上述功能的VB程序如下，请回答下列问题：
（1）PrivateSubCommand1_CIick （ ）中的Click（ ） 是（单选，填字母：A对象名、B属性名、C事件名、D事件处理过程名）
（2）从数据库中读入的区间为[1，10]，[15，20]，[6，18]，[25，30]，[31，200]，则合并操作后的区间为。
（3）请在横线处填入合适的代码。
Dima（lTo100）AsInteger′数组a存储合并前的区间
Dimb（lTo100）AsInteger′数组b存储合并后的区间
DimnAsInteger′n表示区间个数
PrivateSubCommand1_Click （ ）
Dims1AsString,iAsInteger
'读取数据，并存储到数组a中，并输出在文本框Text1中，代码略
EndSub
PrivateSubCommand2_Click （ ）
Dims2AsString,iAsInteger,jAsInteger,kAsInteger
DimnAsInteger,tAsInteger,xAsInteger
Fori=1Ton-1
Forj=1To2*n-2*iStep2
If①Then
t=a（j）：a（j）=a（j+2）：a（j+2）=t
t=a（j+1）：a（j+1）=a（j+3）：a（j+3）=t
EndIf
Nextj
Nexti
k=2
b（1）=a（1）：b（2）=a（2）
i=2：j=3
DoWhilej＜=2*n
Ifb（i）＞=a（j）Then
Ifb（i）＜=a（j+1）Then ②
ElseIfb（i）+1=a（j）Then
b（k）=a（j+l）
Else
k=k+1：③
k=k+1：b（k）=a（j+1）
i=i+2
EndIf
j=j+2
Loop
Forx=1Tok-2Step2
s2=s2&″[″&b（x）&″，″&b（x+1）&″]″&″，″
Nextx
s2=s2&″[″&b（x）&″，″&b（x+1）&″]″
Text2．text=s2
EndSub组卷：8引用：1难度：0.3 -
16．某编码由4个信息位和3个校验位组成，通过对编码信息进行验算，能够检测并纠正一位错误代码。该7位编码中b1～b4为信息位，p1～p3为校验位，位置如表：
校验的方式如下，求校验值g1、g2、g3：编码中位 1 2 3 4 5 6 7 对位信息 p1 p2 b1 p3 b2 b3 b4
g1=p1Xorb1Xorb2Xorb4
g2=p2Xorb1Xorb3Xorb4
g3=p3Xorb2Xorb3Xorb4
其中Xor为异或运算，规则是：0Xor0=0，0Xor1=1，1Xor0=1，1Xor1=0，
p1Xorb1是将p1、b1转换为二进制后按位进行异或运算，如7Xor12的结果为11。
（1）若计算得到的校验值g1、g2、g3均为0，说明校验正确，数据无错误。例如：若7位编码为1101001，计算校验值g1、g2、g3值均为0，验证正确。
（2）若校验值g1、g2、g3不全为0，说明数据有错，出错位置为g3g2g1（二进制数表示），纠错的方法是对错误的位进行取反，即“0”变“1”，“1”变“0”。例如：若7位编码为1111001，计算校验值g1=1、g2=1、g3=0，不全为0，说明数据有错，错误位置在011（二进制数）位，即第3位，原位置上“1”应为“0”，正确编码为1101001。
小明为此编写了VB程序，程序运行时，在文本框Text1中输入编码值，单击“校验”
按钮Command1后，在文本框Text2中输出运行结果，如图所示。
实现上述功能的VB程序如下，请回答下列问题：
（1）若按上述规则的7位编码为1001000，其中一位有错，则正确的编码应为。
（2）请在横线处填入合适的代码。
Functioncheck（sAsString）AsInteger
DimiAsInteger,g1AsInteger,g2AsInteger,g3AsInteger
Dimc（1To7）AsInteger
Fori=1To7
c（i）=Val（Mid（s,i,1））
Nexti
g1=c（1）Xorc（3）Xorc（5）Xorc（7）
g2=c（2）Xorc（3）Xorc（6）Xorc（7）
g3=c（4）Xorc（5）Xorc（6）Xorc（7）
Ifg1+g2+g3=0Thencheck=0Elsecheck=①
EndFunction
PrivateSubCommand1_Click （ ）
DimiAsInteger,mAsInteger,OutsAsString
m=②
Ifm=0Then
Text2．Text=″验证正确，数据无错误″
Else
Fori=1To7
Ifi=mThen
Outs=Outs+Chr（Asc（Mid（Text1．Text,i,1））Xor③）
Else
Outs=Outs+Mid（Text1．Text,i,1）
EndIf
Nexti
Text2．Text=″第″+Str（m）+″位上数据有错误，正确编码应为：″+Outs
EndIf
EndSub组卷：3引用：1难度：0.1
