2020年浙江省寧波市五校（奉化中學(xué)、寧波中學(xué)、北侖中學(xué)等）高考信息技術(shù)適應(yīng)性試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分。在每小題列出的四個選項(xiàng)中，只有一項(xiàng)是符合題目要求的，不選、多選、錯選均不得分）
-
1．以下關(guān)于信息與信息技術(shù)的描述正確的是（ ）
組卷：4引用：3難度：0.7 -
2．有關(guān)網(wǎng)絡(luò)常見術(shù)語的描述正確的是（ ）
組卷：3引用：1難度：0.6 -
3．下列應(yīng)用中，體現(xiàn)了人工智能技術(shù)的有（ ?。?br />①多國語言翻譯
②微信發(fā)送語音
③無人駕駛汽車
④人臉識別打擊拐賣
⑤熱水器根據(jù)水溫自動加熱
⑥手機(jī)掃碼二維碼支付組卷：3引用：1難度：0.7 -
4．關(guān)于數(shù)據(jù)庫說法錯誤的是（ ）
組卷：0引用：1難度：0.5 -
5．使用UE軟件觀察字符內(nèi)碼，其中截圖中的字符B的二進(jìn)制內(nèi)碼是（ ?。?img alt src="http://img.jyeoo.net/quiz/images/202007/140/e7411219.png" style="vertical-align:middle" />
組卷：3引用：1難度：0.5
二、非選擇題（本大題共4小題，其中第13題4分，第14題8分，第15題7分，第16題7分，共26分）
-
15．在計(jì)算過程中，有時候數(shù)據(jù)會特別大，超過系統(tǒng)允許的范圍，這時候我們會采用一種特殊的方法來處理，將數(shù)字當(dāng)做字符，然后逐個處理。以下程序用來處理超級大的正整數(shù)乘以一個個位數(shù)的情況：每輸入一個乘數(shù)和被乘數(shù)，按一下計(jì)算，會在列表框中輸出運(yùn)算結(jié)果。（保證輸入的被乘數(shù)是個位正整數(shù)，乘數(shù)可以是200位以內(nèi)的正整數(shù)），完成填空。
算法思路：從乘數(shù)的最后一位開始逐個取出來與被乘數(shù)相乘，例如635的最后一位5，取出來與被乘數(shù)5相乘，得到25，個位數(shù)5作為結(jié)果存入s字符串，十位數(shù)2作為進(jìn)位，留著加入下一次的乘積中，然后取出3，與5相乘，得到15，但是要加上剛才的進(jìn)位，所以應(yīng)該是17，個位數(shù)7作為結(jié)果存入s（此時結(jié)果是75），十位數(shù)作為進(jìn)位1，留著加入下一次乘積……。
（1）程序中additem 是（1）（選填：屬性/屬性值/對象名/方法/過程）
（2）根據(jù)算法完成程序填空：
Private Sub Command1_Click （ ?。?br />dim s as string,s1 as string,s2 as string
dim i as integer,jinwei as integer,d as integer,t as integer
s1=Text1．Text
s2=Text2．Text
s=““
jinwei=0
For i=Len（s1）To 1 Step-1
d=Val（Mid（s1，i,1））
t=①
s=②
jinwei=t\10
Next
If jinwei＜＞0 Then s=③
List1．AddItem s1 &″*″& s2 &″=″& s
End Sub組卷：0引用：1難度：0.4 -
16．某學(xué)校要對班主任進(jìn)行滿意度調(diào)查，有20個評分項(xiàng)（為方便程序處理，評分項(xiàng)具體的名稱本題中不顯示，僅以序號代替），每個評分項(xiàng)學(xué)生可以打A、B、C 三個等級中的一個，現(xiàn)在已經(jīng)收集所有學(xué)生對班主任的評價(jià)，為了保證隱私，不顯示學(xué)生姓名，只顯示班級，并存儲在數(shù)據(jù)庫的表中，點(diǎn)擊command2（讀取數(shù)據(jù)），讀取原始數(shù)據(jù)顯示在左側(cè)list1中，左側(cè)列表顯示的原始評價(jià)數(shù)據(jù)第一條表示高二（01）班有1位同學(xué)在第9項(xiàng)給班主任打A，依此類推，點(diǎn)擊command1（統(tǒng)計(jì)），統(tǒng)計(jì)出各項(xiàng)目的評價(jià)統(tǒng)計(jì)（A+B所占的百分比）。
（1）根據(jù)以下代碼可知，本程序訪問的數(shù)據(jù)庫名稱是
（2）完成橫線處的代碼填空
Dim classname（1 To 8000）As String‘存儲原始數(shù)據(jù)中的班級名稱
Dim selectabc（1 To 8000）As String‘存儲原始數(shù)據(jù)選項(xiàng)的值
Dim xiangmu（1 To 8000）As String‘存儲原始數(shù)據(jù)選項(xiàng)的序號
Dim n As Integer
Private Sub Command2_Click （ ?。鋸臄?shù)據(jù)庫讀取數(shù)據(jù)，并且按班級名稱排序
Dim conn As New ADODB．Connection
conn.ConnectionString=″provider=microsoft.ace.jye.ai.12.0；data source=″&App.Path&“\pingjia.jye.ai″
conn.Open
Dim rs As New ADODB．Recordset
Set rs.ActiveConnection=conn
rs.Open″select*from data″
n=0′記錄評價(jià)的總條數(shù)
′讀取數(shù)據(jù)，并按班級排序，代碼略
End Sub
Private Sub Command1_Click （ ）
Dim cstart（1 To 50）As Integer'存儲每個班級在數(shù)組classname中的起始位置
Dim cend（1 To 50）As Integer'存儲每個班級在數(shù)組classname中的末尾位置
Dim k As Integer'存儲班級數(shù)量
Dim testall（1 To 20）As Integer'存儲每一項(xiàng)總選擇人數(shù)，例如testall（1）里存儲這評價(jià)項(xiàng)目1里的總?cè)藬?shù)，testc（1）里存儲評價(jià)項(xiàng)目1里選C的人數(shù)
Dim testc（1 To 20）As Integer'存儲每一題（項(xiàng)）選c的人數(shù)
'確定每個班級的起止位置，存儲到cstart數(shù)組和cend數(shù)組
cstart（1）=1
temp=classname（1）
k=1
For i=1 To n
If classname（i）＜＞temp Then
①
k=k+1
cstart（k）=i
temp=classname（i）
End If
Next
cend（k）=n
For i=1 To k'每個班級分別統(tǒng)計(jì)評價(jià)項(xiàng)目
②
For q=1 To 20'對testall和testc數(shù)組初始化，
testall（q）=0
testc（q）=0
Next
For j=cstart（i） To cend（i）'對第i個班級進(jìn)行統(tǒng)計(jì)
testall（xiangmu（j））=testall（xiangmu（j））+1
If selectabc（j）=″C″Then③
Next
For p=1 To 20'統(tǒng)計(jì)完成后輸出這個班級的20個項(xiàng)目的 A+B所占百分比
s=s &″″&Str（Round（（testall（p）-testc（p））/testall（p）*100，1））
Next
List2．AddItem s
Next
End Sub組卷：2引用：1難度：0.2