2019-2020學(xué)年浙江省稽陽(yáng)聯(lián)誼學(xué)校高三(上)月考信息技術(shù)試卷(11月份)
發(fā)布:2024/4/20 14:35:0
一、選擇題(本大題共12小題,每小題0分,共24分。在每小題給出的四個(gè)選項(xiàng)中,只有一個(gè)符合題目要求)
-
1.下列有關(guān)信息和信息編碼的說(shuō)法,正確的是( ?。?/h2>
組卷:6引用:2難度:0.6 -
2.下列關(guān)于網(wǎng)頁(yè)和網(wǎng)絡(luò)協(xié)議的說(shuō)法,正確的是( ?。?/h2>
組卷:0引用:1難度:0.6 -
3.下列應(yīng)用中,均體現(xiàn)了人工智能技術(shù)的是( ?。?br />①某手機(jī)依設(shè)定的時(shí)間自動(dòng)開啟夜覽模式
②通過(guò)掃描某商品的二維碼獲得價(jià)格
③用指紋鎖功能打開手機(jī)
④某主題餐館使用機(jī)器人代替人工送餐
⑤使用手機(jī)拍照功能獲取圖像組卷:1引用:1難度:0.6 -
4.利用軟件UltraEdit觀察字符內(nèi)碼,界面如圖所示,下列說(shuō)法正確的是( ?。?br />
組卷:2引用:1難度:0.5 -
5.用Photoshop軟件制作“陌上花開”作品,部分界面如圖所示。當(dāng)前狀態(tài)下,下列說(shuō)法正確的是( )
組卷:0引用:1難度:0.4
二、非選擇題(本大題共4小題,其中4分,8分,7分,第16小題7分,共26分。)
-
15.大數(shù)據(jù)是當(dāng)今最熱門的領(lǐng)域之一,小王同學(xué)利用VB設(shè)計(jì)了一個(gè)模擬大數(shù)據(jù)應(yīng)用的程序。有10種商品,數(shù)組a存儲(chǔ)用戶是否購(gòu)買了各種商品;某個(gè)用戶購(gòu)買時(shí),商品兩兩之間是否一起購(gòu)買用另一個(gè)數(shù)組dsj來(lái)記錄;各數(shù)組元素的解釋如表所示。
數(shù)組元素 數(shù)組元素的含義 a(i) a(1)到a(10)依次存儲(chǔ)1號(hào)顧客購(gòu)買商品1~商品10的記錄;
a(11)至a(20)依次存儲(chǔ)號(hào)2顧客購(gòu)買商品1~商品10的記錄;依次類推。
數(shù)組a的某個(gè)元素的值為1,則表示某位顧客購(gòu)買了某種商品,若為0則表示沒有購(gòu)買該種商品。如a(6)=1表示1號(hào)顧客購(gòu)買了商品6,a(6)=0表示未購(gòu)買。b(i) dsj(1)~dsj(9)依次存儲(chǔ)商品1與商品2~商品10的關(guān)聯(lián)次數(shù);
dsj(10)~dsj(17)依次存儲(chǔ)商品2與商品3~商品10的關(guān)聯(lián)次數(shù):依次類推。
如dsj(5)=2表示商品1與商品6被同時(shí)購(gòu)買過(guò)2次;
如dsj(45)=4表示商品9與商品10被同時(shí)購(gòu)買過(guò)4次。
數(shù)組dsj中,若dsj(45)的值最大,則表示商品9和商品10的關(guān)聯(lián)次數(shù)最多。
Private Sub Cmd1_Click ____
Dim a(1To200)As Integer'各個(gè)用戶原始的購(gòu)買記錄
Dim dsj (1To45)As Integer'統(tǒng)計(jì)商品之間的關(guān)聯(lián)次數(shù)
Dim i As Integer,t As Integer,nc As Integer,j As Integer,max As Integer
'數(shù)組a讀入數(shù)據(jù)并在列表框分行輸出,代碼略
For i=1 To 20'20個(gè)用戶
t=1
For j=1 To 9'10個(gè)商品,共45種組合
For k=j+1 To 10
m=(i-1)*10
a(j)*a
If Then dsj(t)=dsj(t)+1
①
Next k
Next j
Next i
max=0
For i=1 To 45
If ②Then
max=dsj(i)
maxi=i
End If
Next i
t=9:nc=1
Do While maxi>t
③
t=t-1
nc=nc+1
Loop
Text1.Text=“關(guān)聯(lián)最多的是商品“+Str(nc)+Str(maxi+nc)+“:“+Str(max)+“次“
End Sub
(1)將按鈕上的文字“統(tǒng)計(jì)”修改為“計(jì)算”,可在Form_Load過(guò)程中使用
A.Cmd1.Caption=“計(jì)算”B.Cmd1_Click=“計(jì)算”C.Command1.Text=“計(jì)算”
(2)加框處代碼有錯(cuò),請(qǐng)改正;
改正:
(3)在程序橫線處填入合適代碼,使程序完整。
①
②
③組卷:2引用:2難度:0.3 -
16.有多人在不同樓層要乘坐同一部電梯,所有人都是去往更高樓層,電梯初始位置為第一批用戶出發(fā)的樓層位置。電梯在運(yùn)行時(shí),上升一層需耗時(shí)3秒,在某一層停留時(shí)(含電梯初始位置和電梯結(jié)束位置),不論有多少人進(jìn)出都算8秒。小馬同學(xué)利用上述算法編寫了一個(gè)VB程序,在列表框list1中顯示所有人的出發(fā)與到達(dá)樓層,按照出發(fā)樓層升序(出發(fā)樓層相同按到達(dá)樓層升序)排序,在列表框list2中輸出排序后結(jié)果,最后在文本框Text1中輸出電梯本次運(yùn)行的總時(shí)間。程序運(yùn)行界面如圖所示,回答下列問題:
(1)若有5批用戶出發(fā)與到達(dá)樓層分別是“10-25、5-15、15-20、15-30、5-10”,按照上述電梯運(yùn)行規(guī)則,則電梯本次運(yùn)行的總時(shí)間為
(2)給橫線處填上合適代碼,使程序完整。
Dim a(1To10)As Integer,b(1To10)As Integer
Private Sub Command1_Click ____
Dim i As Integer,time As Integer,k As Integer
Dim c(1To20)As Integer,nc As Integer
c(1)=a(1):nc=1
For i=1 To 9'刪除起點(diǎn)重復(fù)數(shù)據(jù)后添加到數(shù)組c
If a(i)<>a(i+1)Then
nc=nc+1
①
EndIf
Next i
Fori=1To10'刪除終點(diǎn)重復(fù)數(shù)據(jù)后添加到數(shù)組c
k=nc
Do While b(i)<c(k)
k=k-1
Loop
lf ②
For j=nc To k+1 Step-1
c(j+1)=cj)
Next j
nc=nc+1
c(j+1)=b(i)
End If
Next i
time=(c(nc)-c(1))*3+nc*8
Text1.Text=“總時(shí)間--“+Str(time)+“秒”
End Sub
Private Sub Form_Load
'生成10批人的起止樓層,分別給數(shù)組a和b,并在列表框list1輸出,代碼略.
For i=1 To 9
For j=10 To i+1 Step-1
If a(j)<a(j-1)Or③
t=a(j):a(j)=a(j-1):a(j-1)=t
t=b(j):b(j)=b(j-1):b(j-1)=t
End If
Next j
Next i
For i=1 To 10
List2.AddItem Str(a(i))+Str(b(i))
Next i
End Sub組卷:0引用:1難度:0.3