2016-2017學(xué)年浙江省金華十校高三(上)期末信息技術(shù)試卷
發(fā)布:2024/4/20 14:35:0
一、選擇題(本題共12個(gè)小題,每小題2分,共24分)
-
1.下列關(guān)于信息和信息技術(shù)的說法正確的是( ?。?/h2>
組卷:26引用:4難度:0.9 -
2.下列多媒體格式中,不屬于多媒體數(shù)據(jù)壓縮標(biāo)準(zhǔn)的是( ?。?/h2>
組卷:24引用:5難度:0.9 -
3.停車場入口通過攝像頭拍攝駛?cè)肫嚨能嚺?,使用智能識(shí)別系統(tǒng)識(shí)別車牌,并將車牌號(hào)存入數(shù)據(jù)庫.其中的車牌識(shí)別技術(shù)屬于( ?。?/h2>
組卷:10引用:5難度:0.7 -
4.某網(wǎng)站用戶注冊(cè)界面如圖所示,用戶信息相關(guān)的數(shù)據(jù)庫使用Access設(shè)計(jì),下列說法不正確的是( ?。?/h2>
組卷:8引用:4難度:0.7 -
5.某算法的部分流程圖如圖所示,執(zhí)行這部分流程圖后,變量k的值為( ?。?br />
組卷:3引用:2難度:0.5
二、非選擇題(共26分)
-
16.小朋友拍照.有來自K(1<=K<=20)個(gè)不同國家的N(1<=N<=100)個(gè)小朋友排成一行準(zhǔn)備拍照.國籍用數(shù)字1,2,3…N表示,每個(gè)小朋友的國籍依次存入數(shù)組a(1)到a(K).
由于小朋友太多,沒有辦法全部被拍入.?dāng)z像師決定拍攝一段連續(xù)區(qū)間內(nèi)的小朋友,這個(gè)區(qū)間內(nèi)每種國籍的小朋友至少要有1人,求滿足要求的最小區(qū)間長度.
例如有10個(gè)小朋友,5種國籍,從左到右排列.國籍編號(hào)依次是2,1,2,4,3,3,5,5,3,5,則最小的一段包含所有5種國籍的區(qū)間是從第2個(gè)到第7個(gè)小朋友,區(qū)間長度為6.
算法解析:區(qū)間的長度至少為K(國籍的數(shù)量),最大為N(小朋友的數(shù)量).我們可以通過二分K到N之間的求得最小區(qū)間長度.
實(shí)現(xiàn)上述功能的VB代碼如下,但加框處代碼有錯(cuò),請(qǐng)改正.
Dim a(1 To 100)As Integer'依次存儲(chǔ)為1到100的小朋友的國籍編號(hào)
Dim K As Integer
Dim N As Integer
Private Sub Form_Load( ?。?窗體加載,生成數(shù)據(jù)
'產(chǎn)生N的值,表示人數(shù)
'產(chǎn)生K的值,表示國籍種數(shù)
'產(chǎn)生編號(hào)為1到N的小朋友的國籍編號(hào),并存儲(chǔ)在數(shù)組a中
'代碼略
End Sub
Private Sub Command1_Click( ?。?使用二分的思想計(jì)算最小區(qū)間
Dim M As Integer
i=K:j=N'答案的范圍為K到N,即最少K,最多N個(gè)小朋友
Do While i<=j
M=(i+j)\2'二分,求中間值
If pd(M)=True Then'調(diào)用Pd函數(shù),判斷區(qū)間長度為M時(shí),是否包含所有國籍
j=M-1
ans=M'若以M為區(qū)間長度可包含所有國籍,更新答案
Else
i='第①處錯(cuò)誤
End If
Loop
Text1.Text=Str(ans)
End Sub
Function pd(M As Integer) As Boolean
Dim f(1 To 20)As Integer'f(i)表示國籍為i的小朋友是否包含
Dim t As Integer't用于統(tǒng)計(jì)當(dāng)前區(qū)間包含的國籍?dāng)?shù)量
pd=False
For i=1 To N-M+1'枚舉以i為起點(diǎn)的M個(gè)小朋友中,各個(gè)國籍是否包含
For j=i To i+M-1
f(a(j))=1'等于1,表示國籍為a(j)的小朋友已包含,0表示不包含
Next j
t=0
For j=1 To K'統(tǒng)計(jì)已包含的國籍的數(shù)量
t=,第②處錯(cuò)誤
Next j
If t=K Then pd=True:Exit Function'若包含K個(gè)國籍,返回True
For j=1 To K'f數(shù)組元素重新初始化為0
f(j)=0
Next j
Next i
End Function.
(1)①處應(yīng)改為
(2)②處應(yīng)改為組卷:4引用:1難度:0.1 -
17.字符串刪除與插入.給定一個(gè)長度不超過100位的字符串S,現(xiàn)有以下兩種操作指令.
指令1(刪除):給出一個(gè)字符串S1,在字符串S中找到最左邊的一個(gè)字符串S1,將其刪除,若在S中不存在字符串S1,則字符串S不變.
例如:S=“China is a big family,it is big”S1=“big”
則執(zhí)行指令1后,S=“China is a family,it is big”
若S1=“small”,則S不變.
指令2(插入):給出一個(gè)字符串S2,和一個(gè)整數(shù)w,將S2插入到S中以w開始的位置.
例如:S=“a big family”S2=“very”w=3
則執(zhí)行指令2后,S=“a very big family”
注意S中“a”后有一個(gè)空格,S2中“y”后有一個(gè)空格
實(shí)現(xiàn)上述功能的VB程序如下.請(qǐng)?jiān)跈M線處填入合適代碼.
Dim S As String
Private Sub Command1_Click( )’單擊Command1實(shí)現(xiàn)刪除指令
Dim S1As String
S=Text1.Text
S1=Text2.Text
S=del(S1)
Text5.Text=S
End Sub
Private Sub Command2_Click( ?。瘑螕鬋ommand2實(shí)現(xiàn)插入指令
Dim S2As String,W As Integer
S=Text1.Text
S2=Text2.Text
W=Val(Text4.Text)
S=(1)
Text5.Text=S
End Sub
Function del(S1As String) As String’在字符串S中查找并刪除S1
Dim S3As String
For i=1To Len(S)-Len(S1)+1
S3=““’S3表示從位置i開始,取出長度和S1相同的字符串
For j=i To i+Len(S1)-1
S3=S3+Mid(S,j,1)
Next j
If?。?)
S=Mid(S,1,i-1)+Mid(S,i+Len(S1),Len(S)-Len(S1)-i+2)
del=S
Exit Function’刪除左邊的第一個(gè)S1后,退出函數(shù),以保證只刪除一次
End If
Next i
End Function
Function add(S2As String,W As Integer) As String
S=Mid(S,1,W-1)+S2+(3)
add=S
End Function.組卷:4引用:1難度:0.1