2016-2017學(xué)年浙江省金華市義烏市群星外國(guó)語(yǔ)學(xué)校高三（上）期中信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分，每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)符合題目要求的，不選、多選、錯(cuò)選均不得分）
-
1．銀行為用戶提供了動(dòng)態(tài)口令卡，動(dòng)態(tài)口令使用一次后就自動(dòng)失效，下次需要時(shí)可產(chǎn)生新的動(dòng)態(tài)口令，“動(dòng)態(tài)口令只能使用一次”這符合的信息特征是（ ?。?/h2>
組卷：47引用：7難度：0.9 -
2．老師對(duì)小張的文檔進(jìn)行修訂后，部分截圖如圖所示，對(duì)小張審閱的說(shuō)法正確的是（ ?。?br />
組卷：11引用：6難度：0.9 -
3．用戶進(jìn)入QQ郵箱后，“寫信”時(shí)的部分界面如圖所示，以下說(shuō)法錯(cuò)誤的是（ ?。?br />
組卷：18引用：8難度：0.7 -
4．有一Access數(shù)據(jù)表，表的結(jié)構(gòu)如圖所示，在數(shù)據(jù)錄入時(shí)截圖如右圖所示，下列說(shuō)法正確的是（ ）
組卷：11引用：7難度：0.9 -
5．某算法的部分流程圖如圖所示，執(zhí)行這部分流程后，變量x和Flag的值分別是（ ）組卷：9引用：11難度：0.7
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分）
-
16．【加試題】小明編寫了一個(gè)VB程序，功能如下：在文本框Text1中輸入一段英文，并在文本框Text2中輸入英文段落中的某個(gè)單詞（或字符串），單擊“最大間距”按鈕（Command1）后，在文本框Text3中顯示該單詞在文中某兩次出現(xiàn)的最大間距，若只出現(xiàn)一次或不出現(xiàn)則顯示值為0．程序運(yùn)行界面如圖所示：
實(shí)現(xiàn)上述功能的VB程序如下：
Private Sub Command1_Click （ ?。?br />Dim a（1To 1000）As String'數(shù)組a存儲(chǔ)文中出現(xiàn)該指定單詞（或字符串）的各個(gè)位置
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
以上程序段運(yùn)行時(shí)，為了實(shí)現(xiàn)上述功能，橫線處①和②應(yīng)填入的代碼分別為：
（1）； （2）．組卷：11引用：3難度：0.1 -
17．【加試題】合唱隊(duì)列是按隊(duì)員的身高進(jìn)行排列，形成中間高兩邊有序降低的隊(duì)形；例如有六個(gè)隊(duì)員“己、戊、丁、丙、乙和甲”的身高依次由小到大，則排列后的順序?yàn)椤拔?、丙、甲、乙、丁、己”．小李用VB編寫模擬“合唱隊(duì)列”程序，功能如下：在文本框Text1中輸入各隊(duì)員身高，輸入結(jié)束并回車，則輸入的各隊(duì)員身高分別存入數(shù)組a中；單擊“合唱隊(duì)列”按鈕Command1，對(duì)數(shù)組a的元素進(jìn)行有序排列后，將各元素存入數(shù)組C中形成合唱隊(duì)列，并將結(jié)果顯示在文本框Text2中．程序運(yùn)行界面如圖所示：甲、乙、丙、丁、戊和己
實(shí)現(xiàn)上述功能的VB程序如下：
（1）如果輸入各隊(duì)員身高為“190，191，194，179，166”，則合唱隊(duì)列的結(jié)果為．
（2）實(shí)現(xiàn)上述功能的VB程序如下，請(qǐng)?jiān)跈M線處填入合適代碼．
Dim a（1To 20）As Integer
Dim n As Integer
Private Sub Text1_KeyPress（KeyAscii As Integer）
'將輸入各隊(duì)員身高分別存入數(shù)組a中，隊(duì)員個(gè)數(shù)為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 ①Then
t=a（j）：a（j）=a（j+1）：a（j+1）=t
End If
Next j
Next i
‘下列程序段實(shí)現(xiàn)數(shù)組C的合唱隊(duì)列
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