資源簡介

浙江省紹興市2019-2020學(xué)年高二下學(xué)期信息技術(shù)期末調(diào)測技術(shù)試卷
一、選擇題（本大題共12小題，每小題2分，共24分。）
1．（2020高二下·紹興期末）下列關(guān)于信息處理說法，不正確的是（　　）
A．計算機內(nèi)所有信息都采用二進制表示
B．計算機出現(xiàn)后人類才開始進行信息處理
C．只有將外部信息輸入計算機后才能被計算機處理
D．算術(shù)運算與邏輯運算是計算機處理信息的基本運算
2．（2020高二下·紹興期末）下列應(yīng)用中，體現(xiàn)人工智能技術(shù)的是（　　）
① 通過語音方式輸入文字
② 快遞小哥對快遞包裹二維碼進行掃描，并完成包裹運輸狀態(tài)的登記
③ 小區(qū)業(yè)主通過刷臉方式進入小區(qū)
④ 在WORD軟件輸入某一個單位的縮寫時，立即更改為該單位的全稱
⑤ 利用某軟件識別照片中花卉的種類
A．①③⑤ B．①②③ C．②③④ D．③④⑤
3．（2020高二下·紹興期末）小劉用 Access 軟件設(shè)計了“班級藏書”數(shù)據(jù)表，其數(shù)據(jù)表視圖的部分界面如圖所示。下列說法正確的是（　　）
A．可以將“書名”字段設(shè)為主鍵
B．當(dāng)前數(shù)據(jù)表的名稱是“班級藏書.accdb”
C．書籍編號可以輸入“ISB201901”
D．不能在當(dāng)前選中記錄前添加新記錄
4．（2020高二下·紹興期末）使用UltraEdit軟件觀察字符串“抗擊 2019-nCoV”的界面如圖所示。下列說法正確的是（　　）
A．字符“V”對應(yīng)的二進制內(nèi)碼為01011010
B．漢字“擊”的內(nèi)碼是B9 BB
C．一共有9個ASCII字符
D．存儲這些字符一共需要12bit
5．（2020高二下·紹興期末）使用 GoldWave 軟件編輯某音頻文件的操作界面如圖所示。下列說法正確的是（　　）
A．若執(zhí)行“刪除”命令，右聲道的第20秒至30秒會產(chǎn)生10秒的靜音
B．若先執(zhí)行“刪除”命令，然后再插入10秒靜音，音頻文件的時長保持不變
C．若執(zhí)行“淡出”命令后直接保存，音頻文件存儲容量與原來一樣
D．若執(zhí)行“更改音量”命令，將音量升高兩倍后直接保存，音頻文件存儲容量是原來 的兩倍
6．（2020高二下·紹興期末）將一幅分辨率為1024*768像素的BMP圖像，以4：1的壓縮比存儲為JPEG格式后，其存儲容量為192KB，則該圖像的位深度為（　　）
A．32位 B．24位 C．16位 D．8位
7．（2020高二下·紹興期末）使用Photoshop軟件，編輯“旅行.psd”文件的界面如圖所示。下列說法正確的是（　　）
A．“旅行”圖層使用了濾鏡效果
B．“背景”圖層可以直接進行重命名
C．可以使用“油漆桶”工具修改“感悟”圖層中文字的顏色
D．可以使用“自由變換”功能改變“旅行”圖層中文字大小
8．（2020高二下·紹興期末）某算法的流程圖如圖所示。執(zhí)行這部分流程圖后，變量s與n的值分別為（　　）
A．36 8 B．35 8 C．36 9 D．35 9
9．（2020高二下·紹興期末）設(shè)x=6453，能得到其十位上數(shù)值5的表達式是（　　）
A．x\10 Mod 10 B．x\10 Mod 100
C．x Mod 100 \10 D．x\100 Mod 100
10．（2020高二下·紹興期末）有如下程序段：
Dim s As String, ch As String
Dim ansAs String, i As Integer
s = Text1.Text
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "A" And ch <= "Z" Then
ch = Chr(asc(ch) + 3)
ElseIf ch >= "a" And ch <= "z" Then
ch = Chr(asc(ch) - 3)
End If
ans = ans + ch
Next i
Text2.Text = ans
運行時文本框Text1中輸入“Tu5Mp4”，則文本框Text2中輸出的內(nèi)容是（　　）
A．Wx2Ps1 B．Wr5Pm4 C．WrPm1 D．Wx5Ps4
11．（2020高二下·紹興期末）下列程序段的功能為:去除數(shù)組 a(1)到 a(n)中的“0”元素，并將非 0 元素按原順序輸出。如數(shù)組元素 a(1)到 a(8)的值依次為“2,0,2,0,0,7,0,7”，處理后 a(1)到 a(4)的值依次為”2,2,7,7”,原順序輸出為：“2 2 7 7”。
k = 0: s = ""
For i = 1 To n
Next i
Text1.Text = s
方框中的代碼由以下四部分組成：
①If a(i) = 0 Then k = k + 1
②If p = k Then s = s + Str(a(i - k))
③a(i - k) = a(i)
④p = k
代碼順序正確的是（　　）
A．④①②③ B．④①③② C．③④①② D．③④②①
12．（2020高二下·紹興期末）某對分查找算法的VB程序段如下：
Key = (Int(Rnd * 7) + 1) * 3
low = 1: high = 8
Do While low <= high
m = (low + high) \ 2
If a(m) >= Key Then
high = m - 1
Else
low = m + 1
End If
Loop
Text1.Text = high
數(shù)組元素a(1)到a(8)的值依次為“5,7,9,11,15,15,16,22”。執(zhí)行該程序段，則文本框Text1中顯示的內(nèi)容可能是（　　）
A．3 B．4 C．5 D．8
二、非選擇題（本題共4小題，4+8+7+7，共26分）
13．（2020高二下·紹興期末）小李使用EXCEL軟件對某校運動會的數(shù)據(jù)進行了處理，如圖a所示。請回答下列問題：
（1）“金牌比例（%）”是指班級金牌數(shù)占年級金牌數(shù)的比例，高二年級班級計算的方法是在F10單元格中輸入計算公式，然后用自動填充功能完成F11:F16單元格的計算，那么在F14單元格中計算公式是　 　。
（2）對高二各班級以“金牌”進行排序操作，應(yīng)該選擇的數(shù)據(jù)區(qū)域為　 　。
（3）將圖a中B2：F8區(qū)域的數(shù)據(jù)復(fù)制到新工作表對應(yīng)區(qū)域并進行篩選，設(shè)置篩選條件如圖b所示，則按此設(shè)置篩選出的班級個數(shù)共有　 　個。
（4）根據(jù)圖a中的數(shù)據(jù)制作圖表，如圖c所示，則創(chuàng)建該圖表的數(shù)據(jù)區(qū)域是　 　。
14．（2020高二下·紹興期末）小李使用FLASH軟件制作了一個主題為“地理實驗”的作品，部分界面如下圖所示。
請回答下列問題：
（1）在作品設(shè)計過程中，下列屬于創(chuàng)作需求分析的是 　 　 。（多選，填字母A . 該作品使用 Flash 軟件制作/B . 該作品面向地理學(xué)科學(xué)生演示播放/C . 該作品的主題思想為“地形雨的形成”/D . 根據(jù)主題思想和內(nèi)容，制訂作品的腳本大綱/E . 確定各場景界面尺寸、素材組織與來源、交互方式等）。
（2）“云”圖層中“云朵”元件實例沿山坡移動的動畫。該動畫的類型是 　 　（選填：動畫補間/形狀補間）動畫。
（3）為使“背景”圖層的內(nèi)容延續(xù)到動畫的最后1幀，應(yīng)做的操作是 　 　。
（4）“音樂”圖層的聲音時長為316秒，若要實現(xiàn)聲音在動畫結(jié)束時停止播放，則將同步方式設(shè)為 　 　（選填：事件/數(shù)據(jù)流）
（5）到本場景的最后1幀出現(xiàn)“返回”按鈕，點擊該按鈕，返回到“主交互界面”第1幀處繼續(xù)播放，則“返回”按鈕的動作腳本為　 　 。
15．（2020高二下·紹興期末）學(xué)生進行排隊，要求分別對男女生按身高進行升序排序，排序后男生在前，女生在后。排序示例如下。
（1）實觀上述功能的VB程序如下，在程序中出現(xiàn)的對象沒有Caption屬性的是　 　。（選填，填字母：A . Label1 /mand1 /C . List1）
（2）實現(xiàn)上述功能的VB程序如下，請在劃線處填入合適的代碼。
Const n = 10 ‘n 名學(xué)生
Dim a(1 To n) As
Integer ‘存放身高
Dim b(1 To n) As
String ‘存放性別
Private Sub
Form_Load()
'讀取身高和性別數(shù)據(jù)，分別存儲在數(shù)組a和b中，代碼略
For i = 1 To n
List1.AddItem b(i) + Str(a(i))
Next i
End Sub
Private Sub
Command1_Click()
Dim i As Integer, j
As Integer, k As Integer, t As Integer
Dim s As String
i = 1: 　 　
Do While iFor k = i To j
If 　 　 Then
If b(i) = "女" Or a(i) > a(k) Then
s = b(k): b(k) = b(i): b(i) = s
t = a(k): a(k) = a(i): a(i) = t
End If
Else
If Then
s = b(k): b(k) = b(j): b(j) = s
t = a(k): a(k) = a(j): a(j) = t
End If
End If
Next k
If b(i) = "男" Then i = i + 1
If b(j) = "女" Then 　 　
Loop
For i = 1 To n
List2.AddItem b(i) + Str(a(i))
Next i
End Sub
（3）程序中加框處代碼有錯，請改正。
16．（2020高二下·紹興期末）高一七選三學(xué)科成績采用了參考學(xué)生全體賦分，取最高三科計入總分的模式，如小剛同學(xué)“物，化，生，政，史，地，技”七科期末賦分成績?yōu)椤?7,94,0,91,88,91,85,”程序運行后七科排名結(jié)果為“1，2，7，3，5，4，6”，因此優(yōu)勢科目為“物化政”，三科總分282。
編寫程序?qū)崿F(xiàn)如下功能：Text1輸入7課成績“,”分隔，單擊“分析”按鈕Command1后，在標(biāo)簽Label2上顯示三門優(yōu)勢學(xué)科與總分，程序運行界面如圖所示：
（1）如果對7科“賦分成績”按冒泡排序進行降序排列，調(diào)試時發(fā)現(xiàn)，輸入任何一組數(shù)據(jù)，輸出的優(yōu)勢科目始終是“物化生”，可能的原因是 　 　 。
（2）請在劃線處填入合適的代碼。
Private Sub Command1_Click()
Dim i As Integer, j As Integer, n As Integer, sum As Integer
Dim s As String, ch As String, t As String, dm As String, xk As String
Dim a(1 To 7)As Integer, b(1 To 7)As Integer, c(1 To 7)As Integer
dm = "物化生政史地技"
s = Text1.Text
n = 0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch = "," Then
n = n + 1
a(n) = Val(t)
　 　
Else
t = t + ch
End If
Next i
For i = 1 To 7
b(i) = 1
Next i
For i = 1 To 6
For j = i + 1 To 7
If a(i) < a(j) Then
b(i) = b(i) + 1
Else
　 　
End If
Next j
Next i
For i = 1 To 7
　 　
Next i
xk = "你的優(yōu)勢科目為："
sum = 0
For i = 1 To 3
xk = xk + Mid(dm, c(i), 1)
sum = sum + a(c(i))
Next i
Label2.Caption = xk + ",三科總分：" + Str(sum)
End Sub
答案解析部分
1．【答案】B
【知識點】信息及其特征；計算機、移動終端的工作原理
2．【答案】A
【知識點】人工智能的應(yīng)用
3．【答案】D
【知識點】數(shù)據(jù)表、字段、記錄的概念；數(shù)據(jù)表、字段、記錄的編輯
4．【答案】C
【知識點】信息的編碼；進制及數(shù)制轉(zhuǎn)換
5．【答案】C
【知識點】聲音素材的基本處理；聲音、圖像、視頻編碼
6．【答案】D
【知識點】多媒體數(shù)據(jù)壓縮技術(shù)；聲音、圖像、視頻編碼
7．【答案】D
【知識點】圖片加工常用工具的使用；圖層及圖層的基本操作
8．【答案】C
【知識點】常量、變量及變量的賦值；流程圖識讀
9．【答案】A
【知識點】運算符、基本運算與表達式
10．【答案】B
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
11．【答案】C
【知識點】常量、變量及變量的賦值；分支結(jié)構(gòu)語句及程序?qū)崿F(xiàn)
12．【答案】B
【知識點】查找算法及程序?qū)崿F(xiàn)
13．【答案】（1）=c14/$c$16*100
（2）B10:F15
（3）3
（4）B2,F2,B17:B22,F17:F22
【知識點】表格數(shù)據(jù)的處理與計算
14．【答案】（1）AC
（2）動畫補間
（3）在背景圖層的第80幀處，執(zhí)行插入幀。（或在背景圖層的第80幀處，執(zhí)行插入關(guān)鍵幀）
（4）數(shù)據(jù)流
（5）on(press){gotoandplay(“主交互界面”，1)；}或 on(release){gotoandplay(“主交互界面”，1)；}
【知識點】多媒體作品的規(guī)劃和設(shè)計；時間軸、幀、圖層、庫的概念及基本操作；動畫的實現(xiàn)
15．【答案】（1）C
（2）j = n；b(k) = "男"；j = j – 1
（3）b(j) = "男" Or a(j) < a(k)
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應(yīng)用；排序算法及程序?qū)崿F(xiàn)
16．【答案】（1）“賦分成績”順序按從大到小排序發(fā)生了位置變化，而“科目名”順序未隨之發(fā)生改變。
（2）t = ""；b(j) = b(j) + 1；c(b(i)) = i
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
1 / 1浙江省紹興市2019-2020學(xué)年高二下學(xué)期信息技術(shù)期末調(diào)測技術(shù)試卷
一、選擇題（本大題共12小題，每小題2分，共24分。）
1．（2020高二下·紹興期末）下列關(guān)于信息處理說法，不正確的是（　　）
A．計算機內(nèi)所有信息都采用二進制表示
B．計算機出現(xiàn)后人類才開始進行信息處理
C．只有將外部信息輸入計算機后才能被計算機處理
D．算術(shù)運算與邏輯運算是計算機處理信息的基本運算
【答案】B
【知識點】信息及其特征；計算機、移動終端的工作原理
2．（2020高二下·紹興期末）下列應(yīng)用中，體現(xiàn)人工智能技術(shù)的是（　　）
① 通過語音方式輸入文字
② 快遞小哥對快遞包裹二維碼進行掃描，并完成包裹運輸狀態(tài)的登記
③ 小區(qū)業(yè)主通過刷臉方式進入小區(qū)
④ 在WORD軟件輸入某一個單位的縮寫時，立即更改為該單位的全稱
⑤ 利用某軟件識別照片中花卉的種類
A．①③⑤ B．①②③ C．②③④ D．③④⑤
【答案】A
【知識點】人工智能的應(yīng)用
3．（2020高二下·紹興期末）小劉用 Access 軟件設(shè)計了“班級藏書”數(shù)據(jù)表，其數(shù)據(jù)表視圖的部分界面如圖所示。下列說法正確的是（　　）
A．可以將“書名”字段設(shè)為主鍵
B．當(dāng)前數(shù)據(jù)表的名稱是“班級藏書.accdb”
C．書籍編號可以輸入“ISB201901”
D．不能在當(dāng)前選中記錄前添加新記錄
【答案】D
【知識點】數(shù)據(jù)表、字段、記錄的概念；數(shù)據(jù)表、字段、記錄的編輯
4．（2020高二下·紹興期末）使用UltraEdit軟件觀察字符串“抗擊 2019-nCoV”的界面如圖所示。下列說法正確的是（　　）
A．字符“V”對應(yīng)的二進制內(nèi)碼為01011010
B．漢字“擊”的內(nèi)碼是B9 BB
C．一共有9個ASCII字符
D．存儲這些字符一共需要12bit
【答案】C
【知識點】信息的編碼；進制及數(shù)制轉(zhuǎn)換
5．（2020高二下·紹興期末）使用 GoldWave 軟件編輯某音頻文件的操作界面如圖所示。下列說法正確的是（　　）
A．若執(zhí)行“刪除”命令，右聲道的第20秒至30秒會產(chǎn)生10秒的靜音
B．若先執(zhí)行“刪除”命令，然后再插入10秒靜音，音頻文件的時長保持不變
C．若執(zhí)行“淡出”命令后直接保存，音頻文件存儲容量與原來一樣
D．若執(zhí)行“更改音量”命令，將音量升高兩倍后直接保存，音頻文件存儲容量是原來 的兩倍
【答案】C
【知識點】聲音素材的基本處理；聲音、圖像、視頻編碼
6．（2020高二下·紹興期末）將一幅分辨率為1024*768像素的BMP圖像，以4：1的壓縮比存儲為JPEG格式后，其存儲容量為192KB，則該圖像的位深度為（　　）
A．32位 B．24位 C．16位 D．8位
【答案】D
【知識點】多媒體數(shù)據(jù)壓縮技術(shù)；聲音、圖像、視頻編碼
7．（2020高二下·紹興期末）使用Photoshop軟件，編輯“旅行.psd”文件的界面如圖所示。下列說法正確的是（　　）
A．“旅行”圖層使用了濾鏡效果
B．“背景”圖層可以直接進行重命名
C．可以使用“油漆桶”工具修改“感悟”圖層中文字的顏色
D．可以使用“自由變換”功能改變“旅行”圖層中文字大小
【答案】D
【知識點】圖片加工常用工具的使用；圖層及圖層的基本操作
8．（2020高二下·紹興期末）某算法的流程圖如圖所示。執(zhí)行這部分流程圖后，變量s與n的值分別為（　　）
A．36 8 B．35 8 C．36 9 D．35 9
【答案】C
【知識點】常量、變量及變量的賦值；流程圖識讀
9．（2020高二下·紹興期末）設(shè)x=6453，能得到其十位上數(shù)值5的表達式是（　　）
A．x\10 Mod 10 B．x\10 Mod 100
C．x Mod 100 \10 D．x\100 Mod 100
【答案】A
【知識點】運算符、基本運算與表達式
10．（2020高二下·紹興期末）有如下程序段：
Dim s As String, ch As String
Dim ansAs String, i As Integer
s = Text1.Text
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "A" And ch <= "Z" Then
ch = Chr(asc(ch) + 3)
ElseIf ch >= "a" And ch <= "z" Then
ch = Chr(asc(ch) - 3)
End If
ans = ans + ch
Next i
Text2.Text = ans
運行時文本框Text1中輸入“Tu5Mp4”，則文本框Text2中輸出的內(nèi)容是（　　）
A．Wx2Ps1 B．Wr5Pm4 C．WrPm1 D．Wx5Ps4
【答案】B
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
11．（2020高二下·紹興期末）下列程序段的功能為:去除數(shù)組 a(1)到 a(n)中的“0”元素，并將非 0 元素按原順序輸出。如數(shù)組元素 a(1)到 a(8)的值依次為“2,0,2,0,0,7,0,7”，處理后 a(1)到 a(4)的值依次為”2,2,7,7”,原順序輸出為：“2 2 7 7”。
k = 0: s = ""
For i = 1 To n
Next i
Text1.Text = s
方框中的代碼由以下四部分組成：
①If a(i) = 0 Then k = k + 1
②If p = k Then s = s + Str(a(i - k))
③a(i - k) = a(i)
④p = k
代碼順序正確的是（　　）
A．④①②③ B．④①③② C．③④①② D．③④②①
【答案】C
【知識點】常量、變量及變量的賦值；分支結(jié)構(gòu)語句及程序?qū)崿F(xiàn)
12．（2020高二下·紹興期末）某對分查找算法的VB程序段如下：
Key = (Int(Rnd * 7) + 1) * 3
low = 1: high = 8
Do While low <= high
m = (low + high) \ 2
If a(m) >= Key Then
high = m - 1
Else
low = m + 1
End If
Loop
Text1.Text = high
數(shù)組元素a(1)到a(8)的值依次為“5,7,9,11,15,15,16,22”。執(zhí)行該程序段，則文本框Text1中顯示的內(nèi)容可能是（　　）
A．3 B．4 C．5 D．8
【答案】B
【知識點】查找算法及程序?qū)崿F(xiàn)
二、非選擇題（本題共4小題，4+8+7+7，共26分）
13．（2020高二下·紹興期末）小李使用EXCEL軟件對某校運動會的數(shù)據(jù)進行了處理，如圖a所示。請回答下列問題：
（1）“金牌比例（%）”是指班級金牌數(shù)占年級金牌數(shù)的比例，高二年級班級計算的方法是在F10單元格中輸入計算公式，然后用自動填充功能完成F11:F16單元格的計算，那么在F14單元格中計算公式是　 　。
（2）對高二各班級以“金牌”進行排序操作，應(yīng)該選擇的數(shù)據(jù)區(qū)域為　 　。
（3）將圖a中B2：F8區(qū)域的數(shù)據(jù)復(fù)制到新工作表對應(yīng)區(qū)域并進行篩選，設(shè)置篩選條件如圖b所示，則按此設(shè)置篩選出的班級個數(shù)共有　 　個。
（4）根據(jù)圖a中的數(shù)據(jù)制作圖表，如圖c所示，則創(chuàng)建該圖表的數(shù)據(jù)區(qū)域是　 　。
【答案】（1）=c14/$c$16*100
（2）B10:F15
（3）3
（4）B2,F2,B17:B22,F17:F22
【知識點】表格數(shù)據(jù)的處理與計算
14．（2020高二下·紹興期末）小李使用FLASH軟件制作了一個主題為“地理實驗”的作品，部分界面如下圖所示。
請回答下列問題：
（1）在作品設(shè)計過程中，下列屬于創(chuàng)作需求分析的是 　 　 。（多選，填字母A . 該作品使用 Flash 軟件制作/B . 該作品面向地理學(xué)科學(xué)生演示播放/C . 該作品的主題思想為“地形雨的形成”/D . 根據(jù)主題思想和內(nèi)容，制訂作品的腳本大綱/E . 確定各場景界面尺寸、素材組織與來源、交互方式等）。
（2）“云”圖層中“云朵”元件實例沿山坡移動的動畫。該動畫的類型是 　 　（選填：動畫補間/形狀補間）動畫。
（3）為使“背景”圖層的內(nèi)容延續(xù)到動畫的最后1幀，應(yīng)做的操作是 　 　。
（4）“音樂”圖層的聲音時長為316秒，若要實現(xiàn)聲音在動畫結(jié)束時停止播放，則將同步方式設(shè)為 　 　（選填：事件/數(shù)據(jù)流）
（5）到本場景的最后1幀出現(xiàn)“返回”按鈕，點擊該按鈕，返回到“主交互界面”第1幀處繼續(xù)播放，則“返回”按鈕的動作腳本為　 　 。
【答案】（1）AC
（2）動畫補間
（3）在背景圖層的第80幀處，執(zhí)行插入幀。（或在背景圖層的第80幀處，執(zhí)行插入關(guān)鍵幀）
（4）數(shù)據(jù)流
（5）on(press){gotoandplay(“主交互界面”，1)；}或 on(release){gotoandplay(“主交互界面”，1)；}
【知識點】多媒體作品的規(guī)劃和設(shè)計；時間軸、幀、圖層、庫的概念及基本操作；動畫的實現(xiàn)
15．（2020高二下·紹興期末）學(xué)生進行排隊，要求分別對男女生按身高進行升序排序，排序后男生在前，女生在后。排序示例如下。
（1）實觀上述功能的VB程序如下，在程序中出現(xiàn)的對象沒有Caption屬性的是　 　。（選填，填字母：A . Label1 /mand1 /C . List1）
（2）實現(xiàn)上述功能的VB程序如下，請在劃線處填入合適的代碼。
Const n = 10 ‘n 名學(xué)生
Dim a(1 To n) As
Integer ‘存放身高
Dim b(1 To n) As
String ‘存放性別
Private Sub
Form_Load()
'讀取身高和性別數(shù)據(jù)，分別存儲在數(shù)組a和b中，代碼略
For i = 1 To n
List1.AddItem b(i) + Str(a(i))
Next i
End Sub
Private Sub
Command1_Click()
Dim i As Integer, j
As Integer, k As Integer, t As Integer
Dim s As String
i = 1: 　 　
Do While iFor k = i To j
If 　 　 Then
If b(i) = "女" Or a(i) > a(k) Then
s = b(k): b(k) = b(i): b(i) = s
t = a(k): a(k) = a(i): a(i) = t
End If
Else
If Then
s = b(k): b(k) = b(j): b(j) = s
t = a(k): a(k) = a(j): a(j) = t
End If
End If
Next k
If b(i) = "男" Then i = i + 1
If b(j) = "女" Then 　 　
Loop
For i = 1 To n
List2.AddItem b(i) + Str(a(i))
Next i
End Sub
（3）程序中加框處代碼有錯，請改正。
【答案】（1）C
（2）j = n；b(k) = "男"；j = j – 1
（3）b(j) = "男" Or a(j) < a(k)
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應(yīng)用；排序算法及程序?qū)崿F(xiàn)
16．（2020高二下·紹興期末）高一七選三學(xué)科成績采用了參考學(xué)生全體賦分，取最高三科計入總分的模式，如小剛同學(xué)“物，化，生，政，史，地，技”七科期末賦分成績?yōu)椤?7,94,0,91,88,91,85,”程序運行后七科排名結(jié)果為“1，2，7，3，5，4，6”，因此優(yōu)勢科目為“物化政”，三科總分282。
編寫程序?qū)崿F(xiàn)如下功能：Text1輸入7課成績“,”分隔，單擊“分析”按鈕Command1后，在標(biāo)簽Label2上顯示三門優(yōu)勢學(xué)科與總分，程序運行界面如圖所示：
（1）如果對7科“賦分成績”按冒泡排序進行降序排列，調(diào)試時發(fā)現(xiàn)，輸入任何一組數(shù)據(jù)，輸出的優(yōu)勢科目始終是“物化生”，可能的原因是 　 　 。
（2）請在劃線處填入合適的代碼。
Private Sub Command1_Click()
Dim i As Integer, j As Integer, n As Integer, sum As Integer
Dim s As String, ch As String, t As String, dm As String, xk As String
Dim a(1 To 7)As Integer, b(1 To 7)As Integer, c(1 To 7)As Integer
dm = "物化生政史地技"
s = Text1.Text
n = 0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch = "," Then
n = n + 1
a(n) = Val(t)
　 　
Else
t = t + ch
End If
Next i
For i = 1 To 7
b(i) = 1
Next i
For i = 1 To 6
For j = i + 1 To 7
If a(i) < a(j) Then
b(i) = b(i) + 1
Else
　 　
End If
Next j
Next i
For i = 1 To 7
　 　
Next i
xk = "你的優(yōu)勢科目為："
sum = 0
For i = 1 To 3
xk = xk + Mid(dm, c(i), 1)
sum = sum + a(c(i))
Next i
Label2.Caption = xk + ",三科總分：" + Str(sum)
End Sub
【答案】（1）“賦分成績”順序按從大到小排序發(fā)生了位置變化，而“科目名”順序未隨之發(fā)生改變。
（2）t = ""；b(j) = b(j) + 1；c(b(i)) = i
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
1 / 1

展開更多......

收起↑