2020-2021學(xué)年浙江省名校協(xié)作體高二（下）聯(lián)考信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分。每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的，不選、多選、錯(cuò)選均不得分）
-
1．下列關(guān)于信息與信息技術(shù)的說法不正確的是（ ?。?/h2>
組卷：7引用：1難度：0.6 -
2．某同學(xué)發(fā)送電子郵件時(shí)的部分界面如圖所示。
下列說法正確的是（ ?。?/h2>組卷：0引用：1難度：0.6 -
3．下列有關(guān)瀏覽器與網(wǎng)頁(yè)的說法，不正確的是（ ?。?/h2>
組卷：5引用：2難度：0.8 -
4．下列應(yīng)用中，體現(xiàn)人工智能的有（ ?。?br />①以語(yǔ)音交互的方式在智能音箱上選擇歌曲
②煙霧探測(cè)器探測(cè)到濃煙后自動(dòng)啟動(dòng)噴淋系統(tǒng)
③掃描學(xué)生試卷后，計(jì)算機(jī)自動(dòng)批改選擇題部分的答案
④智慧教室可以刷臉識(shí)別學(xué)生，提供學(xué)生信息
⑤使用有道詞典在線翻譯組卷：11引用：1難度：0.7 -
5．使用Access軟件打開某數(shù)據(jù)庫(kù)，部分界面如圖所示。
下列說法正確的是（ ?。?/h2>組卷：1引用：1難度：0.5
二、非選擇題（本大題共4小題，其中第13小題7分，第14小題6小題7分，共26分）
-
15．為慶祝新學(xué)期到來，某校學(xué)生會(huì)組織開展文體演藝活動(dòng)，現(xiàn)按活動(dòng)要求，將各班學(xué)生編排成“三角”隊(duì)形。隊(duì)形有以下要求：
第一排正中間安排1人；第二排正中間安排3人；第三排正中間安排5人……，如此循環(huán)，直至班級(jí)人數(shù)不足以站滿一排后結(jié)束編排。
三角隊(duì)形外圍一圈的同學(xué)對(duì)服裝有特殊要求，需要進(jìn)行標(biāo)記（中間的同學(xué)用“●”標(biāo)記，外圍的同學(xué)用“▲”標(biāo)記）
編寫VB程序，實(shí)現(xiàn)隊(duì)形編排功能：在文本框Text l中輸入班級(jí)人數(shù)，單擊“展示隊(duì)形”按鈕Command l后，將班級(jí)學(xué)生隊(duì)形顯示在列表框List 1中。例如，當(dāng)班級(jí)學(xué)生數(shù)為54的時(shí)候，程序運(yùn)行界面如圖所示。
（1）根據(jù)題意，如果輸入的班級(jí)人數(shù)為70，則三角隊(duì)形的最后一行人數(shù)為。
（2）程序代碼中（*）處有錯(cuò)誤，請(qǐng)改正。
（3）實(shí)現(xiàn)隊(duì)形編排功能的VB程序如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub Command 1_Click
Dim i As Integer,j As Integer
Dim cnt As Integer,nAs Integer,tmp As Integer
Dim kw As String,zw As String,c As String
List 1.Clear
cnt=Val（Text 1-Text）
n=0：tmp=1
Do While cnt-tmp＞0計(jì)算三角隊(duì)形的行數(shù)（*）
cnt=cnt-tmp
tmp=tmp+2
n=n+1
Loop
For i=1 T on
kw=“”：zw=“”
For j=i T on-1
kw=kw+“”
Next j
If i=n The nc=“▲”Else c=“●”
For j=1 To 2*（i-1）-1
zw=zw+c
Next j
IfThen
ZW=“▲”
Else
zw=“▲”+zw+“▲”
End If
List 1.Add Item
Next i
End Sub組卷：0引用：1難度：0.4 -
16．四則混合運(yùn)算是指加法、減法、乘法和除法四種混合運(yùn)算。現(xiàn)有一程序可計(jì)算不帶括號(hào)的“+”、“-”、“*”三則混合運(yùn)算。在文本框Text 1中輸入表達(dá)式（保證符合數(shù)學(xué)規(guī)范），單擊“=”按鈕Command 1后，在標(biāo)簽Label l中輸出運(yùn)算結(jié)果，程序界面如圖所示。
（1）實(shí)現(xiàn)上述功能的VB程序如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub Command l_Click
Dims As String,ch As String
Dim i As Integer,t As Integer
Di mans As Long,px As Long
s=Text l.Text
ans=0：t=0：px=1
For i=1 To Len（s）
ch=Mid（s,i,1）
IfThen
t=t*10+Val（ch）
Else
px=px*t
If ch=“_”ThenIf ch=“+“Then
ans=ans+px
px=1
End If
px=-1
End If
t=0
End If
Next i
Label 1.Caption=Str（ans+）
End Sub
（2）若刪除加框處代碼，在文本框Text l中輸入表達(dá)式“3-2+2*3”，程序運(yùn)行結(jié)束時(shí)標(biāo)簽Label l中顯示的內(nèi)容為。組卷：1引用：1難度：0.2