2016-2017学年浙江省金华市义乌市群星外国语学校高三(上)期中信息技术试卷
发布:2024/4/20 14:35:0
一、选择题(本大题共12小题,每小题2分,共24分,每小题列出的四个备选项中只有一个符合题目要求的,不选、多选、错选均不得分)
-
1.银行为用户提供了动态口令卡,动态口令使用一次后就自动失效,下次需要时可产生新的动态口令,“动态口令只能使用一次”这符合的信息特征是( )
组卷:47引用:7难度:0.9 -
2.老师对小张的文档进行修订后,部分截图如图所示,对小张审阅的说法正确的是( )
组卷:11引用:6难度:0.9 -
3.用户进入QQ邮箱后,“写信”时的部分界面如图所示,以下说法错误的是( )
组卷:18引用:8难度:0.7 -
4.有一Access数据表,表的结构如图所示,在数据录入时截图如右图所示,下列说法正确的是( )
组卷:11引用:7难度:0.9 -
5.某算法的部分流程图如图所示,执行这部分流程后,变量x和Flag的值分别是( )
组卷:9引用:11难度:0.7
二、非选择题(本大题共5小题,其中第13小题4分,第14小题5分,第15小题8分,第16小题3分,第17小题6分,共26分)
-
16.【加试题】小明编写了一个VB程序,功能如下:在文本框Text1中输入一段英文,并在文本框Text2中输入英文段落中的某个单词(或字符串),单击“最大间距”按钮(Command1)后,在文本框Text3中显示该单词在文中某两次出现的最大间距,若只出现一次或不出现则显示值为0.程序运行界面如图所示:
实现上述功能的VB程序如下:
Private Sub Command1_Click ( )
Dim a(1To 1000)As String'数组a存储文中出现该指定单词(或字符串)的各个位置
Dim s As String,c As String,ch As String
Dim n As Integer,max As Integer,i As Integer
s=Text1.Text
c=Text2.Text
n=0:Max=0
For i=1To Len(s)-Len(c)+1
ch=①
If ch=c Then
n=n+1
a(n)=i
If n>=2Then
If a(n)-a(n-1)-Len(c)>Max Then Max=a(n)-a(n-1)-Len(c)
End If
End If
Next i
Text3.Text=②
End Sub
以上程序段运行时,为了实现上述功能,横线处①和②应填入的代码分别为:
(1)组卷:11引用:3难度:0.1 -
17.【加试题】合唱队列是按队员的身高进行排列,形成中间高两边有序降低的队形;例如有六个队员“己、戊、丁、丙、乙和甲”的身高依次由小到大,则排列后的顺序为“戊、丙、甲、乙、丁、己”.小李用VB编写模拟“合唱队列”程序,功能如下:在文本框Text1中输入各队员身高,输入结束并回车,则输入的各队员身高分别存入数组a中;单击“合唱队列”按钮Command1,对数组a的元素进行有序排列后,将各元素存入数组C中形成合唱队列,并将结果显示在文本框Text2中.程序运行界面如图所示:甲、乙、丙、丁、戊和己
实现上述功能的VB程序如下:
(1)如果输入各队员身高为“190,191,194,179,166”,则合唱队列的结果为
(2)实现上述功能的VB程序如下,请在横线处填入合适代码.
Dim a(1To 20)As Integer
Dim n As Integer
Private Sub Text1_KeyPress(KeyAscii As Integer)
'将输入各队员身高分别存入数组a中,队员个数为n,代码略!
End Sub
Private Sub Command1_Click ( )
Dim c(1To 20)As Integer
Dim right As Integer,left As Integer,i As Integer
For i=1To n-1
For j=1To n-i
If ①
t=a(j):a(j)=a(j+1):a(j+1)=t
End If
Next j
Next i
‘下列程序段实现数组C的合唱队列
m=(1+n)\2
left=m:right=m
c(m)=a(n)
i=2
Do While i<=n
If i Mod 2=0 Then
right=right+1
c(right)=a(n-i+1)
Else
②
c(left)=a(n-i+1)
End If
i=i+1
Loop
s=③
For i=2To n
s=s+“,“+Str(c(i))
Next i
Text2.Text=s
End Sub.组卷:15引用:3难度:0.1