2016-2017学年浙江省绍兴一中高二（下）期末信息技术试卷
发布：2024/4/20 14:35:0
一、选择题（本大题共12小题，每小题2分，共24分．在每小题给出的四个选项中，只有一个符合题目要求）
-
1．下列有关做法正确的是（ ）
组卷：5引用：1难度：0.9 -
2．通过某网站选购商品，界面如图．
以下说法正确的是（ ）组卷：5引用：1难度：0.9 -
3．用Word编辑某文档，操作界面如图所示．
以下说法正确的是（ ）组卷：9引用：1难度：0.9 -
4．有关Access数据库的操作，下列说法正确的是（ ）
组卷：4引用：1难度：0.9 -
5．某算法的流程图如图所示，执行该算法后，变量x,y的值是（ ）
组卷：3引用：1难度：0.9
二、非选择题（本大题共5小题，其中第13小题4分，第14小题5分，第15小题8分，第16小题3分，第17小题6分，共26分）
-
16．【加试题】有一个报数游戏，n个人排成一圈，游戏开始时规定一个报数号m,然后从其中一个人开始按顺时针报数1，2，3…n,当某人报到的数为m的倍数时，即被淘汰，其他人继续游戏，直到最后．现用VB设计了一个程序，程序界面如下图所示．在文本框Text1中输入参加游戏的人数n,在文本框Text2中输入报数号m,单击“报数”按钮，即在列表框List1中显示每次被淘汰的人的顺序号．
实现上述功能的VB代码如下，但加框处有错，请改正．
Private Sub Command1_Click（ ）
Dim n As Integer,m As Integer
Dim a（1To 50）As Integer
n=Val（Text1．Text）
m=Val（Text2．Text）
For i=1To n
'（1）
Next i
s=0：j=0
Do While s＜n
t=0
Do While t＜m
'（2）
t=t+a（j）
Loop
a（j）=0
s=s+1
List1．AddItem“第“+Str（s）+“次：“+Str（j）
Loop
End Sub.组卷：0引用：1难度：0.4 -
17．小刘在玩一个数字游戏，给定一个n位正整数（n＜=20），根据设定的保留位数，舍去一部分数字，剩下的数字按原次序组成一个最大的新数．例如原数34625803，保留4位，最大数为6803．算法是：先确定最高位的数字，在第1位至最后3位数字前的34625中找到最大的数6，从而确定最高位是6，再确定次高位的数字，从6后面的数开始到最后2位数字前的258中找到最大数8，确定次高位是8，依次找下去得到最大新数．他设计了一个VB程序来进行验证，在文本框Text1中输入一个n位正整数，在文本框Text2中输入保留的位数，点击“确定”按钮，在文本框Text3中输出保留的最大新数．程序运行界面如图所示．
（1）如果输入的原数是3635132，保留4位数字，则输出的新数是．
（2）实现上述功能的VB代码如下，请在横线处填入合适代码．
Private Sub Command1_Click （ ）
Dim a（1To 20）As String
Dim ys As String,xs As String'xs记录最大的新数
Dim k As Integer,h As Integer,n As Integer
Dim i As Integer,j As Integer
Dim F As Boolean
xs=““
ys=Text1．Text
n=Len（ys）
k=Val（Text2．Text）
F=True
If ys=““Or n＞20Or k=0Or k＞n Then
Label4．Caption=“输入的原数或保留位数不符，请重输！“
F=False
End If
For i=1To n
①
If a（i）＜“0“Or a（i）＞“9“Then
Label4．Caption=“输入的原数不是数字，请重输！“
Text1．Text=““
F=False
End If
Next i
If F=True Then
h=1
For i=1To k
For j=h To ②
If a（j）＞a（h） Then h=j
Next j
xs=xs+a（h）
h=h+1
Next i
Text3．Text=xs
End If
End Sub.组卷：5引用：1难度：0.1
