2018-2019学年浙江省稽阳联谊学校高三（下）月考信息技术试卷（3月份）
发布：2024/12/18 3:30:1
一、选择题（本大题共12小题，每小题2分，共24分．在每小题给出的四个选项中，只有一个符合题目要求）
-
1．下列有关信息与信息技术的说法，正确的是（ ）
组卷：45引用：1难度：0.7 -
2．关于信息技术名词简称的解释，下列说法不正确的是（ ）
组卷：40引用：2难度：0.7 -
3．用Word软件编辑某文档，如图所示，下列说法正确的是（ ）
组卷：17引用：4难度：0.4 -
4．使用Access软件打开数据库，部分界面如图所示。下列说法正确的是（ ）
组卷：12引用：1难度：0.5 -
5．某算法的部分流程图如图所示。执行该流程，输出s的值约为（ ）
组卷：5引用：1难度：0.4
二、非选择题（本大题共5小题，其中第13小题4分，第14小题5分，第15小题8分，第16小题4分，第17小题5分，共26分．）
-
16．本程序的功能是在列表框List1中随机产生n（n为偶数）个[1，20]之间的不重复正整数，存入数组a中。点击“排序”按钮Command1，对n个数进行排序。使得奇数位上是降序，偶数位上是升序，且a（1）＜a（2），并在List2中显示排序后的结果。实现该功能的VB程序如下，但波浪线处代码有错，请改正。
Const n=8
Dim a（1 To n） As Integer,b（1 To n） As Integer
Private Sub Form_Load （ ）
‘随机产生n个[1，20]之间的不重复的正整数，并在list1中显示具体代码略
End Sub
Private Sub Command1_Click （ ）
Dim i As Integer,j As Integer,t As Integer,p as integer,p as integer
For i=1 To n-1
For j=n To i+1 Step-1
If a（j）＜a（j-1）Then
t=a（j）：a（j）=a（j-1）：a（j-1）=t
end If
Next j
Next i
p=n：
（1）
For i=1 To n Step 2
（2）
b（i+1）=a（q）
p=p-2
q=q+1
Next i
For i=1 To n
List2．AddItem Str（b（i））
Next i
End Sub组卷：5引用：1难度：0.5 -
17．用一个6*5矩阵表示地图，分别用a数组元素表示，第1行从左到右为a（1）到a（6），依此类推，右下角为a（30）。其中数字0表示不通，数字1表示畅通。现在要从左上角到右下角寻找一条畅通的路径。线路规则如下：
•路线每个点只能向右或向下
•任何一个岔口优先向右走，右侧不通再向下走
•一条路线中每个点只能走一次，不能重复
算法思路：探路过程中，记录每个坐标到数组lu；遇到岔路口（向右向下都通），则记录路口坐标到数组cha；遇到前方无路时，需要返回到上一个路口，标记路口右侧坐标为0；当前方无路，岔路口数组也退回到0，说明整体不通，否则根据规则走到右下为止，最后输出整体线路坐标。
实现算法的程序如下，运行结果如右图所示。
回答下列问题：
（1）根据规则，如图迷宫矩阵正确路线的第6个点是a数组的第个元素（填数字）
（2）在程序横线处填上合适代码，使程序完整。
Dim a（1 To 50）As Integer
Private Sub Command1_Click （ ）
Dim i As Integer,j As Integer,pos As Integer
Dim cha（1 To 10）As Integer'记录一条线路中各个岔路口坐标
Dim lu（1 To 10）As Integer'记录路线经过的坐标
pos=1：j=0：lu（1）=1：i=1
Do While i＜=9‘第1个和最后1个固定，中间有9个需要路过的坐标
If pos Mod 6＜＞0 And a（zb+1）=1 Then'向右畅通
If pos+6＜=30 and a（zb+6）=1 Then‘记录岔路口
j=j+1
①
End If
pos=pos+1
i=i+1
②
ElseIf pos+6＜=30 And a（pos+6）=1 Then'向下畅通
pos=pos+6
i=i+1
lu（i）=pos
Else'坐标退回到上一个岔路口
If j=0 Then Exit Do
Do While lu（i）＜＞cha（j）
③
Loop
a（cha（j）+1）=0’标记此路口右侧不可用
pos=cha（j）
j=j-1
End If
Loop
If j=0 Then
Text1．Text=“没有畅通道路“
Else
For i=1 To 10
Text1．Text=Text1．Text+Str（lu（i））
Next i
End If
End Sub组卷：0引用：1难度：0.9
