資源簡介

登錄二一教育在線組卷平臺 助您教考全無憂
浙江省紹興市上虞區2020-2021學年高二下學期信息技術期末教學質量試卷
一、選擇題（本大題共12小題，每小題2分，共24分）
1．（2021高二下·上虞期末）下列關于信息與信息處理的說法，錯誤的是（　　）
A．信息技術始于計算機技術的誕生
B．信息可以脫離它所反映的事物被存儲和傳播
C．算術運算和邏輯運算是計算機處理信息的基本運算
D．報刊、書籍、廣播、電視和網絡都是信息的表達技術
【答案】A
【知識點】信息及其特征；信息技術的概念與關鍵技術；信息加工與處理的概念；信息表達方式與表達技術
2．（2021高二下·上虞期末）下列關于瀏覽器和網頁的說法，正確的是（　　）
A．網頁中的所有對象均存儲在網頁文件中
B．使用同一個搜索引擎不同時間的檢索結果肯定相同
C．瀏覽器與Web服務器之間進行信息傳輸采用的協議是HTTP
D．在IE瀏覽器中，使用“添加到收藏夾”功能可以保存正在瀏覽的網頁內容
【答案】C
【知識點】瀏覽器；網絡資源的檢索
3．（2021高二下·上虞期末）使用Access軟件設計校園體溫記錄系統的數據庫，其中已建好“體溫記錄”數據表用于存儲如圖所示的數據。
學號 姓名 班級 日期 體溫 是否住宿
20200510 陳怡 高一(5)班 2021.6.30 36℃ 是
20180101 沈佳森 高三(1)班 2021.6.31 36.3℃ 否
20190302 張國浩 高二(3)班 2021.6.32 36.1℃ 是
… … … … … …
下列關于“體溫記錄”數據表的描述，正確的是（　　）
A．該數據表的字段數可能多于6個
B．該校園體溫記錄系統是數據庫管理系統
C．該數據表中必定有一個字段的字段名為“學號”
D．圖中“是否住宿”列在該數據表中相應字段的數據類型一定是“文本”
【答案】A
【知識點】數據表、字段、記錄的概念；字段的數據類型
4．（2021高二下·上虞期末）下列關于計算機信息編碼的描述，正確的是（　　）
A．數據的壓縮是一個解碼的過程
B．每個漢字的輸入碼和處理碼都是唯一的
C．字符“9”的內碼為39H，則字符“10”的內碼為3AH
D．在某十六進制數的末位添加一個0，其值將是原數的16倍
【答案】D
【知識點】字符編碼
5．（2021高二下·上虞期末）用Photoshop軟件制作“勇攀高峰”作品，在“生命不息運動不止”圖層輸入文字“生命不息 運動不止”，相關編輯界面如題圖所示。
下列描述正確的是（　　）
A．存儲每個像素點所需的二進制位數為24位
B．無法將“底紋”圖層移動到“多圓”圖層上方
C．可以將“登頂”圖層的圖層樣式直接拷貝到“底紋”圖層
D．當前狀態下，不可以使用文字工具單獨調整“生命不息運動不止”圖層中“生命”的大小
【答案】A
【知識點】圖片加工常用工具的使用；圖層及圖層的基本操作
6．（2021高二下·上虞期末）一個時長為1分鐘、采樣頻率為44.1KHz、量化位數為16bit的立體聲WAV格式音頻文件，壓縮為MP3格式的文件大小約為1MB，則其壓縮比約為（　　）
A．5:1 B．10:1 C．80:1 D．176:1
【答案】B
【知識點】聲音、圖像、視頻編碼
7．（2021高二下·上虞期末）以下表達式結果與其他三項不同的是（　　）
A．Len("sy2021") B．Mid("1996SX",4,1)
C．5+15 Mod 13\5 D．Sqr(Abs(-9))+Val("3")
【答案】B
【知識點】運算符、基本運算與表達式
8．（2021高二下·上虞期末）某算法的部分流程圖如圖所示。執行這部分流程后，s的值應為（　　）
A．-21 B．11 C．-5 D．1
【答案】B
【知識點】流程圖識讀
9．（2021高二下·上虞期末）有如下程序段：
s = "Happy 2021/07"
ans = "": f = True: Max = ""
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "a" And ch <= "z" Then
ans = ans + Chr(Asc(ch) - 32)
ElseIf ch >= "0" And ch <= "9" Then
f = False
End If
If Not f And ch > Max Then
Max = ch: f = True
End If
Next i
Label1.Caption = ans + Max
執行該段程序后，標簽label1中顯示的內容是 （　　）
A．Happy7 B．HAPPY0 C．HAPPY7 D．APPY7
【答案】D
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
10．（2021高二下·上虞期末）有如下程序段：
Dim a(1 To 6) As Integer
a(1) = 6
For i = 2 To 6
a(i) = Int(Rnd * 30 + 1) * 3
If a(i) Mod 2 = 1 And i Mod 2 = 0 Then
i = i - 1
ElseIf a(i) > 60 Then
a(i) = a(i) - a(i - 1)
End If
Next i
執行該段程序后，a(1)~a(6)中的值可能是 （　　）
A．6,36,15,42,72,12 B．6,14,36,51,18,21
C．6,60,3,87,0,90 D．6,18,21,75,27,21
【答案】C
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
11．（2021高二下·上虞期末）有程序段如下：
Dim a(1 To 8) As Integer
K = 8: n = 8
For i = 1 To 3
For j = i + 1 To n
If a(i) < a(j) Then
t = a(i): a(i) = a(j): a(j) = t
End If
Next j
For j = n - i To i + 1 Step -1
If a(k) > a(j) Then
t = a(k): a(k) = a(j): a(j) = t
End If
Next j
k = k - 1
Next i
數組元素a(1)~a(8)中的初始值為：8,13,7,14,6,9,5,12,執行該程序段后，數組元素a(1)~a(8)中的值將變為（　　）
A．14,13,12,8,9,7,6,5 B．5,6,7,9,8,12,13,14
C．5,6,7,8,9,12,13,14 D．14,13,12,9,8,7,6,5
【答案】A
【知識點】排序算法及程序實現
12．（2021高二下·上虞期末）有如下程序段：
Dim a(1 To 8) As Integer
key = Val(Text1.Text)
i = 1: j = 8
Do While i < j
m = ①
If key > a(m) Then
②
Else
③
End If
Loop
Text2.Text = Str(j)
已知數組a存儲一組升序數“2,3,5,9,10,15,18,25”,要查找第一個不小于key的元素下標并輸出在Text2中，則下列選項中正確的是（　　）
A．①（i+j+1）\2 ②i=m ③j=m-1
B．①（i+j+1）\2 ②i=m+1 ③j=m
C．①（i+j）\2 ②i=m ③j=m+1
D．①（i+j）\2 ②i=m+1 ③j=m
【答案】D
【知識點】查找算法及程序實現
二、非選擇題（本大題共4小題，4+8+7+6，共26分。）
13．（2021高二下·上虞期末）陳老師收集了高三學生某次模擬考試的統計數據，并使用EXCEL軟件進行數據處理，如圖a所示。
圖a
請回答下列問題：
（1）為計算各班級七選三總分平均分和所有科目總分平均分，首先在M3單元格輸入公式=AVERAGEIF(B3:B392,L3,I3:I392),再向右向下填充完成各班級的七選三總分平均分和所有科目的總分平均分的計算，發現結果不正確，則M3單元格中正確的公式應為　 　。（提示：AVERAGEIF函數用于對區域中滿足條件的單元格求平均值。例如：=AVERAGEIF(B3:B392,L3,I3:I392)表示計算B3:B392區域中班級為“高三（01）班”的“七選三總分”平均值。）
（2）完成了各班級七選三總分平均分和所有科目總分平均分的計算后，若刪除A列，則對M列和N列的數據是否有影響　 　（選填：是/否）。
（3）為了實現高三（01）班按總分從高到低排序，下列對區域 A2:J392的操作可行的是 （多選，填字母）。
A．先按“班級”為關鍵字升序排序，再按“總分”為關鍵字降序排序
B．先按“班級”篩選，選擇值為“高三（01）班”，再按“總分”進行降序排序
C．以“總分”為主要關鍵字降序、“班級”為次要關鍵字升序進行排序
D．以“班級”為主要關鍵字升序、“總分”為次要關鍵字降序進行排序
【答案】（1）=AVERAGEIF($B$3:$B$392,$L3,I$3:I$392)
（2）否
（3）B；D
【知識點】表格數據的處理與計算
14．（2021高二下·上虞期末）用Flash軟件打開“中國傳統文化.fla”文件，編輯界面如圖a所示。
請回答下列問題：
圖a
（1）關于多媒體作品設計，下列說法正確的是 （多選，填字母）。
A．制作腳本是多媒體作品制作的直接依據
B．確定作品的結構類型屬于應用需求分析
C．計劃將作品發布到網站上屬于創作需求分析
D．確定完成作品所需要的資金和時間屬于應用需求分析
E．作品的功能模塊設計描述了整個作品的組成部分、工作流程、主要界面
（2）“卷軸”圖層應用了“卷軸展開”元件如圖b，該元件類型為　 　（單選，填字母：A.圖形/B.影片剪輯/C.按鈕）,測試影片時，“卷軸”圖層中的卷軸慢慢打開后便停止，單擊“重播”按鈕重新播放本場景動畫，則卷軸展開動畫是否重新播放　 　（選填：是/否）。
（3）已知“控制”圖層第1幀上的音效設置如圖c，要求當“文字”圖層中的補間動畫開始時聲音停止播放，則正確的操作方法有 （多選，填字母）。
A．“文字”圖層第25幀添加腳本stop()；
B．選擇“控制”圖層第25幀執行“清除幀”操作
C．直接在“控制”圖層第25幀添加腳本stopAllSounds();
D．“控制”圖層第1幀聲音的“同步”設置為“數據流”并在第25幀執行“插入關鍵幀”操作
E．“控制”圖層第25幀執行“插入空白關鍵幀”操作，并將第1幀聲音的“同步”設置為“數據流”
（4）測試影片時，單擊“跳轉”按鈕，動畫會跳轉到“main”場景第1幀并停止播放，則該按鈕上添加的動作腳本為　 　。
【答案】（1）A；C；D
（2）B；否
（3）D；E
（4）on(press){gotoAndStop(“main”,1);}
【知識點】多媒體作品的規劃和設計；時間軸、幀、圖層、庫的概念及基本操作；元件的類型與應用；常用影片控制函數的應用
15．（2021高二下·上虞期末）小明設計了一個算法，來實現10個11-99之間隨機數字的升序排序，并去掉重復數字。程序設計思想如下：a(1)~a(10) 用于存放原數據，b(1)~b(num)用于存放排序完成后的結果，對于每個待排數字a(i)，先在b數組中查詢是否存在，如不存在，則放入到b數組中。程序運行界面如下圖所示。
VB代碼實現如下：
Const n = 10
Dim a(1 To 100) As Integer
Dim b(1 To 100) As Integer
Private Sub Form_Load()
‘隨機生產10個11-99之間的數字，并依次存儲在數組a中，代碼略
End Sub
Private Sub Command1_Click()
Dim num As Integer, L As Integer, R As Integer, i As Integer
Dim m As Integer, f As Boolean
num = 1: b(1) = a(1)
For i = 2 To n
b(num + 1) = a(i) + 1
f = False
For j = 1 To num + 1
If a(i) < b(j) Then
Exit For
ElseIf a(i) = b(j) Then
①
End If
Next j
If Not f Then
For k =
b(k + 1) = b(k)
Next k
②
num = num + 1
End If
Next i
‘最終將數組b的排序結果輸出到文本框中，代碼略
End Sub
根據如上代碼，請回答下列問題：
（1）若要清除文本框Text1中的內容，能實現該功能的語句是　 　 （單選，填字母：A .Text1.clear / B .Text1.Text="" / C .Text1.Caption=""）
（2）請在劃線處填上合適的代碼。
①　 　②　 　
（3）程序中加框處代碼有錯，請改正。
【答案】（1）B
（2）f = True；b(j)=a(i)
（3）num To j Step -1
【知識點】排序算法及程序實現；查找算法及程序實現
16．（2021高二下·上虞期末）小王計劃使用VB制作一個掃雷小游戲，他首先需要生成一個“雷區”：
①生成n*n的矩陣，其中計劃埋雷m個，n和m的數據分別從text1和text2中獲取（n<=10，m<=n）
②隨機位置埋好地雷后（埋雷位置用X表示且埋雷位置不重復），未埋雷的位置顯示該位置周圍一圈地雷的數量。
程序代碼如下：
Dim flag(0 To 200) As Boolean, a(0 To 200) As String
Dim n As Integer, m As Integer
Private Sub Command1_Click(　　)
Dim s As String, x As Integer, k As Integer
Dim i As Integer, j As Integer
Randomize
n = Val(Text1.Text): m = Val(Text2.Text)
‘初始化數組flag中各元素均為False，數組a中各元素值為字符"0"，代碼略
For i = 1 To m
x = Int(Rnd * (n ^ 2)) + 1
If flag(x) = True Then i = i - 1 Else flag(x) = True
Next i
For k = 1 To n * n
If flag(k) = True Then
a(k) = "X"
Else
For i = (k - 1) \ n To (k - 1) \ n + 2
For j = ①
If i = 0 Then Exit For
If flag((i - 1) * n + j) = True And j >= 1 And j <= n Then
a(k) = ②
End If
Next j
Next i
End If
Next k
For i = 1 To n * n ‘在列表框list1中輸出矩陣
s = s + " " + a(i)
If ③ Then
List1.AddItem s
s = ""
End If
Next i
End Sub
根據上述代碼，完成下列問題：
（1）上圖框中位置未埋雷，且數字被遮擋，請問該位置中應填寫的數字是　 　
（2）請在劃線處填上合適的代碼。
①　 　②　 　③　 　
【答案】（1）3
（2）(k - 1) Mod n To (k - 1) Mod n + 2或其他等價答案；Chr(Asc(a(k)) + 1)或其他等價答案；i Mod n = 0 或其他等價答案
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
二一教育在線組卷平臺（zujuan.21cnjy.com）自動生成 1 / 1登錄二一教育在線組卷平臺 助您教考全無憂
浙江省紹興市上虞區2020-2021學年高二下學期信息技術期末教學質量試卷
一、選擇題（本大題共12小題，每小題2分，共24分）
1．（2021高二下·上虞期末）下列關于信息與信息處理的說法，錯誤的是（　　）
A．信息技術始于計算機技術的誕生
B．信息可以脫離它所反映的事物被存儲和傳播
C．算術運算和邏輯運算是計算機處理信息的基本運算
D．報刊、書籍、廣播、電視和網絡都是信息的表達技術
2．（2021高二下·上虞期末）下列關于瀏覽器和網頁的說法，正確的是（　　）
A．網頁中的所有對象均存儲在網頁文件中
B．使用同一個搜索引擎不同時間的檢索結果肯定相同
C．瀏覽器與Web服務器之間進行信息傳輸采用的協議是HTTP
D．在IE瀏覽器中，使用“添加到收藏夾”功能可以保存正在瀏覽的網頁內容
3．（2021高二下·上虞期末）使用Access軟件設計校園體溫記錄系統的數據庫，其中已建好“體溫記錄”數據表用于存儲如圖所示的數據。
學號 姓名 班級 日期 體溫 是否住宿
20200510 陳怡 高一(5)班 2021.6.30 36℃ 是
20180101 沈佳森 高三(1)班 2021.6.31 36.3℃ 否
20190302 張國浩 高二(3)班 2021.6.32 36.1℃ 是
… … … … … …
下列關于“體溫記錄”數據表的描述，正確的是（　　）
A．該數據表的字段數可能多于6個
B．該校園體溫記錄系統是數據庫管理系統
C．該數據表中必定有一個字段的字段名為“學號”
D．圖中“是否住宿”列在該數據表中相應字段的數據類型一定是“文本”
4．（2021高二下·上虞期末）下列關于計算機信息編碼的描述，正確的是（　　）
A．數據的壓縮是一個解碼的過程
B．每個漢字的輸入碼和處理碼都是唯一的
C．字符“9”的內碼為39H，則字符“10”的內碼為3AH
D．在某十六進制數的末位添加一個0，其值將是原數的16倍
5．（2021高二下·上虞期末）用Photoshop軟件制作“勇攀高峰”作品，在“生命不息運動不止”圖層輸入文字“生命不息 運動不止”，相關編輯界面如題圖所示。
下列描述正確的是（　　）
A．存儲每個像素點所需的二進制位數為24位
B．無法將“底紋”圖層移動到“多圓”圖層上方
C．可以將“登頂”圖層的圖層樣式直接拷貝到“底紋”圖層
D．當前狀態下，不可以使用文字工具單獨調整“生命不息運動不止”圖層中“生命”的大小
6．（2021高二下·上虞期末）一個時長為1分鐘、采樣頻率為44.1KHz、量化位數為16bit的立體聲WAV格式音頻文件，壓縮為MP3格式的文件大小約為1MB，則其壓縮比約為（　　）
A．5:1 B．10:1 C．80:1 D．176:1
7．（2021高二下·上虞期末）以下表達式結果與其他三項不同的是（　　）
A．Len("sy2021") B．Mid("1996SX",4,1)
C．5+15 Mod 13\5 D．Sqr(Abs(-9))+Val("3")
8．（2021高二下·上虞期末）某算法的部分流程圖如圖所示。執行這部分流程后，s的值應為（　　）
A．-21 B．11 C．-5 D．1
9．（2021高二下·上虞期末）有如下程序段：
s = "Happy 2021/07"
ans = "": f = True: Max = ""
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "a" And ch <= "z" Then
ans = ans + Chr(Asc(ch) - 32)
ElseIf ch >= "0" And ch <= "9" Then
f = False
End If
If Not f And ch > Max Then
Max = ch: f = True
End If
Next i
Label1.Caption = ans + Max
執行該段程序后，標簽label1中顯示的內容是 （　　）
A．Happy7 B．HAPPY0 C．HAPPY7 D．APPY7
10．（2021高二下·上虞期末）有如下程序段：
Dim a(1 To 6) As Integer
a(1) = 6
For i = 2 To 6
a(i) = Int(Rnd * 30 + 1) * 3
If a(i) Mod 2 = 1 And i Mod 2 = 0 Then
i = i - 1
ElseIf a(i) > 60 Then
a(i) = a(i) - a(i - 1)
End If
Next i
執行該段程序后，a(1)~a(6)中的值可能是 （　　）
A．6,36,15,42,72,12 B．6,14,36,51,18,21
C．6,60,3,87,0,90 D．6,18,21,75,27,21
11．（2021高二下·上虞期末）有程序段如下：
Dim a(1 To 8) As Integer
K = 8: n = 8
For i = 1 To 3
For j = i + 1 To n
If a(i) < a(j) Then
t = a(i): a(i) = a(j): a(j) = t
End If
Next j
For j = n - i To i + 1 Step -1
If a(k) > a(j) Then
t = a(k): a(k) = a(j): a(j) = t
End If
Next j
k = k - 1
Next i
數組元素a(1)~a(8)中的初始值為：8,13,7,14,6,9,5,12,執行該程序段后，數組元素a(1)~a(8)中的值將變為（　　）
A．14,13,12,8,9,7,6,5 B．5,6,7,9,8,12,13,14
C．5,6,7,8,9,12,13,14 D．14,13,12,9,8,7,6,5
12．（2021高二下·上虞期末）有如下程序段：
Dim a(1 To 8) As Integer
key = Val(Text1.Text)
i = 1: j = 8
Do While i < j
m = ①
If key > a(m) Then
②
Else
③
End If
Loop
Text2.Text = Str(j)
已知數組a存儲一組升序數“2,3,5,9,10,15,18,25”,要查找第一個不小于key的元素下標并輸出在Text2中，則下列選項中正確的是（　　）
A．①（i+j+1）\2 ②i=m ③j=m-1
B．①（i+j+1）\2 ②i=m+1 ③j=m
C．①（i+j）\2 ②i=m ③j=m+1
D．①（i+j）\2 ②i=m+1 ③j=m
二、非選擇題（本大題共4小題，4+8+7+6，共26分。）
13．（2021高二下·上虞期末）陳老師收集了高三學生某次模擬考試的統計數據，并使用EXCEL軟件進行數據處理，如圖a所示。
圖a
請回答下列問題：
（1）為計算各班級七選三總分平均分和所有科目總分平均分，首先在M3單元格輸入公式=AVERAGEIF(B3:B392,L3,I3:I392),再向右向下填充完成各班級的七選三總分平均分和所有科目的總分平均分的計算，發現結果不正確，則M3單元格中正確的公式應為　 　。（提示：AVERAGEIF函數用于對區域中滿足條件的單元格求平均值。例如：=AVERAGEIF(B3:B392,L3,I3:I392)表示計算B3:B392區域中班級為“高三（01）班”的“七選三總分”平均值。）
（2）完成了各班級七選三總分平均分和所有科目總分平均分的計算后，若刪除A列，則對M列和N列的數據是否有影響　 　（選填：是/否）。
（3）為了實現高三（01）班按總分從高到低排序，下列對區域 A2:J392的操作可行的是 （多選，填字母）。
A．先按“班級”為關鍵字升序排序，再按“總分”為關鍵字降序排序
B．先按“班級”篩選，選擇值為“高三（01）班”，再按“總分”進行降序排序
C．以“總分”為主要關鍵字降序、“班級”為次要關鍵字升序進行排序
D．以“班級”為主要關鍵字升序、“總分”為次要關鍵字降序進行排序
14．（2021高二下·上虞期末）用Flash軟件打開“中國傳統文化.fla”文件，編輯界面如圖a所示。
請回答下列問題：
圖a
（1）關于多媒體作品設計，下列說法正確的是 （多選，填字母）。
A．制作腳本是多媒體作品制作的直接依據
B．確定作品的結構類型屬于應用需求分析
C．計劃將作品發布到網站上屬于創作需求分析
D．確定完成作品所需要的資金和時間屬于應用需求分析
E．作品的功能模塊設計描述了整個作品的組成部分、工作流程、主要界面
（2）“卷軸”圖層應用了“卷軸展開”元件如圖b，該元件類型為　 　（單選，填字母：A.圖形/B.影片剪輯/C.按鈕）,測試影片時，“卷軸”圖層中的卷軸慢慢打開后便停止，單擊“重播”按鈕重新播放本場景動畫，則卷軸展開動畫是否重新播放　 　（選填：是/否）。
（3）已知“控制”圖層第1幀上的音效設置如圖c，要求當“文字”圖層中的補間動畫開始時聲音停止播放，則正確的操作方法有 （多選，填字母）。
A．“文字”圖層第25幀添加腳本stop()；
B．選擇“控制”圖層第25幀執行“清除幀”操作
C．直接在“控制”圖層第25幀添加腳本stopAllSounds();
D．“控制”圖層第1幀聲音的“同步”設置為“數據流”并在第25幀執行“插入關鍵幀”操作
E．“控制”圖層第25幀執行“插入空白關鍵幀”操作，并將第1幀聲音的“同步”設置為“數據流”
（4）測試影片時，單擊“跳轉”按鈕，動畫會跳轉到“main”場景第1幀并停止播放，則該按鈕上添加的動作腳本為　 　。
15．（2021高二下·上虞期末）小明設計了一個算法，來實現10個11-99之間隨機數字的升序排序，并去掉重復數字。程序設計思想如下：a(1)~a(10) 用于存放原數據，b(1)~b(num)用于存放排序完成后的結果，對于每個待排數字a(i)，先在b數組中查詢是否存在，如不存在，則放入到b數組中。程序運行界面如下圖所示。
VB代碼實現如下：
Const n = 10
Dim a(1 To 100) As Integer
Dim b(1 To 100) As Integer
Private Sub Form_Load()
‘隨機生產10個11-99之間的數字，并依次存儲在數組a中，代碼略
End Sub
Private Sub Command1_Click()
Dim num As Integer, L As Integer, R As Integer, i As Integer
Dim m As Integer, f As Boolean
num = 1: b(1) = a(1)
For i = 2 To n
b(num + 1) = a(i) + 1
f = False
For j = 1 To num + 1
If a(i) < b(j) Then
Exit For
ElseIf a(i) = b(j) Then
①
End If
Next j
If Not f Then
For k =
b(k + 1) = b(k)
Next k
②
num = num + 1
End If
Next i
‘最終將數組b的排序結果輸出到文本框中，代碼略
End Sub
根據如上代碼，請回答下列問題：
（1）若要清除文本框Text1中的內容，能實現該功能的語句是　 　 （單選，填字母：A .Text1.clear / B .Text1.Text="" / C .Text1.Caption=""）
（2）請在劃線處填上合適的代碼。
①　 　②　 　
（3）程序中加框處代碼有錯，請改正。
16．（2021高二下·上虞期末）小王計劃使用VB制作一個掃雷小游戲，他首先需要生成一個“雷區”：
①生成n*n的矩陣，其中計劃埋雷m個，n和m的數據分別從text1和text2中獲取（n<=10，m<=n）
②隨機位置埋好地雷后（埋雷位置用X表示且埋雷位置不重復），未埋雷的位置顯示該位置周圍一圈地雷的數量。
程序代碼如下：
Dim flag(0 To 200) As Boolean, a(0 To 200) As String
Dim n As Integer, m As Integer
Private Sub Command1_Click(　　)
Dim s As String, x As Integer, k As Integer
Dim i As Integer, j As Integer
Randomize
n = Val(Text1.Text): m = Val(Text2.Text)
‘初始化數組flag中各元素均為False，數組a中各元素值為字符"0"，代碼略
For i = 1 To m
x = Int(Rnd * (n ^ 2)) + 1
If flag(x) = True Then i = i - 1 Else flag(x) = True
Next i
For k = 1 To n * n
If flag(k) = True Then
a(k) = "X"
Else
For i = (k - 1) \ n To (k - 1) \ n + 2
For j = ①
If i = 0 Then Exit For
If flag((i - 1) * n + j) = True And j >= 1 And j <= n Then
a(k) = ②
End If
Next j
Next i
End If
Next k
For i = 1 To n * n ‘在列表框list1中輸出矩陣
s = s + " " + a(i)
If ③ Then
List1.AddItem s
s = ""
End If
Next i
End Sub
根據上述代碼，完成下列問題：
（1）上圖框中位置未埋雷，且數字被遮擋，請問該位置中應填寫的數字是　 　
（2）請在劃線處填上合適的代碼。
①　 　②　 　③　 　
答案解析部分
1．【答案】A
【知識點】信息及其特征；信息技術的概念與關鍵技術；信息加工與處理的概念；信息表達方式與表達技術
2．【答案】C
【知識點】瀏覽器；網絡資源的檢索
3．【答案】A
【知識點】數據表、字段、記錄的概念；字段的數據類型
4．【答案】D
【知識點】字符編碼
5．【答案】A
【知識點】圖片加工常用工具的使用；圖層及圖層的基本操作
6．【答案】B
【知識點】聲音、圖像、視頻編碼
7．【答案】B
【知識點】運算符、基本運算與表達式
8．【答案】B
【知識點】流程圖識讀
9．【答案】D
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
10．【答案】C
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
11．【答案】A
【知識點】排序算法及程序實現
12．【答案】D
【知識點】查找算法及程序實現
13．【答案】（1）=AVERAGEIF($B$3:$B$392,$L3,I$3:I$392)
（2）否
（3）B；D
【知識點】表格數據的處理與計算
14．【答案】（1）A；C；D
（2）B；否
（3）D；E
（4）on(press){gotoAndStop(“main”,1);}
【知識點】多媒體作品的規劃和設計；時間軸、幀、圖層、庫的概念及基本操作；元件的類型與應用；常用影片控制函數的應用
15．【答案】（1）B
（2）f = True；b(j)=a(i)
（3）num To j Step -1
【知識點】排序算法及程序實現；查找算法及程序實現
16．【答案】（1）3
（2）(k - 1) Mod n To (k - 1) Mod n + 2或其他等價答案；Chr(Asc(a(k)) + 1)或其他等價答案；i Mod n = 0 或其他等價答案
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
二一教育在線組卷平臺（zujuan.21cnjy.com）自動生成 1 / 1

展開更多......

收起↑