2021年浙江省紹興市諸暨市高考適應性試卷（5月份）
發布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分。每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分）
-
1．2021年3月15日晚會上某商家利用人臉識別監控設備在大眾不知情的情況下收集進店顧客的人臉信息的新聞引發大眾關注。據了解，國內上千家該品牌門店，都安裝了攝像頭。一旦有人走進店鋪，面部信息就會被收集。只要顧客在一家門店出現一次，任何一家門店都將得到其光顧信息。以下關于信息的說法正確的是（ ）
組卷：7引用：2難度：0.6 -
2．小王在指導爺爺上網時給出了不少建議，以下做法錯誤的是（ ）
組卷：1引用：1難度：0.5 -
3．某考生在浙江省教育考試院官網上進行高考外語、選考信息確認時的部分界面如圖所示。
下列說法正確的是（ ）組卷：1引用：1難度：0.5 -
4．下列關于數制的說法，正確的是（ ）
組卷：4引用：1難度：0.6 -
5．使用GoldWave軟件編輯某音頻文件，部分編輯界面如圖所示。下列說法錯誤的是（ ）
組卷：2引用：1難度：0.5
二、非選擇題（本大題共4小題，其中第13小題4分，笫14小題8分，笫15小題7分，第16小題7分，共26分）
-
15．已知在數組 score 中存儲了某標準化建設學校（每班學生人數為 40 ）高三學生的第一次技術選考賦分成績，其中 score（1）存儲班級數 class,score（2）開始順序存儲1至 class 各班技術賦分成績。例score（2）-score（41）存儲 1班學生成績，score（42）-score（81）存儲 2 班學生成績。小李根據上述描述，設計了一個統計各班技術分數段人數分布的VB 程序。單擊“統計”按鈕 Commandl,每個班級按分數段統計人數，分數段分為：40-49 分、50-59 分、60-69 分、70-79 分、80-89 分、90-99 分、100 分若干段。并在列表框 Listl 中顯示數組 score 各個元素的值，在列表框 List2 中顯示各班各個分數段人數。程序界面如圖所示。
請回答下列問題：
（1）若要清空列表框 Listl,能實現該功能的語句是（單選，填字母）。
A.Listl.Caption=11 11/
B.Listl.Text=11 11 I
C.Listl.Clear
（2）實現各分數段統計功能的 VB 程序如下，請在橫線處填入合適的代碼。
（3）程序中（*）處代碼有錯，請改正。
Dim score（1 To 1000）As Integer
Dim class As Integer,n As Integer,m As Integer Private Sub Commandl _Click （ ）
Dim num（1 To 7）As Integer
Dim result As String,rs As String,bj As String
列表框 List2 中輸出第一行信息，代碼略
①
n=class*40+1 For i=1 Ton
Listl.Addltem Str（score（i））Next i
For i=1 To 7
num（i）=0
Next i m=O
For i=2 Ton
x=score（i）\10（*）
num（x）=num（x）+1
If i Mod 40=1 Then
②
result=Str（m）+“班”
Fork=1 To 7
rs=Str（num（k））+“人”
result=result+rs Nextk
List2.Addltem result Fork=1 To 7
③
Nextk End If
Next i End Sub組卷：1引用：1難度：0.2 -
16．1Pv6 是英文“Internet Protocol Version 6“（ 互聯網協議第 6 版）的縮寫。1Pv6 的地址長度為 128 位，采用十六進制表示。為了便于人工閱讀和輸入，1 Pv6 地址可劃分成 8 個塊，每塊 4 位，塊與塊之間用“：“隔開，如：ABCD：EFO 1：0000：0000：ABCD：EFO1：0000：6789。
同時，對于多個地址塊為 0 的情況時，可以使用“：：“號，進行化簡。化簡原則如下：句 全 0 塊“0000“，可以化簡為“0“
@連續多個全 0 塊，可以化簡為“：：“
@一 個 1Pv6 地址中只能出現一個“：“'出現多個全 0 塊時，“：：“要化簡最長的一段，沒有最長的就將最左側的一段化簡為“：：“
@“：：“可以出現在地址開頭或結尾
如：數據“FBCD：EF Ol：：6789“在化簡前為“FBCD：EFO1：0000：0000：0000：0000：0000：6789“。
小李根據上述化簡算法設計了一個 IP 化簡地址還原的 VB 程序，功能如下：在文本框 Textl 中輸入已經化簡的 IP 地址，單擊“還原”按袖 Command!，在文本框 Text2 中輸出其化簡前的 IP 地址。運行界面如圖所示。
（1）運行程序，若在文本 框 Textl 中輸入“12：：“（ 引號內數據 ），還原后，數組元素 ip（1）的值為。
（2）實現上述功能的 V B 程序如下，請在橫線處填入合適的代碼。
Function ipv6（s As String）As String Dim i As Integer
For i=Len（s）+1 To 4
s=“O“+s
Next i
①
End Function
Private Sub Commandl_Click （ ）Dim ip（l To 8）As String
Dim st As String
Dim f As Integer,k As Integer Dim s As String,n As Integer f=0
k=l
s=Textl.Text n=Len（s）
For i=1 Ton
cl=Mid（s,i,1）
If cl＜＞“：“Then ip（k）=ip（k）+C1
End If
If c1=11：11 Or i=n Then
②
If c2=“：“Then f=k
Else
ip（k）=ipv6（ip（k））k=k+l
End If
End If
Next i k=k-1 x=8-k
For i=k To f+1 Step-1
③
Next i
For i=f+1 To f+x ip（i）=“0000“
Next i
Text2.Text=ip（1）For i=2 To 8
Text2.Text=Text2.Text+“：“+ip（i）Next i
End Sub組卷：2引用：1難度：0.3