2017-2018學(xué)年浙江省臺(tái)州市黃巖二中高二（下）期中信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分，每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的，不選、錯(cuò)選、多選均不得分．）
-
1．市民首次登錄iNingbo免費(fèi)WIFI熱點(diǎn)，需要用手機(jī)獲取驗(yàn)證碼并注冊(cè)，對(duì)驗(yàn)證碼進(jìn)行驗(yàn)證并判定是否注冊(cè)成功這一過(guò)程屬于（ ?。?/h2>
組卷：9引用：2難度：0.9 -
2．使用Word軟件編輯某文檔時(shí)的部分界面如圖所示，下列說(shuō)法正確的是（ ?。?br/>
組卷：5引用：2難度：0.9 -
3．某Access數(shù)據(jù)如圖所示，下列說(shuō)法正確的是（ ）
組卷：2引用：2難度：0.7 -
4．下列應(yīng)用中、體現(xiàn)了人工智能技術(shù)的有（ ?。?br />①使用百度的“識(shí)圖”功能對(duì)上傳的圖片進(jìn)行相似圖片查找
②使用掃描筆內(nèi)置的朗讀功能對(duì)掃描到的中英文進(jìn)行實(shí)時(shí)朗讀
③使用指紋解鎖功能能打開(kāi)手機(jī)
④Word軟件將輸入的“以身做則”自動(dòng)更正為“以身作則”
⑤使用在線二維碼生成器制作二維碼．組卷：6引用：6難度：0.7 -
5．使用Ul traEdit軟件觀察字符“蘋(píng)果★apple”十六進(jìn)制內(nèi)碼，結(jié)果如圖所示．下列說(shuō)法正確的是（ ）
組卷：6引用：2難度：0.7
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題3分，第15小題7分，第16小題4分，第17小題8分，共26分）
-
16．【加試題】如圖a所示，在Excel中使用Rank函數(shù)可以快速地返回一個(gè)數(shù)字在數(shù)字列表中的排位，而且是同分同名次，非常方便．小明想用VB編寫(xiě)一個(gè)程序來(lái)實(shí)現(xiàn)類(lèi)似Rank排名次的功能，程序運(yùn)行時(shí)，隨機(jī)產(chǎn)生10個(gè)[60，100]之間的隨機(jī)數(shù)，并顯示在列表框List1中，單擊“排名”按鈕Command1，在列表框List2中輸出數(shù)據(jù)及其排名，程序運(yùn)行界面如圖b所示．
實(shí)現(xiàn)上述功能的VB程序如下，代碼加框處有錯(cuò)，請(qǐng)改正．
加框①處代碼應(yīng)改為：；加框②處代碼應(yīng)改為：．
Dim a（1 To 10）As Integer'存放原始數(shù)據(jù)
Dim b（1 To 10）As Integer'存放名次
Private Sub Command1_Click（ ?。?br /> Dim i As Integer,j As Integer,n As Integer
For i=1 To 10
n=0
For j=1 To 10
If
Then n=n+1'①
Next j'②
Next i
For i=1 To 10
List2．AddItem a（i） &““& b（i）
Next i
End Sub
Private Sub Form_Load（ ?。?br />'隨機(jī)產(chǎn)生10個(gè)[60，100]之間的隨機(jī)數(shù)，并顯示在List1中，代碼略
End Sub.組卷：5引用：2難度：0.3 -
17．n個(gè)數(shù)據(jù)的冒泡升序排序需要經(jīng)過(guò)n-1遍的加工，每一遍加工自下而上比較相鄰兩個(gè)數(shù)據(jù)，把較小者交換到上面，在第i遍加工過(guò)程中需要進(jìn)行n-i對(duì)數(shù)據(jù)的比較，在某些情況下，第i遍加工過(guò)程中，在上面部分較小數(shù)據(jù)已經(jīng)有序情況下，不需要再進(jìn)行n-i對(duì)數(shù)據(jù)的比較。如對(duì)“17，18，19，24，23，20”這6個(gè)數(shù)據(jù)排序中，第1遍排序結(jié)束后數(shù)據(jù)為“17，18，19，20，24，23”，第2遍排序時(shí)不再需要對(duì)20及其前面4個(gè)數(shù)據(jù)進(jìn)行比較。程序界面如圖所示
以下程序?qū)崿F(xiàn)了冒泡排序的優(yōu)化，請(qǐng)?jiān)跈M線處填寫(xiě)合適的代碼。
Dim n As Integer
Dim a （1 to 100）As Integer
Private Sub Form_Load （ ?。?br />‘n=10，排序前生成的數(shù)據(jù)存儲(chǔ)在數(shù)組a中，并在列表框List1中顯示
‘代碼略
End Sub
Private Sub Command1_Click （ ）
Dim i As Integer,j As Integer,start As Integer,t As Integer
Do While i＜n
start=n
For j=n To i Step
If a（j）＜a（j-1）Then
t=a（j）：：a（j-1）=t
start=j
End If
Next j
Loop
For i=1 To n
List2．AddItem Str（a（i））
Next i
End Sub組卷：2引用：1難度：0.4