2018-2019学年浙江省9+1联盟高三(上)期中信息技术试卷
发布:2024/4/20 14:35:0
一、选择题(本大题共12小题,每小题2分,共24分.每小题给出的四个选项中只有一个是符合题目要求的,不选、多选、错选均不得分.)
-
1.下列关于信息的说法,不正确的是( )
组卷:17引用:2难度:0.7 -
2.某网页的部分操作界面如图所示。
下列说法不正确的是( )组卷:3引用:1难度:0.6 -
3.以下关于智能产品的描述,其中体现人工智能技术应用的是( )
组卷:0引用:2难度:0.5 -
4.某 Access数据表视图的部分操作界面如图所示。
下列说法正确的是( )组卷:5引用:1难度:0.1 -
5.某算法流程图如图所示。
执行该流程后,输出b的结果为( )组卷:2引用:1难度:0.2
【加试题】
-
16.某数列由10个正整数组成,现对数列中的每个数按照从小到大的顺序进行编号,编号规则为:最小数编号为1,次小数编号为2,如此循环(若出现两个相同的数字,则编号相同,直到出现不同的数字再赋值新编号)。例如,数列61,1000,30,5,10,50,10,300,120,240中每个数所对应的编号分别为:5,9,3,1,2,4,2,8,6,7。程序运行界面如图所示。
实现上述功能的程序代码如下,其中加框处代码有误,请改正。组卷:0引用:1难度:0.3
【加试题】
-
17.小明在玩翻转棋盘的游戏,游戏规则是在一个4×4的棋盘中挑选棋子(棋子只有黑白两面),对于每颗被挑选的棋子,要将该棋子和它在棋盘上的上下左右4个相邻位置上的棋子一起翻转,若某个方向上无棋子,则不作处理,最后使得棋盘纯色(纯白或纯黑)。如图a所示的棋盘,需要选择第2行第2列、第4行第2列两颗棋子,按照规则进行翻转便可使得棋盘变为纯黑。现编写程序找出实现棋盘纯色所需翻转棋子次数最少的方案并输出所挑选棋子的个数,若无答案则输出“无法翻转为纯色”。
每颗棋子的颜色状态可以用0、1来表示,0表示白,1表示黑,顺序为从左至右,从上至下,例如,图a中的棋子初始状态可以表示为1011000111001。
每颗棋子的被选状态也可以用0、1进行标记,0表示不选中,1表示被选中。例如,一个16位的二进制串0000010000000100就表示该棋盘中的第2行第2列、第4行第2列这两个棋子被选中,如果将该二进制串转化为十进制数,即210+22=1028.整张棋盘的所有选棋子方案为0000000000000000-1111111111111111,也就是十进制数0-65535利用枚举算法在0-65535之间枚举,即可找到最优方案。程序运行界面如图b所示,请回答下列问题。
(1)若某方案用十进制表示为137,则该方案总共选择了
(2)实现上述功能的程序代码如下,请将横线处的代码补充完整。
Dima(1To16)As Integer,b(1To16)As Integer,min_ c As Long’数组a储存棋盘原状态,数组b储存翻转后的棋盘状态
Function check( ) As Boolean'判断棋盘是否纯色
Dim flag As Boolean,i As Integer
flag=True
For i=1 To 15
If b(i)<>b(i+1)Then flag=False
Next i
check=flag
End Function
Private Sub Commandl _Click( )
Dim k As Integer,c As Integer,i As Long,j As Long
min_ c=17
For i=0 T0 2∧16-1
For j=1To16′初始化棋盘
b(j)=a (j)
Next
k=16
c=0
j=i
Do Whilei>0
If
b(k)=1-b(k)
If k>4 Then b(k-4)=1-b(k-4
If k<13 Then b(k+4)=1-b(k+4)
Ifk Mod 4<>0 Then b(k+1)=1-b(k+1)
If
c+1
End If
j=j\2
k=k-1
Loop
If
min _c=c
End If
Next i
If min_ c=17 Then Labell.Caption=“无法翻转为纯色!“Else Label1,Caption=Labell.Caption+Str(min_c)
End Sub
Private Sub Form_ Load( )
′生成棋盘状态,用数组a(1)-a(16)表示,代码略
For i=1 To 16
s=s+Str(a(i))
If i Mod 4=0 Then List1.AddItem s:s=″″
Nexti
End Sub组卷:0引用:1难度:0.3