資源簡介

浙江省杭州地區(含周邊)重點中學2021屆高三上學期信息技術期中考試試卷
一、選擇題（本大題共12小題，每小題2分，共24分。在每小題給出的四個選項中，只有一個符合題目要求）
1．（2020高三上·杭州期中）下列說法中正確的是（　　）
A．計算機中所有的字符都采用ASCII編碼
B．“UOS(unity operating system)”是中文國產操作系統”
C．5G技術是指網絡連接速度能達到5Gbps的新一代通信技術
D．經數字化后的聲音所承載的信息是沒有價值的
【答案】B
【知識點】信息及其特征；信息的編碼；網絡操作系統；網絡新技術
2．（2020高三上·杭州期中）以下應用中沒有使用人工智能技術的是（　　）
A．手機語音撥號
B．利用光學字符識別技術從圖像中識別文字
C．通過超鏈接實現不同幻燈片之間的跳轉
D．某網站提供的在線全文翻譯和網頁翻譯
【答案】C
【知識點】人工智能的應用
3．（2020高三上·杭州期中）某Access數據表的設計視圖和數據表視圖界面如下圖所示，以下說法正確的是（　　）
A．該數據表的名稱為“興趣特色課程.accdb”，共有12條記錄
B．被指定為主鍵的字段，其字段類型一定為自動編號
C．在數據表視圖中，不能在已有記錄之前插入新的記錄
D．在數據表視圖中，可以把第9條記錄“課程序號”字段的值改為“9”
【答案】C
【知識點】數據表、字段、記錄的編輯；數據表視圖與設計視圖
4．（2020高三上·杭州期中）下列有關進制與字符編碼的描述，正確的是（　　）
A．十進制數98，轉為七進制數表示為：170
B．任意進制的一個數n，若末尾為0，該數轉為十進制一定是偶數
C．用n位二進制數給m種不同的信息編碼，則必滿足2＾n≥m
D．漢字和英文字符在計算機內部編碼均采用十六進制編碼
【答案】C
【知識點】信息的編碼；進制及數制轉換
5．（2020高三上·杭州期中）利用Photoshop制作“土地生命線.psd”作品，編輯界面如下圖所示
下列描述正確的是（　　）
A．可以對背景圖層設置圖層樣式
B．選中“定價”文字圖層，自由變換命令可以改變“定價”文字大小
C．“封面”圖層不可以移至“封面設計”圖層上方
D．將文件另存為JPG，“封面封底”圖層投影效果將丟失
【答案】B
【知識點】圖層及圖層的基本操作
6．（2020高三上·杭州期中）一個時長為10秒、1920×1080像素、24位真彩色、30幀/秒的未經壓縮的AVI格式無聲視頻文件，壓縮為MP4格式后的文件大小約為23.7MB，則其壓縮比約為（　　）
A．4:1 B．15:1 C．130:1 D．75:1
【答案】D
【知識點】聲音、圖像、視頻編碼
7．（2020高三上·杭州期中）某算法的流程圖如圖，以下說法中不正確的是（　　）
A．程序運行結束后，s的值是945 B．循環共進行了5次
C．程序結束后，i的值是12 D．i<=10執行的次數是6次
【答案】C
【知識點】常量、變量及變量的賦值；流程圖識讀
8．（2020高三上·杭州期中）有如下程序段，在Text1中輸入1001011，Text2中輸出的結果為（　　）
Private Sub Command1_Click()
Dim s As String, i As Integer, d As Integer
d=0
s = Text1.Text
For i = Len(s) To 1 Step -1
d = (d \ 2 + Val(Mid(s, i, 1)) * 2 ^ (Len(s) - 1))
Next i
Text2.Text = Str(100-d)
End Sub
A．75 B．25 C．-25 D．50
【答案】B
【知識點】運算符、基本運算與表達式；循環結構語句及程序實現
9．（2020高三上·杭州期中）使用 Nilakantha 級數可用于計算 Pi(π) 的無窮級數，它的計算機結果比萊布尼茨公式更快地接近 Pi(π)的近似值。 有下列代碼，通過前n項的計算，求Pi近似值，下列選項中正確的是（　　）
Private Sub Command2_Click(　　)
Dim f As Integer, i As Long, n As Long
Dim pi As Double, s As Double
s = 0: n = Val(Text1.Text)
For i = 2 To 2*n ①
s = s + ②
Next i
pi = 3 + s * 4
Label2.Caption = Str(pi)
End Sub
A．① step 1 ② (-1)^(i\2+1) / (i * (i + 1) * (i + 2))
B．① step 1 ② (-1)^(i\2) / (i * (i + 1) * (i + 2))
C．① step 2 ② (-1)^(i\2+1) /(i * (i + 1) * (i + 2))
D．① step 2 ② (-1)^(i\2) / (i * (i + 1) * (i + 2))
【答案】C
【知識點】運算符、基本運算與表達式；循環結構語句及程序實現
10．（2020高三上·杭州期中）將一組數據（共n*n個數）,分別存放在a(1)…a(n*n)中，通過下面程序實現n段有序（升序），例如：當n=4時，排序結果如圖所示：
有如下VB程序段：
For i = 1 To n
For j = n * (i - 1) + 1 To ①
For k = ② To ③
If a(k) > a(k + 1) Then
t =a(k): a(k) = a(k + 1): a(k + 1) = t
End If
Next k
Next j
Next i
上述程序段劃線處的表達式正確的是（　　）
A．① n * i – 1 ② n * (i - 1) + 1 ③ n * (2 * i - 1) – j
B．① n * (i - 1) ② n * i – 1 ③ n * i - j
C．① n * i – 1 ② n * i + j ③ n * (2 * i - 1)
D．① n * i ② n * (i - 1) + 1 ③ n * i - j
【答案】A
【知識點】運算符、基本運算與表達式；分支結構語句及程序實現；循環結構語句及程序實現
11．（2020高三上·杭州期中）某 VB 程序段如下：
Dim a（1 To 6）As Integer
Randomize
a(1)=Int（Rnd*2）+1
For i=2 To 6
a(i)=Int（Rnd*i）*2+1
If a(i)< a(i-1)Then
a(i)= a(i)+ a(i-1)
End If
Next i
執行該程序段后，數組元素a(1)到a(6)的值可能是（　　）
A．2，4，6，8，10，12 B．1，1，3，7，12，23
C．2，5，9，11，10，15 D．1，3，15，16，20，23
【答案】B
【知識點】常見數據類型、數組；分支結構語句及程序實現；循環結構語句及程序實現
12．（2020高三上·杭州期中）有如下VB程序段：
i=1：j=8：k=0
Key=Int（Rnd*50）*2+3
Do While i<=j
m=（i+j+1）\2
If Key=a（m）Then
Exit Do
ElseIf Key i=m+1：k=k+1
Else
j=m-1：k=k-1
End If
Loop
Text1.Text=Str（k）
數組元素a（1）到a（8）的值依次為“88，66，50，46，24，20，18，6”,執行該程序段后，k的值不可能是（　　）
A．-1或-2 B．1或-1 C．-3或2 D．-2或3
【答案】C
【知識點】常見數據類型、數組；分支結構語句及程序實現；循環結構語句及程序實現
二、非選擇題（本題共四大題，共計 26 分，4+8+7+7）
13．（2020高三上·杭州期中）小趙收集了近三年浙江省接待入境旅游者人數的數據，并使用Excel軟件進行數據處理：
圖 a
（1）在M4單元格中使用AVERAGEIF函數計算2017年亞洲所有國家的平均入境人數，然后通過自動填充得到M5:M7的公式，則M4單元格中的公式為　 　 (提示:AVERAGEIF
函數用于對區域中滿足條件的單元格求平均。例如：=AVERAGEIF(A4:A18,J4,E4:E18)表示 2016 年所有亞洲國家的入境人數平均數)
（2）根據圖a中數據制作的圖表如圖b所示，創建該圖表的數據區域是：　 　
圖 b
（3）在圖a所示的工作表中對數據作進一步操作，下列說法正確的是 （多選：填字母）
A．對表格數據區域A4:H18按“列A”為主要關鍵字升序排序，則圖b中所示的圖表不會發生變化。
B．若要篩選出2016年歐洲入境旅游者人數同比增長最多的國家，可以選擇A2：H18區域，以地區為“歐洲”、2016年“同比（%）”為最大1項進行篩選。
C．若要篩選出2016年歐洲入境旅游者人數同比增長最多的國家，可以選擇A2：H18區域，以地區為“歐洲”進行篩選，再以2016年“同比（%）”為關鍵字進行降序排序，選取排在最前面的國家。
D．在正確完成M4：M7計算后，小趙不小心將B列刪除，則原 M4:M7 單元格中的數據不會發生變化。
【答案】（1）=AVERAGEIF(A$4:A$18,J4,G$4:G$18)或=AVERAGEIF($A$4: $A$18,J4, $G$4: $G$18)
（2）B2:B5,B7:B8,H2:H5,H7:H8
（3）C；D
【知識點】表格數據的基本操作；表格數據的處理與計算
14．（2020高三上·杭州期中）某同學制作了“抗擊疫情迎接春天”的FLASH多媒體作品，請回答下列問題：
（1）關于多媒體作品設計，以下說法正確的是　 　 。 （多選，填字母：A . Flash 是以時間序列為基礎的多媒體合成軟件/B . 在創作需求分析階段應做的是分析作品效益/C . 文字腳本是制作動畫的直接依據/D . 結構設計階段需要描述整個作品的組成部分、工作流程、主要界面）。
（2）當前狀態下執行測試影片命令，首先播放的場景是　 　。
（3）“繼續”按鈕在場景一開始就出現，要實現該按鈕在本場景最后一幀再出現，應如何修正　 　。
（4）“明天依然最美”圖層第20幀到第50幀實現了文字實例“明天依然最美”由小到大且由透明到完全顯示的變化效果，則該動畫的類型是　 　。(選填字母：A . 逐幀動畫；B . 動畫補間；C . 形狀補間)。
（5）“音樂”圖層添加了一段時長為61秒的音頻文件，小李發現當前場景動畫結束后聲音仍在播放，由此可判斷當前音頻的同步方式為　 　。 (選填字母:A . 數據流；B . 事件)
（6）測試影片時，單擊“繼續”按鈕，自動跳轉到“主交互界面”場景的第1幀播放，則需在按鈕上加入的腳本命令為　 　。
【答案】（1）AD
（2）封面
（3）選中按鈕圖層的第一幀，移至最后一幀或其他等同正確答案
（4）B
（5）B
（6）on （press）{gotoandstop(“主交互界面”,1)};或 on （release）{ gotoandstop(“主交互界面”,1)};
【知識點】動畫的類型；時間軸、幀、圖層、庫的概念及基本操作；動畫的實現；常用影片控制函數的應用；多媒體數據采集與編輯軟件
15．（2020高三上·杭州期中）有如下程序，從數據庫獲取成績，單擊“讀取數據”按鈕將n個非降序數保存在數組cj(1)～cj(n)中，并將成績顯示在列表框中。在文本框中輸入成績key，單擊“查找”按鈕，在標簽中顯示大于等于該成績的學生人數。
（1）界面中“查找”按鈕的對象名為　 　。
（2）實現上述功能的
VB 程序如下，請在劃線處填入合適的代碼
Dim cj(1000) As Integer, n As Integer
Private Sub btncmd1_Click(　　)
Dim i As Integer, j As Integer
Dim k As Integer ,tmp As Integer
For i = 2 To n
tmp = cj(i)
j = BinarySearch　 　
For k = i To j + 1 Step -1
cj(k) = cj(k - 1)
Next k
cj(k) = tmp
Next i
For i = 1 To n
List1.AddItem
Str(cj(i))
Next i
End Sub
Private Sub btncmd2_Click()
Dim i As Integer
i = BinarySearch(Val(Text1.Text), 1, n)
Label2.Caption = "共有" +　 　+ "位同學大于等于該成績。"
End Sub
Function BinarySearch(key As Integer,i As Integer,j
As Integer) As Integer
Dim m As Integer
Do While i <= j
m = (i + j) \ 2
If cj(m)
>= key Then
j = m - 1
Else
i = m + 1
End If
Loop
BinarySearch =　 　
End Function
Private Sub Form_Load()
'從數據庫獲取n個成績存儲在 cj(1) ～cj(n)組中，代碼略
End Sub
【答案】（1）btncmd2
（2）tmp, 1, i - 1 或其他等同正確答案；Str(n - i + 1) 或其他等同正確答案；i 或其他等同正確答案
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；過程與自定義函數；分支結構語句及程序實現；循環結構語句及程序實現
16．（2020高三上·杭州期中）某單位擬進行人事招聘，根據“筆試”和“面試”成績計算最后名次。規則如下：
記錄各個考生的筆試和面試得分，根據得分分別計算筆試和面試的名次（得分越高排名越前，得分相同，名次也相同）；再根據筆試和面試的名次計算總分（總分=筆試名次+面試名次）；最后計算總分的名次（總分越低排名越前，得分相同，名次相同）。程序設計過程中，為節省內存，盡可能少使用數組，編程實現上述功能：窗體加載時，自動從數據庫讀取考生的筆試和面試得分，顯示在列表框 List1 中；在文本框 Text1 中輸入錄取人數 n，單擊“統計”按鈕 Command1，在標簽 Label1、Label2 和
Label3 中分別輸出筆試、面試、總分前 n 名的考生編號。程序運行界面如圖所示。
（1）根據評比規則和圖中數據，1號考生的兩項競賽的總分是　 　
（2）實現上述功能的VB程序如下，請在劃線處填入合適代碼。
Const n = 9
'數組 xh、df 和 mc 分別存儲選手編號、得分和名次；df 數組的 1～n 元素存儲筆試相關數據；n+1～2n 元素存儲對應選手的面試相關數據；2n+1～3n 元素存放兩項考試總分相關數據
Dim xh(1 To n * 3) As Integer, df(1 To n * 3) As
Integer, mc(1 To n * 3) As Integer
Dim i As Integer, j As Integer, t As Integer
'本過程從數據庫讀取各選手的選手編號、得分數據，分別存儲在數組 xh、df 中
Private Sub Form_Load(　　)
List1.Clear
List1.AddItem
"選手" + " " + "筆試" + " " + "面試"
For i = 1 To
n
xh(i) = i: xh(n + i) = i
Next i
For i = 1 To
n
List1.AddItem Str(xh(i)) + " " +
Str(df(i)) + " " + Str(df(n + i))
Next i
End Sub
Private Sub Command1_Click()
Dim c As
Integer
c =
Val(Text1.Text)
Label1.Caption = "筆試前" & Str(c) & "名：" & pm(1, n, c, False)
Label2.Caption = "面試前" & Str(c) & "名：" & pm(n + 1, 2 * n, c, False)
For i = 1 To
n
xh(2 * n + i) = i: df(2 * n + i) = 0: mc(2 * n
+ i) = 0
Next i
For i = 1 To
2 * n
df(2 *
n + xh(i)) = df(2 * n + xh(i)) + mc(i)
Next i
Label3.Caption = "總分前" & Str(c) & "名：" & pm　 　
End Sub
Function pm(ks As Integer, js As Integer, num As
Integer, fx As Boolean) As String
For i = ks To
js - 1
For j = js To ks + 1 Step -1
If (fx And df(j) < df(j - 1)) Or　 　Then
t = df(j): df(j) = df(j - 1): df(j - 1) = t
t = xh(j): xh(j) = xh(j - 1): xh(j - 1) = t
End If
Next j
Next i
mc(ks) = 1:
pm = Str(xh(ks))
For i = ks +
1 To js
If df(i) = df(i - 1) Then
　 　
Else
mc(i) = i - ks + 1
End If
If mc(i)
<= num Then pm = pm & "," & Str(xh(i))
Next i
End Function
【答案】（1）5
（2）2 * n + 1, 3 * n ，c,True；Not fx And df(j) > df(j - 1) 或其他等同正確答案；mc(i) = mc(i - 1)
【知識點】運算符、基本運算與表達式；過程與自定義函數；排序算法及程序實現；分支結構語句及程序實現；循環結構語句及程序實現
1 / 1浙江省杭州地區(含周邊)重點中學2021屆高三上學期信息技術期中考試試卷
一、選擇題（本大題共12小題，每小題2分，共24分。在每小題給出的四個選項中，只有一個符合題目要求）
1．（2020高三上·杭州期中）下列說法中正確的是（　　）
A．計算機中所有的字符都采用ASCII編碼
B．“UOS(unity operating system)”是中文國產操作系統”
C．5G技術是指網絡連接速度能達到5Gbps的新一代通信技術
D．經數字化后的聲音所承載的信息是沒有價值的
2．（2020高三上·杭州期中）以下應用中沒有使用人工智能技術的是（　　）
A．手機語音撥號
B．利用光學字符識別技術從圖像中識別文字
C．通過超鏈接實現不同幻燈片之間的跳轉
D．某網站提供的在線全文翻譯和網頁翻譯
3．（2020高三上·杭州期中）某Access數據表的設計視圖和數據表視圖界面如下圖所示，以下說法正確的是（　　）
A．該數據表的名稱為“興趣特色課程.accdb”，共有12條記錄
B．被指定為主鍵的字段，其字段類型一定為自動編號
C．在數據表視圖中，不能在已有記錄之前插入新的記錄
D．在數據表視圖中，可以把第9條記錄“課程序號”字段的值改為“9”
4．（2020高三上·杭州期中）下列有關進制與字符編碼的描述，正確的是（　　）
A．十進制數98，轉為七進制數表示為：170
B．任意進制的一個數n，若末尾為0，該數轉為十進制一定是偶數
C．用n位二進制數給m種不同的信息編碼，則必滿足2＾n≥m
D．漢字和英文字符在計算機內部編碼均采用十六進制編碼
5．（2020高三上·杭州期中）利用Photoshop制作“土地生命線.psd”作品，編輯界面如下圖所示
下列描述正確的是（　　）
A．可以對背景圖層設置圖層樣式
B．選中“定價”文字圖層，自由變換命令可以改變“定價”文字大小
C．“封面”圖層不可以移至“封面設計”圖層上方
D．將文件另存為JPG，“封面封底”圖層投影效果將丟失
6．（2020高三上·杭州期中）一個時長為10秒、1920×1080像素、24位真彩色、30幀/秒的未經壓縮的AVI格式無聲視頻文件，壓縮為MP4格式后的文件大小約為23.7MB，則其壓縮比約為（　　）
A．4:1 B．15:1 C．130:1 D．75:1
7．（2020高三上·杭州期中）某算法的流程圖如圖，以下說法中不正確的是（　　）
A．程序運行結束后，s的值是945 B．循環共進行了5次
C．程序結束后，i的值是12 D．i<=10執行的次數是6次
8．（2020高三上·杭州期中）有如下程序段，在Text1中輸入1001011，Text2中輸出的結果為（　　）
Private Sub Command1_Click()
Dim s As String, i As Integer, d As Integer
d=0
s = Text1.Text
For i = Len(s) To 1 Step -1
d = (d \ 2 + Val(Mid(s, i, 1)) * 2 ^ (Len(s) - 1))
Next i
Text2.Text = Str(100-d)
End Sub
A．75 B．25 C．-25 D．50
9．（2020高三上·杭州期中）使用 Nilakantha 級數可用于計算 Pi(π) 的無窮級數，它的計算機結果比萊布尼茨公式更快地接近 Pi(π)的近似值。 有下列代碼，通過前n項的計算，求Pi近似值，下列選項中正確的是（　　）
Private Sub Command2_Click(　　)
Dim f As Integer, i As Long, n As Long
Dim pi As Double, s As Double
s = 0: n = Val(Text1.Text)
For i = 2 To 2*n ①
s = s + ②
Next i
pi = 3 + s * 4
Label2.Caption = Str(pi)
End Sub
A．① step 1 ② (-1)^(i\2+1) / (i * (i + 1) * (i + 2))
B．① step 1 ② (-1)^(i\2) / (i * (i + 1) * (i + 2))
C．① step 2 ② (-1)^(i\2+1) /(i * (i + 1) * (i + 2))
D．① step 2 ② (-1)^(i\2) / (i * (i + 1) * (i + 2))
10．（2020高三上·杭州期中）將一組數據（共n*n個數）,分別存放在a(1)…a(n*n)中，通過下面程序實現n段有序（升序），例如：當n=4時，排序結果如圖所示：
有如下VB程序段：
For i = 1 To n
For j = n * (i - 1) + 1 To ①
For k = ② To ③
If a(k) > a(k + 1) Then
t =a(k): a(k) = a(k + 1): a(k + 1) = t
End If
Next k
Next j
Next i
上述程序段劃線處的表達式正確的是（　　）
A．① n * i – 1 ② n * (i - 1) + 1 ③ n * (2 * i - 1) – j
B．① n * (i - 1) ② n * i – 1 ③ n * i - j
C．① n * i – 1 ② n * i + j ③ n * (2 * i - 1)
D．① n * i ② n * (i - 1) + 1 ③ n * i - j
11．（2020高三上·杭州期中）某 VB 程序段如下：
Dim a（1 To 6）As Integer
Randomize
a(1)=Int（Rnd*2）+1
For i=2 To 6
a(i)=Int（Rnd*i）*2+1
If a(i)< a(i-1)Then
a(i)= a(i)+ a(i-1)
End If
Next i
執行該程序段后，數組元素a(1)到a(6)的值可能是（　　）
A．2，4，6，8，10，12 B．1，1，3，7，12，23
C．2，5，9，11，10，15 D．1，3，15，16，20，23
12．（2020高三上·杭州期中）有如下VB程序段：
i=1：j=8：k=0
Key=Int（Rnd*50）*2+3
Do While i<=j
m=（i+j+1）\2
If Key=a（m）Then
Exit Do
ElseIf Key i=m+1：k=k+1
Else
j=m-1：k=k-1
End If
Loop
Text1.Text=Str（k）
數組元素a（1）到a（8）的值依次為“88，66，50，46，24，20，18，6”,執行該程序段后，k的值不可能是（　　）
A．-1或-2 B．1或-1 C．-3或2 D．-2或3
二、非選擇題（本題共四大題，共計 26 分，4+8+7+7）
13．（2020高三上·杭州期中）小趙收集了近三年浙江省接待入境旅游者人數的數據，并使用Excel軟件進行數據處理：
圖 a
（1）在M4單元格中使用AVERAGEIF函數計算2017年亞洲所有國家的平均入境人數，然后通過自動填充得到M5:M7的公式，則M4單元格中的公式為　 　 (提示:AVERAGEIF
函數用于對區域中滿足條件的單元格求平均。例如：=AVERAGEIF(A4:A18,J4,E4:E18)表示 2016 年所有亞洲國家的入境人數平均數)
（2）根據圖a中數據制作的圖表如圖b所示，創建該圖表的數據區域是：　 　
圖 b
（3）在圖a所示的工作表中對數據作進一步操作，下列說法正確的是 （多選：填字母）
A．對表格數據區域A4:H18按“列A”為主要關鍵字升序排序，則圖b中所示的圖表不會發生變化。
B．若要篩選出2016年歐洲入境旅游者人數同比增長最多的國家，可以選擇A2：H18區域，以地區為“歐洲”、2016年“同比（%）”為最大1項進行篩選。
C．若要篩選出2016年歐洲入境旅游者人數同比增長最多的國家，可以選擇A2：H18區域，以地區為“歐洲”進行篩選，再以2016年“同比（%）”為關鍵字進行降序排序，選取排在最前面的國家。
D．在正確完成M4：M7計算后，小趙不小心將B列刪除，則原 M4:M7 單元格中的數據不會發生變化。
14．（2020高三上·杭州期中）某同學制作了“抗擊疫情迎接春天”的FLASH多媒體作品，請回答下列問題：
（1）關于多媒體作品設計，以下說法正確的是　 　 。 （多選，填字母：A . Flash 是以時間序列為基礎的多媒體合成軟件/B . 在創作需求分析階段應做的是分析作品效益/C . 文字腳本是制作動畫的直接依據/D . 結構設計階段需要描述整個作品的組成部分、工作流程、主要界面）。
（2）當前狀態下執行測試影片命令，首先播放的場景是　 　。
（3）“繼續”按鈕在場景一開始就出現，要實現該按鈕在本場景最后一幀再出現，應如何修正　 　。
（4）“明天依然最美”圖層第20幀到第50幀實現了文字實例“明天依然最美”由小到大且由透明到完全顯示的變化效果，則該動畫的類型是　 　。(選填字母：A . 逐幀動畫；B . 動畫補間；C . 形狀補間)。
（5）“音樂”圖層添加了一段時長為61秒的音頻文件，小李發現當前場景動畫結束后聲音仍在播放，由此可判斷當前音頻的同步方式為　 　。 (選填字母:A . 數據流；B . 事件)
（6）測試影片時，單擊“繼續”按鈕，自動跳轉到“主交互界面”場景的第1幀播放，則需在按鈕上加入的腳本命令為　 　。
15．（2020高三上·杭州期中）有如下程序，從數據庫獲取成績，單擊“讀取數據”按鈕將n個非降序數保存在數組cj(1)～cj(n)中，并將成績顯示在列表框中。在文本框中輸入成績key，單擊“查找”按鈕，在標簽中顯示大于等于該成績的學生人數。
（1）界面中“查找”按鈕的對象名為　 　。
（2）實現上述功能的
VB 程序如下，請在劃線處填入合適的代碼
Dim cj(1000) As Integer, n As Integer
Private Sub btncmd1_Click(　　)
Dim i As Integer, j As Integer
Dim k As Integer ,tmp As Integer
For i = 2 To n
tmp = cj(i)
j = BinarySearch　 　
For k = i To j + 1 Step -1
cj(k) = cj(k - 1)
Next k
cj(k) = tmp
Next i
For i = 1 To n
List1.AddItem
Str(cj(i))
Next i
End Sub
Private Sub btncmd2_Click()
Dim i As Integer
i = BinarySearch(Val(Text1.Text), 1, n)
Label2.Caption = "共有" +　 　+ "位同學大于等于該成績。"
End Sub
Function BinarySearch(key As Integer,i As Integer,j
As Integer) As Integer
Dim m As Integer
Do While i <= j
m = (i + j) \ 2
If cj(m)
>= key Then
j = m - 1
Else
i = m + 1
End If
Loop
BinarySearch =　 　
End Function
Private Sub Form_Load()
'從數據庫獲取n個成績存儲在 cj(1) ～cj(n)組中，代碼略
End Sub
16．（2020高三上·杭州期中）某單位擬進行人事招聘，根據“筆試”和“面試”成績計算最后名次。規則如下：
記錄各個考生的筆試和面試得分，根據得分分別計算筆試和面試的名次（得分越高排名越前，得分相同，名次也相同）；再根據筆試和面試的名次計算總分（總分=筆試名次+面試名次）；最后計算總分的名次（總分越低排名越前，得分相同，名次相同）。程序設計過程中，為節省內存，盡可能少使用數組，編程實現上述功能：窗體加載時，自動從數據庫讀取考生的筆試和面試得分，顯示在列表框 List1 中；在文本框 Text1 中輸入錄取人數 n，單擊“統計”按鈕 Command1，在標簽 Label1、Label2 和
Label3 中分別輸出筆試、面試、總分前 n 名的考生編號。程序運行界面如圖所示。
（1）根據評比規則和圖中數據，1號考生的兩項競賽的總分是　 　
（2）實現上述功能的VB程序如下，請在劃線處填入合適代碼。
Const n = 9
'數組 xh、df 和 mc 分別存儲選手編號、得分和名次；df 數組的 1～n 元素存儲筆試相關數據；n+1～2n 元素存儲對應選手的面試相關數據；2n+1～3n 元素存放兩項考試總分相關數據
Dim xh(1 To n * 3) As Integer, df(1 To n * 3) As
Integer, mc(1 To n * 3) As Integer
Dim i As Integer, j As Integer, t As Integer
'本過程從數據庫讀取各選手的選手編號、得分數據，分別存儲在數組 xh、df 中
Private Sub Form_Load(　　)
List1.Clear
List1.AddItem
"選手" + " " + "筆試" + " " + "面試"
For i = 1 To
n
xh(i) = i: xh(n + i) = i
Next i
For i = 1 To
n
List1.AddItem Str(xh(i)) + " " +
Str(df(i)) + " " + Str(df(n + i))
Next i
End Sub
Private Sub Command1_Click()
Dim c As
Integer
c =
Val(Text1.Text)
Label1.Caption = "筆試前" & Str(c) & "名：" & pm(1, n, c, False)
Label2.Caption = "面試前" & Str(c) & "名：" & pm(n + 1, 2 * n, c, False)
For i = 1 To
n
xh(2 * n + i) = i: df(2 * n + i) = 0: mc(2 * n
+ i) = 0
Next i
For i = 1 To
2 * n
df(2 *
n + xh(i)) = df(2 * n + xh(i)) + mc(i)
Next i
Label3.Caption = "總分前" & Str(c) & "名：" & pm　 　
End Sub
Function pm(ks As Integer, js As Integer, num As
Integer, fx As Boolean) As String
For i = ks To
js - 1
For j = js To ks + 1 Step -1
If (fx And df(j) < df(j - 1)) Or　 　Then
t = df(j): df(j) = df(j - 1): df(j - 1) = t
t = xh(j): xh(j) = xh(j - 1): xh(j - 1) = t
End If
Next j
Next i
mc(ks) = 1:
pm = Str(xh(ks))
For i = ks +
1 To js
If df(i) = df(i - 1) Then
　 　
Else
mc(i) = i - ks + 1
End If
If mc(i)
<= num Then pm = pm & "," & Str(xh(i))
Next i
End Function
答案解析部分
1．【答案】B
【知識點】信息及其特征；信息的編碼；網絡操作系統；網絡新技術
2．【答案】C
【知識點】人工智能的應用
3．【答案】C
【知識點】數據表、字段、記錄的編輯；數據表視圖與設計視圖
4．【答案】C
【知識點】信息的編碼；進制及數制轉換
5．【答案】B
【知識點】圖層及圖層的基本操作
6．【答案】D
【知識點】聲音、圖像、視頻編碼
7．【答案】C
【知識點】常量、變量及變量的賦值；流程圖識讀
8．【答案】B
【知識點】運算符、基本運算與表達式；循環結構語句及程序實現
9．【答案】C
【知識點】運算符、基本運算與表達式；循環結構語句及程序實現
10．【答案】A
【知識點】運算符、基本運算與表達式；分支結構語句及程序實現；循環結構語句及程序實現
11．【答案】B
【知識點】常見數據類型、數組；分支結構語句及程序實現；循環結構語句及程序實現
12．【答案】C
【知識點】常見數據類型、數組；分支結構語句及程序實現；循環結構語句及程序實現
13．【答案】（1）=AVERAGEIF(A$4:A$18,J4,G$4:G$18)或=AVERAGEIF($A$4: $A$18,J4, $G$4: $G$18)
（2）B2:B5,B7:B8,H2:H5,H7:H8
（3）C；D
【知識點】表格數據的基本操作；表格數據的處理與計算
14．【答案】（1）AD
（2）封面
（3）選中按鈕圖層的第一幀，移至最后一幀或其他等同正確答案
（4）B
（5）B
（6）on （press）{gotoandstop(“主交互界面”,1)};或 on （release）{ gotoandstop(“主交互界面”,1)};
【知識點】動畫的類型；時間軸、幀、圖層、庫的概念及基本操作；動畫的實現；常用影片控制函數的應用；多媒體數據采集與編輯軟件
15．【答案】（1）btncmd2
（2）tmp, 1, i - 1 或其他等同正確答案；Str(n - i + 1) 或其他等同正確答案；i 或其他等同正確答案
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；過程與自定義函數；分支結構語句及程序實現；循環結構語句及程序實現
16．【答案】（1）5
（2）2 * n + 1, 3 * n ，c,True；Not fx And df(j) > df(j - 1) 或其他等同正確答案；mc(i) = mc(i - 1)
【知識點】運算符、基本運算與表達式；過程與自定義函數；排序算法及程序實現；分支結構語句及程序實現；循環結構語句及程序實現
1 / 1

展開更多......

收起↑