2016-2017學(xué)年浙江省湖州市、麗水市、衢州市、舟山市高三（下）質(zhì)檢信息技術(shù)試卷（3月份）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本題共12小題，每小題2分，共24分；在每小題給出的四個(gè)選項(xiàng)中，只有一項(xiàng)符合題目要求）
-
1．下列說(shuō)法中正確的是（ ?。?/h2>
組卷：5引用：1難度：0.9 -
2．如圖a所示的Word文檔，其摘要如圖b所示，下列說(shuō)法正確的是（ ?。?br />
組卷：4引用：2難度：0.9 -
3．下列應(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 -
4．打開(kāi)某數(shù)據(jù)庫(kù)文件的“圖書(shū)信息”數(shù)據(jù)表，部分界面如圖所示，以下說(shuō)法正確的是（ ?。?br />
組卷：3引用：2難度：0.7 -
5．某算法的部分流程圖如圖所示，執(zhí)行這部分流程后，變量s的值是（ ?。?br />
組卷：2引用：3難度：0.7
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分）
-
16．異或（xor）是一個(gè)數(shù)學(xué)邏輯運(yùn)算符，如：x xor y,其運(yùn)算具體方法描述如下：
（1）分別將十進(jìn)制數(shù)x,y轉(zhuǎn)換為二進(jìn)制，并將轉(zhuǎn)換的每位二進(jìn)制數(shù)分別存儲(chǔ)到數(shù)組a,b中：如果兩個(gè)二進(jìn)制位數(shù)不相等，則位數(shù)較少的前面用“0”不足，使之a(chǎn),b數(shù)組元素個(gè)數(shù)一致；
（2）取出數(shù)組a,b中下標(biāo)相同的數(shù)組元素進(jìn)行運(yùn)算，若值相同，則結(jié)果為0，否則為1．根據(jù)上述運(yùn)算方法，示例如表所示．
小明編寫(xiě)了一個(gè)VB程序，功能如下：在文本框Text1、Text2中分別輸入x、y的值，單擊“異或”按鈕Commandl,程序?qū)?shù)據(jù)進(jìn)行異或運(yùn)算，并將結(jié)果顯示在列表框List1中．實(shí)現(xiàn)上述功能的VB程序如下，但加框處代碼有錯(cuò)，請(qǐng)改正．Function f（z As Integer）As String,將十進(jìn)制數(shù)轉(zhuǎn)換為二進(jìn)制數(shù)，代碼略．End FunctionPrivate Sub Commandl_Click（ ）Dim x As Integer,y As Integer,mAs Integer,i As Integer,Dim sl As String,s2 As String,s3 AS StringDim a（1 to 15）As String,b（1 to 15）AsString變量 十進(jìn)制 二進(jìn)制 x 19 1 0 0 1 1 數(shù)組a a（5） a（4） a（3 a（2 a（1） y 9 0 1 0 0 1 數(shù)組b b（5） b（4） b（3 b（2 b（1） x xor y 1 1 0 1 0
x=Val （Text1．Text）：y=Val （Text2．Text）
If x＜y Then
m=x：x=y：y=m
End If
s1=f（x）：s2=f（y）
k=Len（sl）
For i=1 To k’將轉(zhuǎn)換后的二進(jìn)制數(shù)按位分別存儲(chǔ)到數(shù)組a和b
a（i）=Mid（sl,k-i+1，1）
If i＜=Len（s2）Then
b（i）=Mid（s2，Len（s2）-i+1，1）
Else
，（1）
End If
Next i
For i=1 To k
If
Then s3=“0“+s3 Elses3=“1“+s3 ，（2）
Next i
List1．Addltem“異或結(jié)果是：“+S3
End Sub.組卷：5引用：1難度：0.1 -
17．2016年某書(shū)城的部分書(shū)籍銷(xiāo)售數(shù)據(jù)存放在相應(yīng)的數(shù)據(jù)表中，如圖a所示，小明編寫(xiě)了一個(gè)VB程序，實(shí)現(xiàn)如下功能：在文本框Textl中輸入圖書(shū)類(lèi)別，單擊“查詢(xún)”按鈕Commandl,程序從數(shù)據(jù)庫(kù)讀取相關(guān)數(shù)據(jù)進(jìn)行處理，在列表框Listl中顯示該類(lèi)圖書(shū)所有的銷(xiāo)售數(shù)據(jù)（從高到低排序），在文本框Text2中顯示該類(lèi)圖書(shū)的總銷(xiāo)售量．VB程序面如圖b所示．
實(shí)現(xiàn)上述功能的VB 程序如下，請(qǐng)回答下列問(wèn)題：
（1）加虛線框處的程序，采用的排序算法是．
（2）當(dāng)前程序處理的數(shù)據(jù)庫(kù)文件“major.jye.ai”，默認(rèn)創(chuàng)建該文件的數(shù)據(jù)庫(kù)庫(kù)管理系統(tǒng)是（填軟件名稱(chēng)）．
（3）請(qǐng)?jiān)跈M線處填入合適的代碼．
Dim num As Integer’變量num存儲(chǔ)數(shù)據(jù)庫(kù)實(shí)際的記錄數(shù)
Dim book（1 To 5000）As String
Dim content （1 To 5000）As String,content 1（1 To 5000）As String’存儲(chǔ)類(lèi)別內(nèi)容
Dim sales（1 To 5000）As Long,sales1（1 To 5000）As Long’存儲(chǔ)銷(xiāo)售量
Private Sub Form Load（ ?。?br />Dim conn As New ADODB．Connection,rs As New AD0DB．Recordset
Dim strSQL As String
conn.ConnectionString=“Provider=Microsoft.ACE.0LEDB.12.0：Data Source“&
App.Path &“\major.jye.ai“
conn.Open
strSQL=“SELECT*FROM count“
Set rs.ActiveConnection=conn
’從數(shù)據(jù)表中讀取圖書(shū)類(lèi)別、類(lèi)別內(nèi)容、銷(xiāo)售量分別存儲(chǔ)到數(shù)組book、contcnt、sales中．
’數(shù)據(jù)庫(kù)實(shí)際讀取的記錄數(shù)存儲(chǔ)在變量num中
’代碼略．
End Sub
Private Sub Commandl_ Click（ ?。?br />Din m As String,n As String,c As Integer,s As Long
Dim i As Integer,j As Integer,k As Integer,
Listl.Clear
c=0：s=0
m=Textl.Text
For i=1To num’將符合的類(lèi)別內(nèi)容、銷(xiāo)售量重新存儲(chǔ)到數(shù)組content1、sales1中
If m=book（i） Then
c=c+1
content 1（c）=content （i）
sales1（c）=sales（i）’①
End If
Next i
For i=1 To’②
List1．Addltem contentl（i） &““& Str（salesl（i））
Next i
Text2．Text=Str（s）
End Sub.組卷：3引用：1難度：0.3