2020-2021學(xué)年浙江省高三(上)聯(lián)考信息技術(shù)試卷(12月份)
發(fā)布:2024/4/20 14:35:0
一、選擇題(本大題共12小題,每小題0分,共24分。在每小題給出的四個(gè)選項(xiàng)中,只有一個(gè)符合題目要求)
-
1.下列有關(guān)信息與信息處理的說法,錯(cuò)誤的是( ?。?/h2>
組卷:2引用:1難度:0.6 -
2.下列應(yīng)用中,沒有體現(xiàn)人工智能技術(shù)的是( ?。?/h2>
組卷:0引用:1難度:0.6 -
3.用Access軟件設(shè)計(jì)某圖書管理信息系統(tǒng)的數(shù)據(jù)庫(kù),其中“圖書登記表”中需要存儲(chǔ)如表所示的數(shù)據(jù),數(shù)據(jù)庫(kù)字段名與表中標(biāo)題一致。
序號(hào) 圖書編號(hào) 書名 作者 入庫(kù)日期 借閱狀態(tài) 27 BK001113 安娜?卡列尼娜 列夫?托爾斯泰 2014-07-31 是 28 BK003839 城南舊事 林海音 2016-08-01 否 29 BK002028 時(shí)間簡(jiǎn)史 霍金 2020-08-02 是 … … … … … … 組卷:9引用:3難度:0.3 -
4.要表示100種不同的信息,需要的二進(jìn)制位數(shù)至少為( ?。?/h2>
組卷:4引用:2難度:0.5 -
5.用Photoshop軟件制作“足球”宣傳海報(bào),如圖所示,下列說法正確的是( ?。?br />
組卷:2引用:1難度:0.4
二、非選擇題(本大題共4小題,其中第13小題4分,第14小題8分,第15小題7分,第16小題7分,共26分)
-
15.某網(wǎng)站注冊(cè)密碼需要符合以下兩點(diǎn)條件:①密碼不少于4位字符組成;②必須同時(shí)包含4種字符,大寫字母“A-Z”,小寫字母“a-2”,數(shù)字“0-9”,特殊符號(hào)“!@#%&*”,方了方便批量注冊(cè),小迪同學(xué)編寫了自動(dòng)生成密碼的VB程序,程序運(yùn)行界面如a所示,當(dāng)在文本框Text1中輸入需生成密碼長(zhǎng)度,點(diǎn)擊“生成密碼”按鈕(Command1),在文本框Text2中輸出符合要求的密碼串。<imgsrc=“image13.png“style=“vertical-align:middle;border:0“/>
(1)下列對(duì)象不具有Caption屬性的是___________(單選,填字母:A.Command1/B.Form1/C.Text1/D.Label1)
(2)實(shí)現(xiàn)上述功能的VB程序如下,請(qǐng)?jiān)跈M線處填入合適代碼。①
(3)程序代碼中的加框處代碼有誤,請(qǐng)改正。改正:
PrivateSubCommand1Click
Randomize
n=Val(Text1.Text)
a(0)=0:a(1)=26:a(2)=52:a(3)=62:a(4)=70'記錄每種符號(hào)的結(jié)束位置
s=““
For i=1 To 4
b(i)=0'b數(shù)組記錄某類符號(hào)是否使用
Next i
sum=4'當(dāng)前未使用字符類型,初始為4種
Do While Len(s)+sum<n
k=①'隨機(jī)選擇一個(gè)密碼序號(hào)
s=s+Mid(key,k,1)
i=1
Do While k>=a(i)
i=i+1
Loop
b(i)=1
sum=4-b(1)-b(2)-b(3)-b(4)
Loop
'生成剩余未出現(xiàn)元素密碼,保證4種符號(hào)均有出現(xiàn)
For i=1 To sum
j=Int(Rnd*4)+1
Do While(②
j=j Mod 4+1
Loop
b(j)=1
k=Int(Rnd*(a(j)-a(j-1)))+a(j-1)+1
s=s+Mid(key,k,1)
Next i
Text2.Text=s
End Sub
(4)如果文本框Text1中輸入值2,文本框Text2中輸出字符長(zhǎng)度為組卷:0引用:1難度:0.3 -
16.現(xiàn)需要對(duì)某企業(yè)大型招聘活動(dòng)面試成績(jī)進(jìn)行排名,面試數(shù)據(jù)包含專業(yè)編號(hào)(整數(shù),順序編號(hào))、專業(yè)名稱、姓名(字母編寫)和面試分。整理面試數(shù)據(jù)的要求是:先按專業(yè)編號(hào)從小到大排列,然后,同專業(yè)的面試者按面試成績(jī)從大到小排列(同分同名次)。按上述要求,編寫一個(gè)VB程序,功能如下:在列表Listi1中顯示整理前的數(shù)據(jù),單擊“整理”按鈕Command1,整理結(jié)果顯示在列表框List2中,程序運(yùn)行界面如圖所示。
(1)n個(gè)元素兩兩比較大小確定其位次,需要比較的次數(shù)是
(2)請(qǐng)?jiān)跈M線處填入合適的代碼。
Const n=200'報(bào)名人數(shù)
Const nz=10'專業(yè)數(shù)
Dim zybh(1 To n)As Integer,zyname(1 Ton)As String,sname(1 To n)As String,
zymark(1 To n)As Integer
Dim b(1 To nz)As Integer'存儲(chǔ)每個(gè)專業(yè)的人數(shù)
Dim c(1 To nz)As Integer
Dim d(1 To n)As Integer
Dim q(1 To n)As Integer
Private Sub Form_Load
'本過程讀取專業(yè)編號(hào)、專業(yè)名稱、姓名和面試分的數(shù)據(jù)分別存儲(chǔ)在數(shù)組zybh,zyname,sname,zymark中,并在List1中顯示,代碼略
End Sub
Private Sub Command1_Click
Dim i As Integer,j As Integer,k As Integer,t As Integer,pos As Integer
For i=1 To nz
b(i)=0
Next i
For i=1 To n
d(i)=0:q(i)=0
Next i
For i=1To n
k=zybh(i)
b(k)=b(k)+1
Next i
k=1
For i=1 To nz
c(i)=k
①
Next i
For i=1 To n-1
For j=i+1 To n
If zybh(i)=zybh(j)And zymark(i)<>zymark(j)Then
If②
d(j)=d(j)+1
Else
d(i)=d(i)+1
End If
End If
Next j
Next i
For i=1 To n
j=0
Do While③
j=j+1
Loop
q(c(zybh(i))+d(i)+j)=i
Next i
For i=1 To n
List2.Addltem““& zybh(q(i)) &““& zyname(q(i)) &.““& sname(q(i)) &““& zymark(q(i)) &““& d(q(i)+1
Next i
End Sub組卷:0引用:1難度:0.3