2021年1月浙江省普通高校招生選考信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分。每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分）
-
1．下列關(guān)于信息與信息技術(shù)的描述，正確的是（ ?。?/h2>
組卷：18引用：4難度：0.8 -
2．下列關(guān)于信息安全的說法，正確的是。（ ?。?/h2>
組卷：15引用：2難度：0.6 -
3．用Access軟件設(shè)計抗疫物資收發(fā)系統(tǒng)的數(shù)據(jù)庫，其中已建好的“物資流向”數(shù)據(jù)表用于存儲如表所示的數(shù)據(jù)。下列關(guān)于“物資流向”數(shù)據(jù)表的描述，正確的是（ ?。?br />
發(fā)放序號 發(fā)放日期 領(lǐng)用單位 物資名稱 數(shù)量 是否定向 20200101 2020.01.29 街道辦事處 醫(yī)用口罩 1000 是 20200102 2020.02.12 疫情防控組 普通防護服 200 否 20200103 2020.02.12 疫情防控組 體溫槍 500 否 … … … … … … 組卷：3引用：3難度：0.6 -
4．英文字符在計算機中有全角和半角之分。全角英文字符的內(nèi)碼由兩個字節(jié)組成，第一個字節(jié)的值是A3H，第三個字節(jié)的值是其對應(yīng)的半角內(nèi)碼值加上80H得到的。例如，半角字符“A”的內(nèi)碼值是41H，則全角字符“A”的內(nèi)碼值是A3C1H。用UltraEdit軟件查看字符內(nèi)碼，部分界面如圖所示。下列說法錯誤的是（ ?。?br />
組卷：19引用：3難度：0.4 -
5．使用GoldWave軟件編輯某音頻文件，部分界面如圖所示。下列說法正確的是（ ?。?img alt="菁優(yōu)網(wǎng)" src="https://img.jyeoo.net/quiz/images/202101/143/be59b807.png" style="vertical-align:middle" />
組卷：6引用：4難度：0.4
二、非選擇題（本大題共4小題，其中第13小題4分，第14小題8分，第15小題7分，第16小題7分，共26分）
-
15．根據(jù)申請人的QA和QB值，從m個申請人中挑選2人組隊參加某挑戰(zhàn)賽。條件一是2人的QA值都必須大于指定參數(shù)h；條件二是2人的QA值之差（較大值減較小值）小于h。在滿足上述兩個條件的所有2人組合中，挑選QB值之和最大的一個組合。（QA、QB和h的值均為正整數(shù)）
編寫VB程序，實現(xiàn)上述挑選功能。運行程序，在文本框Text1中輸入?yún)?shù)h后，單擊“挑選”按鈕Command1，在列表框List1中按QA值降序顯示滿足條件一的申請人信息，最后在標(biāo)簽Label1中顯示組隊結(jié)果。程序運行界面如圖所示。
請回答下列問題：
（1）若要清空列表框List1，能實現(xiàn)該功能的語句是（單選，填字母：A.List1.Caption=““/B.List1.Text=““/C.List1.Clear）。
（2）實現(xiàn)上述功能的VB程序如下，請在橫線處填入合適的代碼。
（3）程序中加框處代碼有錯，請改正。
Constm=20’m表示申請人個數(shù)
Dimid（m）AsInteger,qa（m）AsInteger,qb（m）AsInteger
PrivateSubCommand1_Click （ ?。?br />DimiAsIntegerjAsInteger,kAsInteger,tAsInteger,maxAsInteger
DimhAsInteger,nAsInteger’變量n存儲滿足條件一的申請人個數(shù)
DimsAsString
’讀取全部申請人的編號、QA和QB值，分別存入數(shù)組id、qa和qb,代碼略
h=Val（Text1.Text）：n=m
Fori=1Tom-1
k=i
Forj=i+1Tom
Ifqa（j）＞qa（k）Thenk=j
Nextj
If
Then
Ifk＜＞iThen
t=qa（i）：qa（i）=qa（k）：qa（k）=t
t=qb（i）：qb（i）=qb（k）：qb（k）=t
t=id（i）：id（i）=id（k）：id（k）=t
EndIf
Else
n=①
ExitFor’ExitFor表示退出循環(huán)
EndIf
Nexti
’滿足條件一的申請人信息顯示在列表框Listl中，代碼略
max=0：s=“沒有滿足條件的組合”
’在滿足條件的組合中，尋找QB值之和最大的組合，若有并列，只保留第一個
Fori=nTo2Step-1
j=i-1
DoWhile②
Ifqb（i）+qb（j）＞maxThen
s=“組隊結(jié)果：“+Str（id（i））+“號，“+Str（id（j））+“號“
③
EndIf
j=j-1
Loop
Nexti
Label1.Caption=s
EndSub組卷：7引用：1難度：0.5 -
16．某物品柜有5層，每層有10個格子，每個格子只能放一個物品。第1層格子編號依次為1到10，第2層格子編號依次為11到20，依此類推。有9組物品（組號1～9），每組有2到8個物品，物品總數(shù)不超過50個。將9組物品按組號由小到大依次放入柜中，放置方式有兩種：
（1）整體放置。按格子編號由小到大的次序查找第一個可放置該組全部物品的空區(qū)域（空區(qū)域是指從某個空格子開始的同層連續(xù)的所有空格子），若找到，則在該空區(qū)域居中、連續(xù)放置該組全部物品，如圖a所示。
（2）零散放置。若所有空區(qū)域格子數(shù)都小于該組物品數(shù)，則將該組每個物品依次放置在當(dāng)前編號最小的空格子中，如圖b所示。
編寫VB程序，模擬物品放置。運行程序，在列表框List1中顯示每組物品的組號和數(shù)量，單擊“放置”按鈕Command1，在列表框List2中顯示每組物品放置結(jié)果。程序運行界面如圖c所示。
（1）若第1、第2組的物品數(shù)分別為6和2，則放置第2組物品的格子編號依次為。
（2）實現(xiàn)上述功能的VB程序如下，請在橫線處填入合適的代碼。
Constm=50’m表示物品柜的格子數(shù)
Constw=10’w表示物品柜每層的格子數(shù)
Constn=9’n表示物品的組數(shù)
’f（i）存儲第i個格子開始的同層連續(xù)的所有空格子數(shù)。f（i）為0表示第i個格子不是空格子
Dimf（m）AsInteger
Dima（n）AsInteger
PrivateSubForm_Load
’讀取各組物品的個數(shù)依次存入數(shù)組a,并在List1中顯示
’代碼略
EndSub
Functiongetpos（rAsIntegerAsInteger
’按格子編號從小到大的次序，查找空格子數(shù)≥r的第一個空區(qū)域
’若找到，返回該空區(qū)域的起始編號，否則返回-1
’代碼略
EndFunction
PrivateSubCommand1_Click （ ?。?br />DimiAsInteger,jAsInteger,kAsInteger,pAsInteger,vAsInteger
DimsAsString
Fori=1Tom
f（i）=w-（i-1）Modw’w為10，表示每層的格子數(shù)
Nexti
v=1
Fori=1Ton
s=““
p=①
Ifp=-1Then
j=1
DoWhilej＜=a（i）
Iff（v）＜＞0Then
s=s+Str（v）
f（v）=
j=j+1
EndIf
②
Loop
Else
k=（f（p）-a（i））\2
Forj=kTo1Step-1
f（p）=j
p=p+1
Nextj
Forj=③
f（j）=0
s=s+Str（j）
Nextj
EndIf
List2.AddItem“第“+Str（i）+“組：“+s
Nexti
EndSub組卷：6引用：1難度：0.5