2017年11月浙江省普通高校招生選考信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分，每小題列出的四個備選項中只有一個是符合題目要求的，不選、錯選、多選均不得分．）
-
1．下列有關(guān)信息的說法，不正確的是（ ）
組卷：23引用：7難度：0.9 -
2．超文本傳輸協(xié)議用于瀏覽器與WEB服務(wù)器之間的信息傳輸，該協(xié)議的簡稱是（ ）
組卷：18引用：6難度：0.9 -
3．下列應(yīng)用中，體現(xiàn)了人工智能技術(shù)的有（ ）
①機(jī)器人通過語音與人交流
②飲水機(jī)根據(jù)水溫自動加熱
③賓館通過專用系統(tǒng)進(jìn)行人臉識別，核實住宿人員身份
④計算機(jī)程序根據(jù)輸入的三條邊長自動計算三角形面積
⑤停車管理系統(tǒng)通過拍攝識別車牌號碼，并用語音進(jìn)行播報。組卷：25引用：14難度：0.9 -
4．使用Access軟件打開數(shù)據(jù)庫，部分界面如圖所示，下列說法正確的是（ ）
組卷：20引用：4難度：0.5 -
5．某算法的部分流程圖如圖所示，執(zhí)行這部分流程后，輸出a,b的值分別是（ ）組卷：15引用：8難度：0.7
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分）
-
16．【加試題】小李基于冒泡排序算法編寫了一個VB程序，功能如下：在文本框Text1中顯示排序前的數(shù)據(jù)，單擊“排序”按鈕Command1，在文本框Text2中顯示剔除重復(fù)數(shù)據(jù)后的升序排序結(jié)果。程序運(yùn)行界面如圖所示。
實現(xiàn)上述功能的VB程序如下，但加框處代碼有錯，請改正。
Const n=10
Dim a（1To n） As Integer
Private Sub Command1_Click （ ）
Dim i As Integer,j As Integer,t As Integer
Dim bottom As Integer
'獲取排序前數(shù)據(jù)依次存儲在數(shù)組a中，并在文本框Text1中顯示。代碼略
bottom=n
i=1
Do While i＜=bottom-1
For j=bottom To i+1Step-1
If
Then
t=a（j）：a（j）=a（j-1）：a（j-1）=t
ElseIf a（j）=a（j-1）Then'相鄰兩個數(shù)據(jù)相等，進(jìn)行剔除處理
bottom=bottom-1
End If
Next j
i=i+1
Loop
Text2．Text=““
For i=1To bottom
Text2．Text=Text2．Text+Str（a（i））
Next i
End Sub。組卷：28引用：3難度：0.3 -
17．【加試題】由數(shù)組a生成數(shù)組b的方法描述如下：
1）將數(shù)組a中的n個元素依次分割出若干個數(shù)據(jù)塊，每個數(shù)據(jù)塊有m×m個元素，m最大值為8，最小值為2．分割時，按盡可能大的數(shù)據(jù)塊進(jìn)行分割；
2）對每個分割出的數(shù)據(jù)塊用“方陣轉(zhuǎn)換法”進(jìn)行轉(zhuǎn)換，每次轉(zhuǎn)換后得到的數(shù)據(jù)塊依次存儲在數(shù)據(jù)b中；
3）數(shù)組a分割后的剩余元素（個數(shù)小于4），直接依序存儲到數(shù)組b中。
例如n=140時，可依次分割出3個數(shù)據(jù)塊，元素的個數(shù)分別為64（8×8）、64（8×8）、9（3×3），剩余元素為3個。
“方陣轉(zhuǎn)換法”過程如下：將數(shù)據(jù)塊中m×m個元素按行序排列成一個數(shù)字方陣，從該數(shù)字方陣中按列序得到轉(zhuǎn)換后元素的次序。以3×3數(shù)據(jù)塊為例，轉(zhuǎn)換過程如圖所示：
小明依據(jù)上述描述設(shè)計了如下VB程序。請回答下列問題：
（1）當(dāng)n=120時，分割出的第3個數(shù)據(jù)塊元素個數(shù)為。
（2）請在橫線處填入合適的代碼。
Const n=120
Dim a（1To n） As Integer
Dim b（1To n） As Integer
Private Sub Command1_Click （ ）
Dim m As Integer,i As Integer
Dim Start As Integer'當(dāng)前未分割數(shù)據(jù)的第1個元素下標(biāo)
Dim Left As Integer'當(dāng)前未分割數(shù)據(jù)的個數(shù)
Dim pa As Integer'數(shù)組a的下標(biāo)
Dim pb As Integer'數(shù)組b的下標(biāo)
'讀取n個轉(zhuǎn)換前的數(shù)據(jù)，依次存儲到a（1）、a（2）、…a（n）中，代碼略
m=8
Start=1
Left=n
Do While Left＞3
If Left＜m*m Then
m=
Else
pa=Start
pb=Start
For i=1To m*m
b（pb）=a（pa）
pb=pb+1
If i Mod m=0Then
Else
pa=pa+m
End If
Next i
Start=Start+m*m
End If
Loop
For i=Start To n
b（i）=a（i）
Next i
'依次輸出轉(zhuǎn)換后數(shù)據(jù)b（1）、b（2）、…b（n）中，代碼略
End Sub。組卷：6引用：2難度：0.1