資源簡介

浙江省寧波市慈溪市2020-2021學年高二下學期信息技術期末測試卷
一、選擇題(本大題共12小題，每小題2分，共24分。)
1．（2021高二下·慈溪期末）下列關于信息的描述，錯誤的是(　　)
A．信息自古存在，隨著時間變化，信息的價值可能產生變化
B．信息可以脫離載體被存儲、保存和傳播
C．微博、抖音等網絡媒體往往采用文字、聲音、圖像等多種方式進行信息表達
D．時下火熱的5G技術、芯片制造技術都屬于現代信息技術
【答案】B
【知識點】信息及其特征；信息技術的概念與關鍵技術；信息表達方式與表達技術
2．（2021高二下·慈溪期末）下列應用中沒有體現人工智能技術的是（　　）
A．蔚來等新能源電動車在車輛行駛過程中實現自動駕駛
B．通過對人臉特征或眼睛虹膜的識別辨識身份
C．國際大會中，同聲傳譯員通過專門的設備為聽講者提供實時的翻譯
D．通過天貓精靈語音控制房間內的電子設備
【答案】C
【知識點】人工智能的應用
3．（2021高二下·慈溪期末）用Access軟件設計一張“學生疫苗接種情況”數據表，用于存儲如圖所示的數據。
身份證號 姓名 性別 是否接種 最后一針接種時間 疫苗品牌
330281*4115 張立 男 是 2020-3-10 北京生物
330281*320X 李丹 女 否 / 　
330281*8617 蘇寧 男 是 2020-3-28 科興中維
…… …… …… …… …… ……
下列關于該數據表的描述，錯誤的是（　　）
A．該數據表中的記錄順序與圖中數據的行順序可以不一致
B．該數據表的字段個數可能大于6個
C．該數據表中可以對“身份證號”數據的字段設置主鍵
D．該數據表中“最后一針接種時間”數據的字段類型一定為“日期/時間"
【答案】D
【知識點】數據表、字段、記錄的概念；字段的數據類型
4．（2021高二下·慈溪期末）使用UltraEdit軟件查看字符內碼，部分界面如圖所示。下列說法正確的是（　　）
A．共有8個ASCII碼字符
B．上述字符共占據12個字節
C．由圖可知字符“A”的內碼為81H
D．字符“黨”的內碼二進制表示為“10101 1010”
【答案】D
【知識點】進制及數制轉換；字符編碼
5．（2021高二下·慈溪期末）使用GoldWave軟件編輯某音頻文件，選擇其中一段音頓后的部分界面如圖所示。
當前狀態下，下列說法正確的是（　　）
A．執行“刪除”操作后，該音頻文件的時長將變為10秒
B．執行“剪裁”操作后，該音頻文件的大小將變為原來的1/3
C．執行“插入靜音”操作插入2秒靜音，左聲道的第10秒出現2秒靜音
D．執行“靜音”操作后，該音頻文件的存儲容量約為2.52MB
【答案】D
【知識點】聲音素材的基本處理；聲音、圖像、視頻編碼
6．（2021高二下·慈溪期末）將一段時長為10秒、1024×768像素、24位真彩色、PAL制式的未經壓縮的AVI格式的無聲視頻，以壓縮比4：1的方式保存為MP4文件，得到的文件大小約為(　　)
A．675MB B．562.5MB C．140.6MB D．168.8MB
【答案】C
【知識點】聲音、圖像、視頻編碼
7．（2021高二下·慈溪期末）下列VB表達式值最大的是(　　)
A．Val (Mid("你好2021！"，3， 2))\5
B．2021 mod 2*3
C．Sqr(Abs(Int(-35.8)))
D．Int(Rnd*3+8)
【答案】D
【知識點】運算符、基本運算與表達式
8．（2021高二下·慈溪期末）某算法的部分流程圖如圖所示，執行完該流程圖后，下列說法錯誤的是(　　)
A．a的值為10
B．b的值為"0001111222”
C．循環共執行了9次
D．若循環條件改為“i≤20"，則a的值不變
【答案】C
【知識點】流程圖識讀
9．（2021高二下·慈溪期末）有如下VB程序段：
flag = True
For i=1 To 5
If a(i) Mod2=0 And flag = True Then
s=s+ a(i)： flag = False
Else
flag = True
End If
Next i
數組元素a(1)到a(5)的值依次為“42，38，53，45，78”，執行該程序段后，s的值為（　　）
A．173 B．158 C．120 D．42
【答案】C
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
10．（2021高二下·慈溪期末）采用冒泡排序算法對數據序列“4，9，8，2，6，3”完成升序排序，則需要交換的次數為（　　）
A．9 B．10 C．11 D．12
【答案】B
【知識點】排序算法及程序實現
11．（2021高二下·慈溪期末）有如下VB程序段：
s = "Fr0lyympWics"： s1 = "FryW"：w = 1
For i = 1 To Len(s1)
For j=w To Len(s)
If Mid(s1，i，1) = Mid(s，j，1) Then
w =j+1： Exit For
Else
c=c+Mid(s，j，1)
End If
Next j
Next i
執行該程序段后，變量c的值是（　　）
A．"01mp" B．"0lymp" C．"0lympics" D．"01mpics"
【答案】B
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
12．（2021高二下·慈溪期末）有如下VB程序段：
i=1：j=10：k=1：key=Val(Text1．Text)
Do While I < =j
m=(i+j+1)\2
If key = a(m) Then
Exit Do
Else If key < a(m) Then
i=m+1：k=k*2
Else
j=m-1：k=k/2
End If
Loop
Text2.Text = Str(k)
數組元素a(1)到a(10)的值依次為“120，97，88，66，50，46，24，20，18，6”，在文本框Text1輸入下列選項值，所得的輸出結果與其他三項不同的是（　　）
A．96 B．65 C．50 D．22
【答案】A
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
二、非選擇題(本大題共4小題，4+8+7+7，共26分)
13．（2021高二下·慈溪期末）小張采集了某比賽選手得分數據，使用Excel軟件進行數據處理，如圖a所示。
請回答下列問題：
（1）在M7單元格中，使用AVERAGEIF函數計算各地區選手平均得分，然后通過自動填充得到M8：M16的公式，則M7單元格的公式為　 　(提示：AVERAGEIF函數用于對區域中滿足條件的單元格求平均。例如：=AVERAGEIF (B4：B337，“杭州”，J4：J337)表示杭州地區所有選手的平均得分)
（2）根據圖a中數據制作的圖表如圖b所示，創建該圖表的數據區域是　 　。
（3）要對圖a所示的工作表中的數據作進一步處理，下列說法正確的是 。(多選，填寫字母)
A．要將工作表中選手的數據以地市為主要關鍵字，綜合得分為次要關鍵字降序排序，應選擇的區域為A4：J337
B．將J4：J337區域數據小數位統一設為保留2位小數，圖b所示的圖表不會發生改變。
C．要選出寧波地區得分前3的選手數據，可以以地市為“寧波”，再以綜合得分為“最大的3項”為篩選條件獲得。
D．綜合總分比例變為“筆試分80%、面試分10%、技能分10%”，圖b所示的圖表不會發生變化。
【答案】（1）=AVERAGEIF ($B$4： $B$337， L7， $J$4：$J$337)或其他可行
（2）L6： M6，L10：M10， L13： M15
（3）A；B
【知識點】表格數據的處理與計算
14．（2021高二下·慈溪期末）小明同學使用Flash軟件模擬天問一號任務探測器著陸過程，部分界面如下圖所示。請回答下列問題：
（1）在制作作品前，小明進行了需求分析，下列屬于創作需求分析的是　 　(多選：填字母：A .作品面向正在上小學孩子的家長\B .作品發布到校園網\C .設定該作品為演示型作品\D .完成這個作品需要一周時間\E .利用Flash和Photoshop完成作品制作。)
（2）音樂圖層聲音在動畫結束后持續播放，其同步屬性應設置為　 　 。(選填：事件/數據流)，“前往未至”圖層的動畫類型為　 　。(選填：動畫補問/形狀補間/逐幀動畫)
（3）“按鈕”圖層的按鈕實例在動畫第一幀就出現了，想要最后一幀才出現，下列可行的修改操作有 (多選：填字母)
A．將該圖層第1幀移到50幀
B．復制該圖層第1幀的內容粘貼到第50幀
C．在該圖層最后一幀處插入關鍵幀
D．在該圖層最后一幀處插入關鍵幀，并刪除第1幀中的內容
E．在該圖層最后一幀處插入關鍵幀，并對第1幀執行清除幀操作
（4）測試影片時，單擊“重新探索”按鈕可跳轉到該場景第1幀重新播放，則該按鈕上添加的動作腳本應為　 　。
【答案】（1）BCE
（2）事件；動畫補間
（3）A；D
（4）on (press) {gotoAndPlay(1)； }或on (press) {gotoAndPlay(“巡”，1)； }或其他可行答案
【知識點】多媒體作品的規劃和設計；動畫的類型；常用影片控制函數的應用；聲音同步屬性設置
15．（2021高二下·慈溪期末）為了提高群眾的安全意識，需嬰從各個學校挑選志愿者做好防詐騙宣傳。組委會從數據庫中看到k(1<=k<=11)個不同的學校共上報了n(k<=n<=100)
位志愿者。由于人數太多，為了快速決定志愿者人選，組委會決定從中選擇一段連續的區問，這個區間內每個報名的學校至少包含1名志愿者，同時要求滿足條件的區間長度最小，輸出區間內的志愿者名單。
例如，有10條報名數據，來自5個不同的學校，學校編碼依次是2，1，2，4，3，3，5，5，3，5，則包含5個學校的最短區間是從第2個到第7個，并從List2中顯示所選區間中的志愿者姓名，程序界面如圖所示。
（1）要使窗體Form1標題顯示“選取志愿者”，則需修改該窗體的　 　(單選，填字母：A .Text/B .Caption/ C .Name(名稱)屬性。
（2）實現上述功能的VB程序如下，請在劃線處填入合適的代碼。
Dim bm(1 To 100) As Integer, k As Integer
Dim xm(1 To 100) As String, n As Integer
Private Sub Form Load(　　)
‘本過程從數據庫中讀入指定數據到數組bm、xm中，并在List1中顯示
‘獲取k，表示不同學校數： n表示報名記錄總數代碼略
End Sub
Private Sub Command1_Click(　　)
Dim m As
Integer
i = k：j=n
Do While i
<=j
m=　 　
If
judge(m) <> 0 Then
j=m-1
ans = m： start = judge (m)
Else
i=m+1
End If
Loop
For i=1 To
ans
List2.AddItem
Next i
Label1.Caption =“共選出志愿者”+ CStr(ans) + "人”
End Sub
Function judge(m As Integer) As Integer ‘judge函數用于返回區間起始位置
Dim f(1 To 11) As Integer 'f(i)表示i學校是否包含在區間
Dim t As Integer
judge = 0
For i=1 To n-m+ 1 ‘枚舉以i為起點的區間內是否包含各個學校
t=0
For j=i To i+m-1
If 　 　 Then t=t+ 1
f(bm(j)) = 1
Next j
If t=k Then 　 　 ： Exit Function
For j=1 To k
f(j) = 0
Next j
Next i
End Function
（3）程序中加框處代碼有錯，請改正。
【答案】（1）B
（2）(i+ j)\ 2或等價表達式；f(bm(j)) = 0；judge =i
（3）xm(start + i-1)
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；過程與自定義函數
16．（2021高二下·慈溪期末）要對報告廳內參加表演和觀看演出的學生座位進行安排，具體學生相關數據如下表1所示。班級已經按從小到大排定，節目共4個，編號依次為1-4，不參加表演的學生的節目編號為5；已知報告廳有200個座位(10排20列)，全部報名人數為150人，其中參加節目表演的學生為12人。座位安排規則如下：①左上區域有12個座位(3 排4列)為表演學生專座，用“○”表示，從左至右，從前至后，按節目順序從小到大依次安排座位。②其他區域用“□”表示，從左至右，從前至后，按班級順序依次安排不參加表演的學生的座位。
在Text1中輸入班級，在Text2中輸入姓名，單擊“查詢”按鈕Command1，顯示：①學生行列位置顯示在標簽Label2中：②學生具體位置顯示在列表框List1中。程序運行界面如圖所示。
（1）根據表1顯示的數據，1班的黃楠，所在的位置是　 　(例填：第1排第1列)。
班級 1 1 1 1 1 2 2 2 3 3 ……
姓名 王寬 彭建飛 楊健 黃楠 李明 李英 張本初 吳曦 宋純 姜明 ……
節目編號 1 5 2 5 5 2 1 4 5 5 ……
表1
（2）請在劃線處填入合適的代碼。
Const n = 150
Const row = 10：
Const col = 20
Const acty = 3：
Const actx= 4
Dim a(1 To n) As Strire， b(1 To n) As String， c(1 To n)
As String
Dim e(1 To row * col) As String ‘存儲學生姓名
Private Sub Command1_Click(　　)
num =
f(Text1. Text， Text2. Text)
If num
<> 0 Then
l=
(num-1) \col + 1
　 　
'在list1中用實心圖形標記查找到的位置，代碼略
Label2.
Caption =“你的位置在：第“+ Str(1) +”排，第“+ Str(r) + ”列”
Else
Label2. Caption =“沒有找到你的座位！”
End If
End Sub
Private Sub Form _Load(　　)
Dim lastn
As Integer， m As Integer ，flag As Boolean，k As Integer
'讀取班級、學生姓名、參加節目編號到數組a、b、c中，代碼略
flag =
True： lastn = 1
Do While
flag
　 　
For
j=n To lastn+1 Step -1
If
c(j)t=
a(j)： a(j) = a(j-1)： a(j- 1) = t
t=b(j)：
b(j) = b(j-1)： b(j- 1) = t
t=c(j)：
c(j) = c(j- 1)： c(j-1)= t
lastn = j：flag
= True
End If
Next
j
Loop
‘座位初始化，并且在list1中顯示，代碼略
m=1：k=13
For i=1 To
row
For
j=1 To col
If 　 　 Then
e((i-1) *col+j)=b(m)：m=m+1
ElseIf k <= n Then
e((i - 1) * col + j) = b(k)：k=k+1
End
If
Next j
Next i
End Sub
Function f(a As String，b As String) As Integer
‘函數f根據輸入的班級、姓名返回在數組e中的位置，如果沒有找到則返回數字0
End Function
【答案】（1）第1排第6列
（2）r= (num- 1) Mod col+1；flag=False；i<=acty And j<=actx 或者i<=3 And j<=4
【知識點】過程與自定義函數；排序算法及程序實現
1 / 1浙江省寧波市慈溪市2020-2021學年高二下學期信息技術期末測試卷
一、選擇題(本大題共12小題，每小題2分，共24分。)
1．（2021高二下·慈溪期末）下列關于信息的描述，錯誤的是(　　)
A．信息自古存在，隨著時間變化，信息的價值可能產生變化
B．信息可以脫離載體被存儲、保存和傳播
C．微博、抖音等網絡媒體往往采用文字、聲音、圖像等多種方式進行信息表達
D．時下火熱的5G技術、芯片制造技術都屬于現代信息技術
2．（2021高二下·慈溪期末）下列應用中沒有體現人工智能技術的是（　　）
A．蔚來等新能源電動車在車輛行駛過程中實現自動駕駛
B．通過對人臉特征或眼睛虹膜的識別辨識身份
C．國際大會中，同聲傳譯員通過專門的設備為聽講者提供實時的翻譯
D．通過天貓精靈語音控制房間內的電子設備
3．（2021高二下·慈溪期末）用Access軟件設計一張“學生疫苗接種情況”數據表，用于存儲如圖所示的數據。
身份證號 姓名 性別 是否接種 最后一針接種時間 疫苗品牌
330281*4115 張立 男 是 2020-3-10 北京生物
330281*320X 李丹 女 否 / 　
330281*8617 蘇寧 男 是 2020-3-28 科興中維
…… …… …… …… …… ……
下列關于該數據表的描述，錯誤的是（　　）
A．該數據表中的記錄順序與圖中數據的行順序可以不一致
B．該數據表的字段個數可能大于6個
C．該數據表中可以對“身份證號”數據的字段設置主鍵
D．該數據表中“最后一針接種時間”數據的字段類型一定為“日期/時間"
4．（2021高二下·慈溪期末）使用UltraEdit軟件查看字符內碼，部分界面如圖所示。下列說法正確的是（　　）
A．共有8個ASCII碼字符
B．上述字符共占據12個字節
C．由圖可知字符“A”的內碼為81H
D．字符“黨”的內碼二進制表示為“10101 1010”
5．（2021高二下·慈溪期末）使用GoldWave軟件編輯某音頻文件，選擇其中一段音頓后的部分界面如圖所示。
當前狀態下，下列說法正確的是（　　）
A．執行“刪除”操作后，該音頻文件的時長將變為10秒
B．執行“剪裁”操作后，該音頻文件的大小將變為原來的1/3
C．執行“插入靜音”操作插入2秒靜音，左聲道的第10秒出現2秒靜音
D．執行“靜音”操作后，該音頻文件的存儲容量約為2.52MB
6．（2021高二下·慈溪期末）將一段時長為10秒、1024×768像素、24位真彩色、PAL制式的未經壓縮的AVI格式的無聲視頻，以壓縮比4：1的方式保存為MP4文件，得到的文件大小約為(　　)
A．675MB B．562.5MB C．140.6MB D．168.8MB
7．（2021高二下·慈溪期末）下列VB表達式值最大的是(　　)
A．Val (Mid("你好2021！"，3， 2))\5
B．2021 mod 2*3
C．Sqr(Abs(Int(-35.8)))
D．Int(Rnd*3+8)
8．（2021高二下·慈溪期末）某算法的部分流程圖如圖所示，執行完該流程圖后，下列說法錯誤的是(　　)
A．a的值為10
B．b的值為"0001111222”
C．循環共執行了9次
D．若循環條件改為“i≤20"，則a的值不變
9．（2021高二下·慈溪期末）有如下VB程序段：
flag = True
For i=1 To 5
If a(i) Mod2=0 And flag = True Then
s=s+ a(i)： flag = False
Else
flag = True
End If
Next i
數組元素a(1)到a(5)的值依次為“42，38，53，45，78”，執行該程序段后，s的值為（　　）
A．173 B．158 C．120 D．42
10．（2021高二下·慈溪期末）采用冒泡排序算法對數據序列“4，9，8，2，6，3”完成升序排序，則需要交換的次數為（　　）
A．9 B．10 C．11 D．12
11．（2021高二下·慈溪期末）有如下VB程序段：
s = "Fr0lyympWics"： s1 = "FryW"：w = 1
For i = 1 To Len(s1)
For j=w To Len(s)
If Mid(s1，i，1) = Mid(s，j，1) Then
w =j+1： Exit For
Else
c=c+Mid(s，j，1)
End If
Next j
Next i
執行該程序段后，變量c的值是（　　）
A．"01mp" B．"0lymp" C．"0lympics" D．"01mpics"
12．（2021高二下·慈溪期末）有如下VB程序段：
i=1：j=10：k=1：key=Val(Text1．Text)
Do While I < =j
m=(i+j+1)\2
If key = a(m) Then
Exit Do
Else If key < a(m) Then
i=m+1：k=k*2
Else
j=m-1：k=k/2
End If
Loop
Text2.Text = Str(k)
數組元素a(1)到a(10)的值依次為“120，97，88，66，50，46，24，20，18，6”，在文本框Text1輸入下列選項值，所得的輸出結果與其他三項不同的是（　　）
A．96 B．65 C．50 D．22
二、非選擇題(本大題共4小題，4+8+7+7，共26分)
13．（2021高二下·慈溪期末）小張采集了某比賽選手得分數據，使用Excel軟件進行數據處理，如圖a所示。
請回答下列問題：
（1）在M7單元格中，使用AVERAGEIF函數計算各地區選手平均得分，然后通過自動填充得到M8：M16的公式，則M7單元格的公式為　 　(提示：AVERAGEIF函數用于對區域中滿足條件的單元格求平均。例如：=AVERAGEIF (B4：B337，“杭州”，J4：J337)表示杭州地區所有選手的平均得分)
（2）根據圖a中數據制作的圖表如圖b所示，創建該圖表的數據區域是　 　。
（3）要對圖a所示的工作表中的數據作進一步處理，下列說法正確的是 。(多選，填寫字母)
A．要將工作表中選手的數據以地市為主要關鍵字，綜合得分為次要關鍵字降序排序，應選擇的區域為A4：J337
B．將J4：J337區域數據小數位統一設為保留2位小數，圖b所示的圖表不會發生改變。
C．要選出寧波地區得分前3的選手數據，可以以地市為“寧波”，再以綜合得分為“最大的3項”為篩選條件獲得。
D．綜合總分比例變為“筆試分80%、面試分10%、技能分10%”，圖b所示的圖表不會發生變化。
14．（2021高二下·慈溪期末）小明同學使用Flash軟件模擬天問一號任務探測器著陸過程，部分界面如下圖所示。請回答下列問題：
（1）在制作作品前，小明進行了需求分析，下列屬于創作需求分析的是　 　(多選：填字母：A .作品面向正在上小學孩子的家長\B .作品發布到校園網\C .設定該作品為演示型作品\D .完成這個作品需要一周時間\E .利用Flash和Photoshop完成作品制作。)
（2）音樂圖層聲音在動畫結束后持續播放，其同步屬性應設置為　 　 。(選填：事件/數據流)，“前往未至”圖層的動畫類型為　 　。(選填：動畫補問/形狀補間/逐幀動畫)
（3）“按鈕”圖層的按鈕實例在動畫第一幀就出現了，想要最后一幀才出現，下列可行的修改操作有 (多選：填字母)
A．將該圖層第1幀移到50幀
B．復制該圖層第1幀的內容粘貼到第50幀
C．在該圖層最后一幀處插入關鍵幀
D．在該圖層最后一幀處插入關鍵幀，并刪除第1幀中的內容
E．在該圖層最后一幀處插入關鍵幀，并對第1幀執行清除幀操作
（4）測試影片時，單擊“重新探索”按鈕可跳轉到該場景第1幀重新播放，則該按鈕上添加的動作腳本應為　 　。
15．（2021高二下·慈溪期末）為了提高群眾的安全意識，需嬰從各個學校挑選志愿者做好防詐騙宣傳。組委會從數據庫中看到k(1<=k<=11)個不同的學校共上報了n(k<=n<=100)
位志愿者。由于人數太多，為了快速決定志愿者人選，組委會決定從中選擇一段連續的區問，這個區間內每個報名的學校至少包含1名志愿者，同時要求滿足條件的區間長度最小，輸出區間內的志愿者名單。
例如，有10條報名數據，來自5個不同的學校，學校編碼依次是2，1，2，4，3，3，5，5，3，5，則包含5個學校的最短區間是從第2個到第7個，并從List2中顯示所選區間中的志愿者姓名，程序界面如圖所示。
（1）要使窗體Form1標題顯示“選取志愿者”，則需修改該窗體的　 　(單選，填字母：A .Text/B .Caption/ C .Name(名稱)屬性。
（2）實現上述功能的VB程序如下，請在劃線處填入合適的代碼。
Dim bm(1 To 100) As Integer, k As Integer
Dim xm(1 To 100) As String, n As Integer
Private Sub Form Load(　　)
‘本過程從數據庫中讀入指定數據到數組bm、xm中，并在List1中顯示
‘獲取k，表示不同學校數： n表示報名記錄總數代碼略
End Sub
Private Sub Command1_Click(　　)
Dim m As
Integer
i = k：j=n
Do While i
<=j
m=　 　
If
judge(m) <> 0 Then
j=m-1
ans = m： start = judge (m)
Else
i=m+1
End If
Loop
For i=1 To
ans
List2.AddItem
Next i
Label1.Caption =“共選出志愿者”+ CStr(ans) + "人”
End Sub
Function judge(m As Integer) As Integer ‘judge函數用于返回區間起始位置
Dim f(1 To 11) As Integer 'f(i)表示i學校是否包含在區間
Dim t As Integer
judge = 0
For i=1 To n-m+ 1 ‘枚舉以i為起點的區間內是否包含各個學校
t=0
For j=i To i+m-1
If 　 　 Then t=t+ 1
f(bm(j)) = 1
Next j
If t=k Then 　 　 ： Exit Function
For j=1 To k
f(j) = 0
Next j
Next i
End Function
（3）程序中加框處代碼有錯，請改正。
16．（2021高二下·慈溪期末）要對報告廳內參加表演和觀看演出的學生座位進行安排，具體學生相關數據如下表1所示。班級已經按從小到大排定，節目共4個，編號依次為1-4，不參加表演的學生的節目編號為5；已知報告廳有200個座位(10排20列)，全部報名人數為150人，其中參加節目表演的學生為12人。座位安排規則如下：①左上區域有12個座位(3 排4列)為表演學生專座，用“○”表示，從左至右，從前至后，按節目順序從小到大依次安排座位。②其他區域用“□”表示，從左至右，從前至后，按班級順序依次安排不參加表演的學生的座位。
在Text1中輸入班級，在Text2中輸入姓名，單擊“查詢”按鈕Command1，顯示：①學生行列位置顯示在標簽Label2中：②學生具體位置顯示在列表框List1中。程序運行界面如圖所示。
（1）根據表1顯示的數據，1班的黃楠，所在的位置是　 　(例填：第1排第1列)。
班級 1 1 1 1 1 2 2 2 3 3 ……
姓名 王寬 彭建飛 楊健 黃楠 李明 李英 張本初 吳曦 宋純 姜明 ……
節目編號 1 5 2 5 5 2 1 4 5 5 ……
表1
（2）請在劃線處填入合適的代碼。
Const n = 150
Const row = 10：
Const col = 20
Const acty = 3：
Const actx= 4
Dim a(1 To n) As Strire， b(1 To n) As String， c(1 To n)
As String
Dim e(1 To row * col) As String ‘存儲學生姓名
Private Sub Command1_Click(　　)
num =
f(Text1. Text， Text2. Text)
If num
<> 0 Then
l=
(num-1) \col + 1
　 　
'在list1中用實心圖形標記查找到的位置，代碼略
Label2.
Caption =“你的位置在：第“+ Str(1) +”排，第“+ Str(r) + ”列”
Else
Label2. Caption =“沒有找到你的座位！”
End If
End Sub
Private Sub Form _Load(　　)
Dim lastn
As Integer， m As Integer ，flag As Boolean，k As Integer
'讀取班級、學生姓名、參加節目編號到數組a、b、c中，代碼略
flag =
True： lastn = 1
Do While
flag
　 　
For
j=n To lastn+1 Step -1
If
c(j)t=
a(j)： a(j) = a(j-1)： a(j- 1) = t
t=b(j)：
b(j) = b(j-1)： b(j- 1) = t
t=c(j)：
c(j) = c(j- 1)： c(j-1)= t
lastn = j：flag
= True
End If
Next
j
Loop
‘座位初始化，并且在list1中顯示，代碼略
m=1：k=13
For i=1 To
row
For
j=1 To col
If 　 　 Then
e((i-1) *col+j)=b(m)：m=m+1
ElseIf k <= n Then
e((i - 1) * col + j) = b(k)：k=k+1
End
If
Next j
Next i
End Sub
Function f(a As String，b As String) As Integer
‘函數f根據輸入的班級、姓名返回在數組e中的位置，如果沒有找到則返回數字0
End Function
答案解析部分
1．【答案】B
【知識點】信息及其特征；信息技術的概念與關鍵技術；信息表達方式與表達技術
2．【答案】C
【知識點】人工智能的應用
3．【答案】D
【知識點】數據表、字段、記錄的概念；字段的數據類型
4．【答案】D
【知識點】進制及數制轉換；字符編碼
5．【答案】D
【知識點】聲音素材的基本處理；聲音、圖像、視頻編碼
6．【答案】C
【知識點】聲音、圖像、視頻編碼
7．【答案】D
【知識點】運算符、基本運算與表達式
8．【答案】C
【知識點】流程圖識讀
9．【答案】C
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
10．【答案】B
【知識點】排序算法及程序實現
11．【答案】B
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
12．【答案】A
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
13．【答案】（1）=AVERAGEIF ($B$4： $B$337， L7， $J$4：$J$337)或其他可行
（2）L6： M6，L10：M10， L13： M15
（3）A；B
【知識點】表格數據的處理與計算
14．【答案】（1）BCE
（2）事件；動畫補間
（3）A；D
（4）on (press) {gotoAndPlay(1)； }或on (press) {gotoAndPlay(“巡”，1)； }或其他可行答案
【知識點】多媒體作品的規劃和設計；動畫的類型；常用影片控制函數的應用；聲音同步屬性設置
15．【答案】（1）B
（2）(i+ j)\ 2或等價表達式；f(bm(j)) = 0；judge =i
（3）xm(start + i-1)
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；過程與自定義函數
16．【答案】（1）第1排第6列
（2）r= (num- 1) Mod col+1；flag=False；i<=acty And j<=actx 或者i<=3 And j<=4
【知識點】過程與自定義函數；排序算法及程序實現
1 / 1

展開更多......

收起↑