2017-2018学年浙江省杭州市高三(上)期末信息技术试卷
发布:2024/4/20 14:35:0
一、选择题(本大题共12小题,每题2分,共24分。每小题列出的四个备选项中只有一个是符合题目要求的,不选、多选、错选均不得分)
-
1.下列有关信息技术的说法,正确的是( )
组卷:0引用:1难度:0.6 -
2.下列有关网络协议的描述,正确的是( )
组卷:0引用:1难度:0.7 -
3.使用OCR软件识别“说明.bmp”图象中的文字。下列操作中,不能提高识别正确率的是( )
组卷:0引用:1难度:0.6 -
4.使用Access软件创建的数据表,其设计视图的部分界面如图所示,下列说法不正确的是( )
组卷:19引用:3难度:0.5 -
5.某算法的部分流程图如图所示。执行这部分流程后,输出sum,i的值分别是( )
组卷:0引用:3难度:0.6
二、非选择题(本大题共5小题,其中第13小题4分,第14小题5分,第15小题8分,第16小题3分,第17小题6分,共26分)
-
16.对数组a中的u个元素进行排序,生成左右交替上升的数据序列,结果如下表所示:
a(1) a(2) a(3) …… a(n-2) a(n-1) a(n) 17 39 48 …… 79 46 34
实现上述功能的VB程序如下,加框处代码有错,请改正。
Constn-9‘变量u存储待排序数据个数,以9个数为例
Dima(1Ton)AsInteger‘数组a存储待排序数据
PrivateSubCommand1_Click ( )
DimiAsInteger,jAsInteger,tAsInteger,kAsInteger
‘读取一组正整数,存入数组a中,
‘在标签Label中依次输出排序前数组a从1到n各个元素的值,代码略;
For i=1 Ton\2
k=1 Label'①
For j=i+1 Ton-i+1
If a(k)>a(j)Thenk=j
Nextj
For j=i+1 Ton′②
If a(j)<a(j+1)Then t=a(j):a(j)=a(j+1):a(j+1)=
Next j
Next i
‘在标签中依次输出排序后数组a从1到n各个元素的值,代码略;
EndSub组卷:0引用:1难度:0.4 -
17.四宫数独规则:在4×4的格子中,根据已知数字,推理出所有剩余空格的数字,并满足每一行、每一列、每一个宫(粗线框区域)内均含1到4的数字并且不重复,每道数独有且仅有唯一答案。
例如,根据规则推理图1数独,在第一宫中4个格子已经3个格子分别是数字1到3,缺的数字为4,因此第一行第一格空缺的数字填4,以此类推,直至将所有格子都推理出来。
(1)根据上述规则推理,数独(图2)第一行A处应是数字
(2)小明编写了四宫数独推算的VB程序,单击“推算”按钮Command1后,在列表框List1中输出数独推算过程和结果,如图3所示。实现推算的VB程序如下,请在横线处填入合适的代码。
Dimd(1To16)AsInteger'数组d逐行存储四宫数独
PrivateSubCommand1_Click ( )
DimiAsInteger,flagAsBoolean
Fori=1To16
d(i)=0‘值0表示该位置还未填数字
Nexti
‘初始化数独中已知位置的数字
d(2)=4:d(11)=3:d(14)=2:d(16)=4
List1.Clear
'在列表框Li1中输出四宫数独,代码略
flag=False
DoWhileNotflag
①
Fori=1To16
‘函数check(i)实现对第i位置进行推算
Ifd(i)=0Then
d(i)=check(i)
Ifd(i)>0Then
flag=False
'Forniat(i,″00″)函数实现将变量i的值按2个字符宽度输出
List1.Addltem“第″&Format(i,″00″&″位置填″&d(i)
EndIf
EndIf
Nexti
Loop
'在列表框Lil中输出四宫数独,代码略
EndSub
根据每一行、第一列、每一个宫的已有数字进行推算
Functioncheck(xAsInteger)AsInteger
Dimt(0To4)AsInteger,mAsInteger
DimrowAsInteger,colAsInteger,nAsInteger,kAsInteger
Form=0To4
t(m)=0
Nextm
'对当前所在行列进行推算
row=(x-1)\4+1
col=(x-1)Mod4+1
Form=1To4
t(d(row-1)*4+m)=1
t(②
Nextm
'进行宫内推算
Ifrow<=2Andcol<=2Thent(d(7-x))=1
Ifrow<=2Andcol>2Thent(d(11-x)=
Ifrow>2Andcol<=2Thent(d(23-x)=1
Ifrow>2Andcol>2Thent(d(27-x)=1
k=0
Form=1To4
Ift(m)=0Thenn=mElsek=k+1
Nextm
If③
EndFunction组卷:0引用:1难度:0.5