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