資源簡介

登錄二一教育在線組卷平臺 助您教考全無憂
浙江省名校新高考研究聯盟（Z20名校聯盟）2021屆高三信息技術第一次聯考試卷
一、選擇題(本大題共12小題，每小題2分，共24分。每小題給出的四個選項中，只有一個符合題目要求，不選、多選、錯選均不得分)
1．（2020高三上·浙江月考）下列有關信息和信息技術的說法中，錯誤的是（　　）
A．傳感器技術已經在智能手機中廣泛使用
B．計算機中所有的字符都采用ASCII碼編碼
C．聲音數字化的基本方法是采樣和量化
D．數據壓縮技術提高了多媒體信息存儲、處理和傳輸的效率
【答案】B
【知識點】信息技術的概念與關鍵技術；信息的編碼；多媒體數據壓縮技術；數字化概念與作用
2．（2020高三上·浙江月考）下列有關網站和網頁的說法中，正確的是（　　）
A．使用“添加到收藏夾”功能可將網址收藏到指定的文件夾中
B．使用搜索引擎搜索時，關鍵詞越多，搜索結果越多
C．網站內各個網頁之間均需相互鏈接
D．以“網頁全部(*.htm；*.html)”類型保存網頁，網頁中的圖像不會被保存
【答案】A
【知識點】網絡資源的類型、下載與保存；瀏覽器；網絡資源的檢索；網頁的交互設計
3．（2020高三上·浙江月考）在設計某校園一卡通管理系統時，使用Access軟件創建的數據表部分界面如圖所示。
下列說法正確的是（　　）
A．該一卡通系統屬于數據庫管理系統
B．同一身份證號不能同時辦理兩張校園卡
C．當前不能對數據表“充消記錄表”進行重命名操作
D．“用戶身份”的字段值可以輸入“是”或“否”
【答案】B
【知識點】數據庫、數據庫系統及其特征；數據表、字段、記錄的編輯；數據表視圖與設計視圖
4．（2020高三上·浙江月考）將下列數轉換為十進制數，除以8后余數為1的是（　　）
A．B50H B．100111B C．F59H D．111000B
【答案】C
【知識點】進制及數制轉換
5．（2020高三上·浙江月考）使用Goldwave軟件打開某音頻文件，選中其中一段音頻后的部分界面如圖所示。
下列說法正確的是（　　）
A．當前狀態下執行“刪除”操作，則兩個聲道的2～4秒均為靜音
B．當前狀態下執行“裁剪”操作，保持其他參數不變直接保存，存儲容量約為344.5KB
C．把音頻文件“素材.wav”重命名為“素材.mp3”，可以實現聲音格式的轉換
D．當前狀態下執行“插入6秒靜音”操作，音頻的時長不變
【答案】B
【知識點】聲音素材的基本處理；聲音、圖像、視頻編碼
6．（2020高三上·浙江月考）使用Photoshop軟件編輯“算術.psd”，部分界面如圖所示。
則當前文檔的圖像大小為（　　）
A．300*400像素 B．520*1000像素
C．450*800像素 D．1116*1400像素
【答案】A
【知識點】聲音、圖像、視頻編碼
7．（2020高三上·浙江月考）在VB中，若x、y都是正整數且表達式x Mod y=1為真，則下列關系表達式值一定為真的是（　　）
A．x>y B．x\y=0 C．x\y<>x/y D．x*y Mod 2=0
【答案】C
【知識點】運算符、基本運算與表達式
8．（2020高三上·浙江月考）如圖是求 的流程圖，則圖中①處應填入的內容是（　　）
A．A←1+ B．A←2+ C．A← D．A←
【答案】D
【知識點】常量、變量及變量的賦值；流程圖識讀
9．（2020高三上·浙江月考）有如下VB程序段：
m = a(1): s=0
For i=2 To 5
If a(i) >m Then s=s+m
m= a(i)
Next i
數組元素a(1)到a(5)的值依次為“1，3，4，2，3”，執行該程序段后，變量s的值為（　　）
A．6 B．7 C．10 D．13
【答案】A
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
10．（2020高三上·浙江月考）有如下VB程序段：
s = "cbafedgh"
m= 3: c=" ": n= Len(s)
For i=1 To n
j=(i-1) Mod 3 + 1
If m> n Then Exit For ‘退出For循環
c= c + Mid(s, m-j+1, 1)
If j Mod 3=0 Then m=m+3
Next i
If i < n Then c = Mid(s, i, n-i+1)+ c
執行該程序段后，變量c的值是（　　）
A．abcdef B．abcdefgh C．ghabcdef D．hgabcdef
【答案】C
【知識點】運算符、基本運算與表達式；分支結構語句及程序實現；循環結構語句及程序實現
11．（2020高三上·浙江月考）某冒泡排序算法的VB程序段如下：
i =n
Do while i>=2
For j=
If a(j) > a(j- 1) Then
t = a(j): a(j) = a(j-1): a(j-1) =t
End If
Next j
i=i-1
Loop
執行完上述程序段后，實現a數組元素有序排列，則劃線處的代碼可以是（　　）
①n To n + 2- i Step –i ②n To i + 1 Step -1 ③2 To i ④2 To n-i
A．②③ B．②④ C．①④ D．①③
【答案】D
【知識點】常量、變量及變量的賦值；排序算法及程序實現
12．（2020高三上·浙江月考）某同學將對分查找程序進行了改編，程序運行時，自動產生9個[10，99]之間的不重復隨機數并降序排列，在文本框Text1中顯示。在文本框Text2中輸入查找鍵key，單擊“查找”按鈕Command1，將查找結果顯示在文本框Text3中。程序運行界面如圖所示。
Key = Val (Text2. Text)
i =1
j=9
flag = False
Do While i <= j And flag = False
m=(i+j)\2
If ⑴ Then
j=m-1
ElseIf ⑵ Then
i=m+1
Else
If ⑶ Then
j=m-1
ElseIf ⑷ Then
i=m+1
Else
flag = True
End If
End If
Loop
If flag Then Text3. Text = “在第”+ Str(m) +“個”Else Text3. Text =“找不到”
上述程序段中橫線處可選語句為：
①Key \ 10 > a(m) \ 10 ②Key Mod 10 < a(m) Mod 10
③Key \ 10 < a(m) \ 10 ④Key Mod 10 > a(m) Mod 10
則(1)(2)(3)(4)處語句依次為（　　）
A．①②③④ B．④②①③ C．①③④② D．①②④③
【答案】C
【知識點】常量、變量及變量的賦值；查找算法及程序實現
二、非選擇題(本大題共4小題，4+8+7+7，共26分)
13．（2020高三上·浙江月考）某同學收集了某超市2019年第三季度部分商品銷售情況的統計數據，并使用Excel軟件進行數據處理，如圖a所示。
請回答下列問題：
（1）如圖a所示，若要正確計算蔬菜類7月銷量總計，則下列方法錯誤的是 (單選，填字母)
A．在C13單元格中輸入公式“=SUM(C9，C10，C11，C12)”
B．在C13單元格中輸入公式“=SUM(C9：C12)”
C．在C13單元格中輸入公式“=C9+C10+C11+C12”
D．將C8單元格直接復制粘貼到C13單元格
（2）用排序的方法找出蔬菜類“9月增幅(%)”最大的商品，則排序應選擇的數據區域為　 　，主要關鍵字為　 　。
（3）根據圖a中數據制作的圖表如圖b所示，創建該圖表的數據區域是　 　。
【答案】（1）D
（2）B9:G12；列G
（3）B2:E2,B17:E17
【知識點】表格數據的基本操作；表格數據的處理與計算
14．（2020高三上·浙江月考）某同學制作“親子活動”的多媒體作品，首先在Photoshop中進行圖片處理，然后再用Flash軟件創作了一個動畫，請回答下列問題：
（1）如圖a所示，下列對“背景”圖層的操作中可行的是　 　(多選，填字母：A .將“蝸牛父子”圖層的圖層樣式拷貝粘貼至“背景”圖層/B .將“背景”圖層移至“石臺”圖層上方/C .給“背景”圖層添加“鏡頭光暈”的濾鏡效果/D .用仿制圖章工具將“背景”圖層上的“昵圖網”字樣去除/E.刪除背景圖層，存儲為JPG格式，該圖像部分透明)
（2）當前狀態下執行測試影片命令，首先播放的場景是　 　
（3）當前狀態下是否能移動“蝸牛老爸”圖層第31幀舞臺上的對象　 　(填字母：A .是/B .否)
（4）測試場景時發現，“蘆葦”圖層的動畫播放完畢，蘆葦仍舊左右搖擺，則“蘆葦”圖層實例的元件類型是　 　
（5）當前場景播放完畢，需單擊“退出”按鈕才進入“謝幕”場景第1幀播放，則“按鈕”圖層第60幀中應設置的動作命令為　 　
（6）要使“背景”圖層的內容持續到本場景結束，并且當前場景播放完畢時聲音同時停止，解決問題的正確方法是　 　
【答案】（1）CD
（2）載入
（3）B
（4）影片剪輯
（5）stop(　　); 或其他等價答案
（6）背景圖層第40幀執行清除關鍵幀操作，并將背景音樂的同步方式改為數據流
【知識點】圖層及圖層的基本操作；時間軸、幀、圖層、庫的概念及基本操作；元件的類型與應用；常用影片控制函數的應用
15．（2020高三上·浙江月考）數軸上有n個閉區間，現要刪除盡可能少的區間，使剩下的區間都不相交。若區間與另一區間之間僅有端點是相同的，不算做區間相交，例如，[1，2]和[2，3]是不相交區間。解決該問題的舞法思想：(1)首先對所有區間進行排序：右端點為主要關鍵字，左端點為次要關鍵字都升序排序；(2)然后在排序后的結果中依次統計不相交的區間個數，最后根據不相交的區間個數計算需刪掉的區間個數。
編寫VB程序，實現上述功能：程序運行時，隨機產生n個閉區間(保證左端點值<右端點值)，并排序后顯示在列表框List1中。單擊“計算”按鈕后，在列表框List2中顯示最終區間情況，在文本框Text1中顯示刪除區間的個數。程序運行界面如圖所示。
請回答下列問題：
（1）界面中“計算”按鈕的對象名為　 　。
（2）實現上述功能的VB程序如下，請在劃線處填入合適的代碼。
Const n= 5
Din a(1 To 2 * n) As Integer
Dim d(1 To 2 * n) As Integer
Private Sub Form Load0
'隨機產生n個閉區間，a(1)、a(2)為第1個區間的左端點和右端點，a(3)、a(4)為第2個區間的左端點和右端點，…a(2*n-1)、a(2*n)為第n個區間的左端點和右端點。
For i=1 To n-1
For j=i+1 To n
If a(2*i)>a(2*j) Or 　 　 Then
t=a(2*i): a(2*i)=a(2*j): a(2*j)=t
t=a(2*i-1):a(2*i-1)=a(2*j-1):a(2*j-1)=t
End If
Next j
Next i
'排序后的區間情況顯示在列表框List1中，代碼略。
End Sub
Private Sub Cmd1_Click(　　)
Dim k As Integer, i As Integer, e As Integer
c=1
List2. Additem “[” + Str(a(1)) + "," + Str(a(2)) + “]”
k=　 　
For i=2 To n
If Then
c=c+1
k=a(2*i)
List2. MddItem "[" + Str(a(2*i- 1)) +".”+ Str(a(2*i)) + "]"
End If
Next i
Text1.Text=“刪除”“剩除”+　 　+"個區間”
End Sub
（3）程序中加框處代碼有錯，請改正。
【答案】（1）Cmd1
（2）a(2*i)=a(2*j) And a(2*i-1)>a(2*j-1)；a(2)；str(n-c)
（3）a(2*i-1)>=k
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；常量、變量及變量的賦值；排序算法及程序實現
16．（2020高三上·浙江月考）大寫字母分段加密。輸入n(n≤50)個大寫字母組成的原文字符串，以規模m為一段進行加密。加密方法為：(1)找出每段中最長的連續遞增子串長度max；(2)將該段每個字符后移max位進行加密，如果后移后的字母ASCII碼值超過90(Asc("Z")=90)，則從小寫字母“a”(ASCII碼值為97)開始表示；(3)規模不足m部分不做處理。
例如：n=10，原文字符串為“ABCXYEFDOK”，m=4時，處理過程如下：
其中，第1段中字母“X”后移4位后超過字母“Z”的ASCII碼值，用“b”表示，第2段中字母“Y”后移2位用“a”表示用VB編寫程序，程序運行時，在文本框Text1中輸入原文字符串，在文本框Text2中輸入每段個數，單擊“加密”按鈕Command1后，在文本框Text3中顯示加密結果。程序運行界面如圖所示。
實現上述功能的VB程序如下，請回答下列問題：
（1）已知加密結果是“RaVJON”，m=4，根據上述加密規則，推得原文是　 　
（2）請在劃線處填入合適的代碼。
Dim a(0 To 50) As String, b(1 To 50) As Integer
Private Sub Command1_Click ()
Dim i As Integer, j As Integer, k As Integer, m As Integer, max As
Integer
n = Len(Text1. Text)
For i=1 To n
a(i) = Mid(Text1.Text, i,
1)
b(i) =　 　
Next i
m=Val (Text2. Text)
max=1
For k=1 To n\m
For i=(k-1)*m+2 To k*m
j=i
Do while 　 　
b(i)=b(i)+1
j=j-1
Loop
If b(i)>max Then
max = b(i)
End If
Next i
For i=(k-1)*m+1 To k*m
s =s+ mingtoni (a(i)， max)
Next i
max=1
Next k
If n Mod m <> 0 Then
For i=(n\m)*m+1 To n
s=s+ a(i)
Next i
End If
Text3.Text = s
End Sub
Function mingtomi(e As
String, d As Integer) As String
If Ase(c) + d > Asc("Z") Then
　 　
Else
mingtomi = Chr(Asc(c) + d)
End If
End Function
【答案】（1）PYTHON
（2）1；a(j)>a(j-1) And j>(k-1)*m+1或a(j)>a(j-1) And j <> (k-1)*m+1；mingtomi=Chr(Asc(c)+d+6)或其他等價答案
【知識點】常量、變量及變量的賦值；過程與自定義函數；分支結構語句及程序實現；循環結構語句及程序實現；加密與解密算法
二一教育在線組卷平臺（zujuan.21cnjy.com）自動生成 1 / 1登錄二一教育在線組卷平臺 助您教考全無憂
浙江省名校新高考研究聯盟（Z20名校聯盟）2021屆高三信息技術第一次聯考試卷
一、選擇題(本大題共12小題，每小題2分，共24分。每小題給出的四個選項中，只有一個符合題目要求，不選、多選、錯選均不得分)
1．（2020高三上·浙江月考）下列有關信息和信息技術的說法中，錯誤的是（　　）
A．傳感器技術已經在智能手機中廣泛使用
B．計算機中所有的字符都采用ASCII碼編碼
C．聲音數字化的基本方法是采樣和量化
D．數據壓縮技術提高了多媒體信息存儲、處理和傳輸的效率
2．（2020高三上·浙江月考）下列有關網站和網頁的說法中，正確的是（　　）
A．使用“添加到收藏夾”功能可將網址收藏到指定的文件夾中
B．使用搜索引擎搜索時，關鍵詞越多，搜索結果越多
C．網站內各個網頁之間均需相互鏈接
D．以“網頁全部(*.htm；*.html)”類型保存網頁，網頁中的圖像不會被保存
3．（2020高三上·浙江月考）在設計某校園一卡通管理系統時，使用Access軟件創建的數據表部分界面如圖所示。
下列說法正確的是（　　）
A．該一卡通系統屬于數據庫管理系統
B．同一身份證號不能同時辦理兩張校園卡
C．當前不能對數據表“充消記錄表”進行重命名操作
D．“用戶身份”的字段值可以輸入“是”或“否”
4．（2020高三上·浙江月考）將下列數轉換為十進制數，除以8后余數為1的是（　　）
A．B50H B．100111B C．F59H D．111000B
5．（2020高三上·浙江月考）使用Goldwave軟件打開某音頻文件，選中其中一段音頻后的部分界面如圖所示。
下列說法正確的是（　　）
A．當前狀態下執行“刪除”操作，則兩個聲道的2～4秒均為靜音
B．當前狀態下執行“裁剪”操作，保持其他參數不變直接保存，存儲容量約為344.5KB
C．把音頻文件“素材.wav”重命名為“素材.mp3”，可以實現聲音格式的轉換
D．當前狀態下執行“插入6秒靜音”操作，音頻的時長不變
6．（2020高三上·浙江月考）使用Photoshop軟件編輯“算術.psd”，部分界面如圖所示。
則當前文檔的圖像大小為（　　）
A．300*400像素 B．520*1000像素
C．450*800像素 D．1116*1400像素
7．（2020高三上·浙江月考）在VB中，若x、y都是正整數且表達式x Mod y=1為真，則下列關系表達式值一定為真的是（　　）
A．x>y B．x\y=0 C．x\y<>x/y D．x*y Mod 2=0
8．（2020高三上·浙江月考）如圖是求 的流程圖，則圖中①處應填入的內容是（　　）
A．A←1+ B．A←2+ C．A← D．A←
9．（2020高三上·浙江月考）有如下VB程序段：
m = a(1): s=0
For i=2 To 5
If a(i) >m Then s=s+m
m= a(i)
Next i
數組元素a(1)到a(5)的值依次為“1，3，4，2，3”，執行該程序段后，變量s的值為（　　）
A．6 B．7 C．10 D．13
10．（2020高三上·浙江月考）有如下VB程序段：
s = "cbafedgh"
m= 3: c=" ": n= Len(s)
For i=1 To n
j=(i-1) Mod 3 + 1
If m> n Then Exit For ‘退出For循環
c= c + Mid(s, m-j+1, 1)
If j Mod 3=0 Then m=m+3
Next i
If i < n Then c = Mid(s, i, n-i+1)+ c
執行該程序段后，變量c的值是（　　）
A．abcdef B．abcdefgh C．ghabcdef D．hgabcdef
11．（2020高三上·浙江月考）某冒泡排序算法的VB程序段如下：
i =n
Do while i>=2
For j=
If a(j) > a(j- 1) Then
t = a(j): a(j) = a(j-1): a(j-1) =t
End If
Next j
i=i-1
Loop
執行完上述程序段后，實現a數組元素有序排列，則劃線處的代碼可以是（　　）
①n To n + 2- i Step –i ②n To i + 1 Step -1 ③2 To i ④2 To n-i
A．②③ B．②④ C．①④ D．①③
12．（2020高三上·浙江月考）某同學將對分查找程序進行了改編，程序運行時，自動產生9個[10，99]之間的不重復隨機數并降序排列，在文本框Text1中顯示。在文本框Text2中輸入查找鍵key，單擊“查找”按鈕Command1，將查找結果顯示在文本框Text3中。程序運行界面如圖所示。
Key = Val (Text2. Text)
i =1
j=9
flag = False
Do While i <= j And flag = False
m=(i+j)\2
If ⑴ Then
j=m-1
ElseIf ⑵ Then
i=m+1
Else
If ⑶ Then
j=m-1
ElseIf ⑷ Then
i=m+1
Else
flag = True
End If
End If
Loop
If flag Then Text3. Text = “在第”+ Str(m) +“個”Else Text3. Text =“找不到”
上述程序段中橫線處可選語句為：
①Key \ 10 > a(m) \ 10 ②Key Mod 10 < a(m) Mod 10
③Key \ 10 < a(m) \ 10 ④Key Mod 10 > a(m) Mod 10
則(1)(2)(3)(4)處語句依次為（　　）
A．①②③④ B．④②①③ C．①③④② D．①②④③
二、非選擇題(本大題共4小題，4+8+7+7，共26分)
13．（2020高三上·浙江月考）某同學收集了某超市2019年第三季度部分商品銷售情況的統計數據，并使用Excel軟件進行數據處理，如圖a所示。
請回答下列問題：
（1）如圖a所示，若要正確計算蔬菜類7月銷量總計，則下列方法錯誤的是 (單選，填字母)
A．在C13單元格中輸入公式“=SUM(C9，C10，C11，C12)”
B．在C13單元格中輸入公式“=SUM(C9：C12)”
C．在C13單元格中輸入公式“=C9+C10+C11+C12”
D．將C8單元格直接復制粘貼到C13單元格
（2）用排序的方法找出蔬菜類“9月增幅(%)”最大的商品，則排序應選擇的數據區域為　 　，主要關鍵字為　 　。
（3）根據圖a中數據制作的圖表如圖b所示，創建該圖表的數據區域是　 　。
14．（2020高三上·浙江月考）某同學制作“親子活動”的多媒體作品，首先在Photoshop中進行圖片處理，然后再用Flash軟件創作了一個動畫，請回答下列問題：
（1）如圖a所示，下列對“背景”圖層的操作中可行的是　 　(多選，填字母：A .將“蝸牛父子”圖層的圖層樣式拷貝粘貼至“背景”圖層/B .將“背景”圖層移至“石臺”圖層上方/C .給“背景”圖層添加“鏡頭光暈”的濾鏡效果/D .用仿制圖章工具將“背景”圖層上的“昵圖網”字樣去除/E.刪除背景圖層，存儲為JPG格式，該圖像部分透明)
（2）當前狀態下執行測試影片命令，首先播放的場景是　 　
（3）當前狀態下是否能移動“蝸牛老爸”圖層第31幀舞臺上的對象　 　(填字母：A .是/B .否)
（4）測試場景時發現，“蘆葦”圖層的動畫播放完畢，蘆葦仍舊左右搖擺，則“蘆葦”圖層實例的元件類型是　 　
（5）當前場景播放完畢，需單擊“退出”按鈕才進入“謝幕”場景第1幀播放，則“按鈕”圖層第60幀中應設置的動作命令為　 　
（6）要使“背景”圖層的內容持續到本場景結束，并且當前場景播放完畢時聲音同時停止，解決問題的正確方法是　 　
15．（2020高三上·浙江月考）數軸上有n個閉區間，現要刪除盡可能少的區間，使剩下的區間都不相交。若區間與另一區間之間僅有端點是相同的，不算做區間相交，例如，[1，2]和[2，3]是不相交區間。解決該問題的舞法思想：(1)首先對所有區間進行排序：右端點為主要關鍵字，左端點為次要關鍵字都升序排序；(2)然后在排序后的結果中依次統計不相交的區間個數，最后根據不相交的區間個數計算需刪掉的區間個數。
編寫VB程序，實現上述功能：程序運行時，隨機產生n個閉區間(保證左端點值<右端點值)，并排序后顯示在列表框List1中。單擊“計算”按鈕后，在列表框List2中顯示最終區間情況，在文本框Text1中顯示刪除區間的個數。程序運行界面如圖所示。
請回答下列問題：
（1）界面中“計算”按鈕的對象名為　 　。
（2）實現上述功能的VB程序如下，請在劃線處填入合適的代碼。
Const n= 5
Din a(1 To 2 * n) As Integer
Dim d(1 To 2 * n) As Integer
Private Sub Form Load0
'隨機產生n個閉區間，a(1)、a(2)為第1個區間的左端點和右端點，a(3)、a(4)為第2個區間的左端點和右端點，…a(2*n-1)、a(2*n)為第n個區間的左端點和右端點。
For i=1 To n-1
For j=i+1 To n
If a(2*i)>a(2*j) Or 　 　 Then
t=a(2*i): a(2*i)=a(2*j): a(2*j)=t
t=a(2*i-1):a(2*i-1)=a(2*j-1):a(2*j-1)=t
End If
Next j
Next i
'排序后的區間情況顯示在列表框List1中，代碼略。
End Sub
Private Sub Cmd1_Click(　　)
Dim k As Integer, i As Integer, e As Integer
c=1
List2. Additem “[” + Str(a(1)) + "," + Str(a(2)) + “]”
k=　 　
For i=2 To n
If Then
c=c+1
k=a(2*i)
List2. MddItem "[" + Str(a(2*i- 1)) +".”+ Str(a(2*i)) + "]"
End If
Next i
Text1.Text=“刪除”“剩除”+　 　+"個區間”
End Sub
（3）程序中加框處代碼有錯，請改正。
16．（2020高三上·浙江月考）大寫字母分段加密。輸入n(n≤50)個大寫字母組成的原文字符串，以規模m為一段進行加密。加密方法為：(1)找出每段中最長的連續遞增子串長度max；(2)將該段每個字符后移max位進行加密，如果后移后的字母ASCII碼值超過90(Asc("Z")=90)，則從小寫字母“a”(ASCII碼值為97)開始表示；(3)規模不足m部分不做處理。
例如：n=10，原文字符串為“ABCXYEFDOK”，m=4時，處理過程如下：
其中，第1段中字母“X”后移4位后超過字母“Z”的ASCII碼值，用“b”表示，第2段中字母“Y”后移2位用“a”表示用VB編寫程序，程序運行時，在文本框Text1中輸入原文字符串，在文本框Text2中輸入每段個數，單擊“加密”按鈕Command1后，在文本框Text3中顯示加密結果。程序運行界面如圖所示。
實現上述功能的VB程序如下，請回答下列問題：
（1）已知加密結果是“RaVJON”，m=4，根據上述加密規則，推得原文是　 　
（2）請在劃線處填入合適的代碼。
Dim a(0 To 50) As String, b(1 To 50) As Integer
Private Sub Command1_Click ()
Dim i As Integer, j As Integer, k As Integer, m As Integer, max As
Integer
n = Len(Text1. Text)
For i=1 To n
a(i) = Mid(Text1.Text, i,
1)
b(i) =　 　
Next i
m=Val (Text2. Text)
max=1
For k=1 To n\m
For i=(k-1)*m+2 To k*m
j=i
Do while 　 　
b(i)=b(i)+1
j=j-1
Loop
If b(i)>max Then
max = b(i)
End If
Next i
For i=(k-1)*m+1 To k*m
s =s+ mingtoni (a(i)， max)
Next i
max=1
Next k
If n Mod m <> 0 Then
For i=(n\m)*m+1 To n
s=s+ a(i)
Next i
End If
Text3.Text = s
End Sub
Function mingtomi(e As
String, d As Integer) As String
If Ase(c) + d > Asc("Z") Then
　 　
Else
mingtomi = Chr(Asc(c) + d)
End If
End Function
答案解析部分
1．【答案】B
【知識點】信息技術的概念與關鍵技術；信息的編碼；多媒體數據壓縮技術；數字化概念與作用
2．【答案】A
【知識點】網絡資源的類型、下載與保存；瀏覽器；網絡資源的檢索；網頁的交互設計
3．【答案】B
【知識點】數據庫、數據庫系統及其特征；數據表、字段、記錄的編輯；數據表視圖與設計視圖
4．【答案】C
【知識點】進制及數制轉換
5．【答案】B
【知識點】聲音素材的基本處理；聲音、圖像、視頻編碼
6．【答案】A
【知識點】聲音、圖像、視頻編碼
7．【答案】C
【知識點】運算符、基本運算與表達式
8．【答案】D
【知識點】常量、變量及變量的賦值；流程圖識讀
9．【答案】A
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
10．【答案】C
【知識點】運算符、基本運算與表達式；分支結構語句及程序實現；循環結構語句及程序實現
11．【答案】D
【知識點】常量、變量及變量的賦值；排序算法及程序實現
12．【答案】C
【知識點】常量、變量及變量的賦值；查找算法及程序實現
13．【答案】（1）D
（2）B9:G12；列G
（3）B2:E2,B17:E17
【知識點】表格數據的基本操作；表格數據的處理與計算
14．【答案】（1）CD
（2）載入
（3）B
（4）影片剪輯
（5）stop(　　); 或其他等價答案
（6）背景圖層第40幀執行清除關鍵幀操作，并將背景音樂的同步方式改為數據流
【知識點】圖層及圖層的基本操作；時間軸、幀、圖層、庫的概念及基本操作；元件的類型與應用；常用影片控制函數的應用
15．【答案】（1）Cmd1
（2）a(2*i)=a(2*j) And a(2*i-1)>a(2*j-1)；a(2)；str(n-c)
（3）a(2*i-1)>=k
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；常量、變量及變量的賦值；排序算法及程序實現
16．【答案】（1）PYTHON
（2）1；a(j)>a(j-1) And j>(k-1)*m+1或a(j)>a(j-1) And j <> (k-1)*m+1；mingtomi=Chr(Asc(c)+d+6)或其他等價答案
【知識點】常量、變量及變量的賦值；過程與自定義函數；分支結構語句及程序實現；循環結構語句及程序實現；加密與解密算法
二一教育在線組卷平臺（zujuan.21cnjy.com）自動生成 1 / 1

展開更多......

收起↑