資源簡介

浙江省之江教育評價聯盟2019-2020學年高三上學期信息技術第二次聯考試卷
一、選擇題（本大題共12小題，每小題2分，共24分）
1．（2019高三上·浙江月考）下列有關信息與信息技術的說法，正確的是（　　）
A．信息可以脫離它所反映的事物而被存儲、保存和傳播，說明信息不需要載體
B．信息具有時效性，說明信息一定會過期
C．小孔成像現象體現了圖像的數字化
D．第一代計算機采用的是電子管技術
【答案】D
【知識點】信息及其特征
【解析】【解答】 信息可以脫離它所反映的事物而被存儲、保存和傳播，說明信息可由一個載體轉移到另一個載體，體現了信息的可傳遞性，本項錯。選項B：信息具有時效性， 隨著時間的推移信息的價值會發生變化，但信息可以被再次加工利用，說信息會過期是錯誤的。選項C：信息數字化是將圖像存儲在電腦中以數字形式表示，而小孔成像沒有將圖像變為數字，本項錯。選項C：第一代計算機采用電子 管技術，第二代采用晶體管技術，第三代為集成電路技術，第四代為大規模超大規模集成電路技術。本項對。故答案選D。
【分析】本題考查的是信息的特征和計算機的發展史。信息有五個基本特征和五個一般特征。基本特征：普遍性、依附性、傳遞性、價值性、時效性；一般特征：共享性、真偽性、不完全性、價值相對性、可處理性。
2．（2019高三上·浙江月考）下列有關網絡資源的說法，不正確的是（　　）
A．因特網上存儲著海量信息，獲取的方式也多種多樣
B．通過“網頁，全部”的方式保存網頁，同時也收藏了網址
C．POP3協議將郵件從郵件服務器端送到個人終端機器上
D．不同搜索引擎的檢索結果可能不同
【答案】B
【知識點】信息獲取的環節與方法；電子郵件，電子公告板等信息交流方式；網絡資源的檢索；網頁、網站的概念與聯系
【解析】【解答】選項A： 因特網上存儲著海量信息， 可以搜索查詢，也可以下載，可以看，可以聽，獲取方法多種多樣，本項對。選項B：通過“網頁，全部”的方式保存網頁中的文字和圖像，但不能將網址放到收藏夾，本項錯。選項C：POP3協議又稱郵局協議，是用戶接收郵件的協議，本項對。選項D：搜索引擎即提供搜索功能的網站由于這些網站采用的搜索技術不同，所以搜索結果也不同，本項對。故答案選B。
【分析】本題考查的是信息的獲取方法、網頁的保存、郵件的發送及網絡搜索功能。信息獲取指圍繞一定目標，在一定范圍內，通過一定的技術手段和方式方法獲得原始信息的活動和過程。獲取信息的途徑不是單一的，是多種多樣的。保存網頁的類型有四種：1.“網頁，全部是” 將你現打開的網頁文字、內容等所有都保存下來。 2.“Web檔案，單一文件（mht）” 將你打開的網頁文字、圖片、文字格式等保存下來，但是建立文件夾而是保存在一個文件中。 3.“網頁，僅HTML”與第一種網頁，全部是 一種保存方式，但不建立與網頁同名的文件夾不保存圖片。 4.文本文件僅將網頁所有文字保存下來其他圖片、格式等都不保存。SMTP是發送郵件的協議，POP3是接收郵件的協議。搜索引擎即提供搜索功能的網站由于這些網站采用的搜索技術不同，所以搜索結果也不同。
3．（2019高三上·浙江月考）下列應用中，體現了人工智能技術的是（　　）
A．使用手機遠程控制電器 B．使用手機掃描二維碼進行付款
C．AlphaGo與棋手對弈 D．使用通訊軟件與家人視頻通話
【答案】C
【知識點】人工智能的應用
【解析】【解答】選項A：使用手機遠程控制電器使用的是遠程控制技術，不是人工智能技術。選項B： 使用手機掃描二維碼進行付款不屬于人工智能技術。選項C：AlphaGo與棋手對弈使用的是機器人技術，屬于人工智能技術。選項D： 使用通訊軟件與家人視頻通話使用的是視頻通信技術，不是人工智能技術。故答案選C。
【分析】本題考查的是人工智能技術的范疇。人工智能（Artificial Intelligence），英文縮寫為AI。它是研究、開發用于模擬、延伸和擴展人的智能的理論、方法、技術及應用系統的一門新的技術科學。人工智能包括機器人、語音識別、圖像識別、生物識別、自然語言處理和專家系統等。
4．（2019高三上·浙江月考）下列關于Access數據庫和數據表的說法，正確的是（　　）
A．一張數據表用來存儲同一類型或同一主題的相關數據
B．若數據表中已經有記錄，則該數據表就不能再新建自動編號類型的字段
C．修改數據表中某字段的數據類型，保存后再改回原類型，對字段值沒有影響
D．Access數據表的數據導出到Excel后，Excel中顯示的記錄值不變
【答案】A
【知識點】數據表、字段、記錄的概念；數據表、字段、記錄的編輯
【解析】【解答】選項A數據庫中的數據是以表為單位進行存儲和處理的，一張數據表可以存儲同一類型的數據也可存儲不同類型的數據，但各數據之間必須有關，本項對。選項B： 若數據表中已經有記錄，則該數據表 仍可添加新字段，新字段的類型仍可為自動編號類型，本項錯。選項C：在將一個字段類型改為其他類型時字段值會發生變化，如果再改回來由字段值將不能還原，本項錯。選項D： Access數據表的數據導出到Excel后，Excel中顯示的記錄值會發生變化，如是/否類型將用true和false代替，本項錯。故答案選A。
【分析】本題考查的是Access的字段類型及數據導出。Access允許九種數據類型：文本、備注、數值、日期/時間、貨幣、自動編號、是/否、OLE對象、超級鏈接、查詢向導。在表的設計視圖中，每一個字段都有設計類型。在字段類型發生變化時其字段值也會發生變化。Access可以實現與其他軟件的數據交換這就是數據的導入和導出。在導出時數據類型會適應其他軟件的數據從而導致某些字段值發生變化。
5．（2019高三上·浙江月考）使用Ultraedit觀察字符內碼，部分界面如圖所示，下列說法正確的是（　　）
A．圖中共有6個GB2312字符，3個ASCII碼字符
B．字符“國”的二進制編碼是10111001 11111010
C．ASCII碼字符“70”的十六進制內碼是37 A3 B0
D．圖中所有字符內碼相加之和再轉換成二進制后，最右邊的是“0”
【答案】B
【知識點】信息的編碼
【解析】【解答】選項A：同圖可知，圖中共有7個GB2312字符和2個ASCII字符（2、9），本項錯。選項B：由圖可知“國”的十六進制編碼為“B9 FA”，轉為二進制編碼為“1011 1001 1111 1010”，本項對。選項C：由圖可知“2”的十六進制編碼為“32”可以推知“0”的十六進制編碼為“30”，“7”的十六進制編碼為“37”，故“70”的十六進制編碼為“30 37”，本項錯。選項D：計算本題字符ASCII碼之和較困難，但判斷其奇偶性較簡單，只要將十六進制的最后一位相加（可按十進制計算）然后判斷最后一位相加得到的最右位的奇偶性即可，如本題可以將2+0+1+9+0+2+4+8+1=27，故其內碼之和為一個奇數，最右邊位為“1”，本項錯。故答案選B。
【分析】本題考查的是中英文及字符在計算機內部的內碼表示。在計算機內部中英文字符都是以二進制來表示的，為了方便表示，Ultraedit以十六進制碼來表示內碼，在計算機內部，一個中文及其字符以二個字節、16位二進制數、4位十六進制數來表示的。而英文用一個字節、8位二進制數、2位十六進制數來表示，在ASCII碼中，英文字母和數字是按字母表和數字的小大順序排序的，所以可由已知字符的內碼來推測未知字符和數字的內碼。
6．（2019高三上·浙江月考）下列有關多媒體技術相關概念的說法，正確的是（　　）
A．導航軟件播報前方路況信息，主要體現了多媒體技術的交互性
B．位圖是用一組指令集合或數學公式來描述的
C．壓縮算法要盡量復雜是衡量壓縮技術好壞的指標之一
D．媒體元素分解涉及的內容有描述素材類型和獲取方式等
【答案】D
【知識點】多媒體技術的概念和特征；多媒體技術的應用；多媒體數據壓縮技術
【解析】【解答】選項A： 導航軟件播報前方路況信息，主要體現了多媒體技術的實時性而不是交互性，本項錯。選項B：位圖是由像素點來描述圖像的，而矢量圖才是由一組指令集合或數學公式來描述的 ，本項錯。選項C：壓縮比是 衡量壓縮技術好壞的指標之一 ，算法復雜度是稱量算法好壞的指標，不是衡量壓縮技術的指標，本項錯。選項D：媒體元素分解所涉及的工作有：1、將原始素材列成表格；2、確定原始素材的獲取方式；3、制定多媒體素材的處理方案；4、指明所有到的設備和工具軟件。本項對。故本題答案選D。
【分析】本題考查的是多媒體技術的特點和多媒體作品制作的過程。多媒體的特點有集成性、控制性、交互性、非線性、實時性、互動性、信息使用的方便性、信息結構的動態性。多媒體制作過程可分為五個步驟：確定主題、分析與策劃、采集與加工、作品集成、測試與評價。其中多媒體設計與策劃包括應用需求分件和創作需求及腳本編寫三部分。腳本編寫包括：制定腳本大綱、編寫文字腳本、編寫制作腳本、媒體元素分解等四步驟。
7．（2019高三上·浙江月考）下列選項的結果與其他選項不同的是（　　）
A．Val(Mid("2019",3,2))
B．Int(Rnd * 9 + 10) \ 10 + 18
C．2019 Mod 100 - 2019 Mod 10
D．(Asc("D") - Asc("A"))^ 3-Sqr(64)
【答案】C
【知識點】運算符、基本運算與表達式
【解析】【解答】選項A： Val(Mid("2019",3,2)) =val（“19”）=19。選項B： Int(Rnd * 9 + 10) \ 10 + 18 =（10到19）\10+18=1+18=19。選項C：2019 mod 100-2019 mod 10=19-9=10。選項D： (Asc("D") - Asc("A"))^ 3-Sqr(64) =（68-65）^3-8=27-8=19。在本題各選項中ABD的值為19，C的值為10。故答案選C。
【分析】本題考查的是VB常用函數的功能及mod運算符的作用。在本題中涉及到的函數有val（）是將字符串轉為數值型，mid（）為按指定的位置在指定的字符串中中取指定長度的子串，rnd為隨機函數，int（）為取整函數，其值取不大于參數的整數。mod為取模運算符，結果為兩個數相除的余數。asc（）是求參數的ASCII碼值，sqr（）為求參數的算術平方根。
8．（2019高三上·浙江月考）某算法的部分流程圖如圖所示，執行該流程后，輸出i，k的值分別是（　　）
A．52,4 B．52,5 C．50,4 D．50,5
【答案】B
【知識點】算法的常用表示方法；算法的控制結構
【解析】【解答】由本題的流程圖可知，初始時i=0，k=0，i=0【分析】本題考查的是觀察流程圖來分析整個程序執行過程。在本題中先將i和k初始化為0，然后判斷i值是否小于50，如果小于50則執行循環體：將i除以6看其余數是否為0，如為0則將k值增1，無論除盡不能除盡6，則將i值增4.執行完循環體后看i值是否小于50，如果小于50繼續執行循環體直到i值大于等于50為止，大于50時退出循環并輸出i和k的值。
9．（2019高三上·浙江月考）有如下程序段：
s = "2019Nian12yue3Ri"
For i = Len(s)-1 To 1 step -1
If Mid(s, i, 1) <= "9" And Mid(s, i + 1, 1) >= "A" Then
sum= sum+ Val(Mid(s, i, 1))
End If
Next i
運行程序后，變量sum 的值是（　　）
A．2034 B．2019 C．12 D．14
【答案】D
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
【解析】【解答】本題程序分析如下：
s = "2019Nian12yue3Ri" ‘將字符串"2019Nian12yue3Ri"賦給字符串變量s
For i = Len(s)-1 To 1 step -1 ‘使用i來控制循環，i的初值為字符串長度少1，終值為1，步長為-1，i代表在字符串中字符的位置，相當于字符指針，中取字符時由后向前取
If Mid(s, i, 1) <= "9" And Mid(s, i + 1, 1) >= "A" Then ‘如果該字符比“9”的ASCII碼值小且其后的字符的ASCII碼值大于字符“A”的ASCII值時進行如下處理
sum= sum+ Val(Mid(s, i, 1)) ‘將這個字符取出來轉為數值型并累加到累加器sum中
End If ‘結束條件判斷
Next i ‘結束循環
在本題中將其后為字符的數字轉為數值型并累加到sum中，故sum=3+2+9=14。故答案選D。
【分析】本題考查的是中取函數mid(　　)的功能、累加器的使用及條件判斷的含義。在本題中mid(　　)是按指定的位置從指定的字符串中取指定長度的子串。而本題的條件是取其后為字符但其后不能是數字的字符并轉為數值型。累加器是將某一變量或表達式的值累加到該變量的變量，本題累加器的形式為： sum= sum+ Val(Mid(s, i, 1)) 。
10．（2019高三上·浙江月考）為了判斷一個三位正整數的各個位置之和是否是9的倍數，下列程序劃線處應填入的語句是（　　）
x = ①
t = 0: s = ""
Do While x <> 0
t = ②
x = x \ 10
Loop
If ③ Then Then Then s = "是9的倍數" Else s = "不是9的倍數"
A．①Int(Rnd * 900) + 100 ② x Mod 10 ③ t Mod 9 = 0
B．①Int(Rnd * 900) + 100 ② t + x Mod 10 ③ t Mod 9 = 0
C．①Int(Rnd * 899) + 100 ② t + x Mod 10 ③ t / 9 = 1
D．①Int(Rnd * 900) ② t + x \ 10 ③ t \ 9 = 1
【答案】B
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
【解析】【解答】本題程序分析如下：
x = ① ‘將一個【100，999】范圍內的隨機整數賦給變量x，故本處答案應填寫： Int(Rnd * 900) + 100
t = 0: s = "" ‘初始化t的值為0，s的值為空串，其中t為各位上的數之和，s存儲判斷結果
Do While x <> 0 ‘在x不等于0時執行循環
t = ② ‘將x的最后一位取出來累加到變量t中，故本處答案應填寫： t + x Mod 10
x = x \ 10 ‘將x去掉個位數后再賦給x
Loop ‘結束循環
If ③ Then Then Then s = "是9的倍數" Else s = "不是9的倍數" ‘如果t能被9除盡則將s值賦為 "是9的倍數"，否則s值為 "不是9的倍數" ，故本處答案應填寫： t Mod 9 = 0
由以上程序分析知， ① 處為將一個【100，999】范圍內的隨機整數賦給變量x，故本處答案應填寫： Int(Rnd * 900) + 100。② 處為將x的最后一位取出來累加到變量t中，故本處答案應填寫： t + x Mod 10。③ 處為如果t能被9除盡則將s值賦為 "是9的倍數"，否則s值為 "不是9的倍數" ，故本處答案應填寫： t Mod 9 = 0。故答案選B。
【分析】本題考查的是產生一個隨機數的公式、判斷一個數能否被其他數整除的方法及累加器的使用。產生指定范圍內的隨機數公式為：int((上限-下限+1）*rnd）+下限，判斷一個數能被另一個數整除，可從他們的余數上來判斷，如果余數為0則表示除盡否則沒有除盡。累加器是將一個變量或表達式通過循環累加到某個變量的變量，本題累加器的形式為：t= t + x Mod 10 。
11．（2019高三上·浙江月考）有如下程序段：
Dim a(1 To 5) As Integer
For i = 1 To 5
a(i) = Int(Rnd * 30 + 10)
t = t + a(i) \ 10
Next i
For j = 1 To t \ 3
If j Mod 2 = 1 Then a(j) = a(j) + 1 Else a(j) = a(j) - 1
Next j
運行程序后，數組a各個元素的值，不可能的是（　　）
A．40,10,32,11,17 B．34,9,33,33,31
C．12,13,14,9,10 D．31,32,33,9,21
【答案】C
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
【解析】【解答】本題程序分析如下：
Dim a(1 To 5) As Integer ‘定義一個整型數組a，a共有5個元素
For i = 1 To 5 ‘使用i來控制循環，i的初值為1，終值為5，步長為1
a(i) = Int(Rnd * 30 + 10) ‘將一個【10，39】的隨機整數賦給數組a的一個元素
t = t + a(i) \ 10 ‘將數組元素a除以10后將其整數商累加到變量t中
Next i ‘結束循環
For j = 1 To t \ 3 ‘使用j來控制循環，j的初值為1，終值為t除以3的整數商，步長為1
If j Mod 2 = 1 Then a(j) = a(j) + 1 Else a(j) = a(j) - 1 ‘如果j為奇數則將其對應的數組元素加1，否則將數組元素減少1
Next j ‘結束循環
由以上程序分析知，數組元素的初始值的范圍為【10，39】，再加上1或減去1后其范圍為【9，40】，本題各選項均符合，然后從其異常調整過的數來判斷，A：至少調整了第一個元素，第一個元素的原值為39，從第二個元素開始其范圍在【10，39】之間，t值至少為1，由十位數之和來看t值項符合要求。選項B：第二個元素為9，說明t值至少為6，而從其十位上的數來看t=3+1+3+3+3=10大于6，t值符合要求。選項C：由第四個元素的值為9來看至少t的值為12，而本項t=1+1+1+1+1=5，其值小于12不合要求，本項錯。選項D：由第四個元素的值為9來看至少t的值為12，而本項t=3+3+3+1+2=12，符合要求。故答案選C。
【分析】本題考查的是產生一個指定范圍內的隨機整數及累加器的使用。產生指定范圍內的隨機數公式為：int((上限-下限+1）*rnd）+下限。累加器可以將一個變量或一個表達式的值通過循環累加到該變量的變量，在本題累加器是累加隨機整數的十位上的數，其格式為： t = t + a(i) \ 10 。
12．（2019高三上·浙江月考）有如下程序段：
s = "defghiabc"
key = Text1.Text
i = 1: j = Len(s)
Do While i <= j
m = (i + j) \ 2
c = Mid(s, m, 1)
If c = key Then Exit Do
If Mid(s, i, 1) < c Then
If key >= Mid(s, i, 1) And key < c Then j = m - 1 Else i = m + 1
Else
If key > c And key <= Mid(s, j, 1) Then i = m + 1 Else j = m - 1
End If
ans = ans + Str(m)
Loop
運行程序后，若在文本框Text1中輸入字符"b"，則變量ans的值是（　　）
A．5 B．5 7 8 C．5 3 D．5 7
【答案】D
【知識點】查找算法及程序實現
【解析】【解答】本題程序分析如下：
s = "defghiabc" ‘給符串變量s賦值為 "defghiabc"
key = Text1.Text ‘將從文本框1中輸入的字符賦給變量key
i = 1: j = Len(s) ‘將i初始化為1，將j賦值為字符串的長度，i和j指示著字符串左右兩邊的位置
Do While i <= j ‘在i值小于等于j值時進行循環
m = (i + j) \ 2 ‘求i和j的中值并賦給變量m
c = Mid(s, m, 1) ‘將中值指向的字符中取出來賦給變量c
If c = key Then Exit Do ‘如果c值為key值相同則退出循環
If Mid(s, i, 1) < c Then ‘如果最左邊的字符小于中值字符時說明從左到中值為升序排序則進行如下處理
If key >= Mid(s, i, 1) And key < c Then j = m - 1 Else i = m + 1 ‘如果要查找的字符大于左邊字符時且要查找的值小于中值時將指示最右邊的指針j設為中值少1否則設指示最左邊的指針i為中值多1
Else ‘否則即從最左邊到中值為降序排序時進行如下處理
If key > c And key <= Mid(s, j, 1) Then i = m + 1 Else j = m - 1 ‘如果要查找的字符大于中值字符時且要查找的值小于最右側字符值時將指示最左邊的指針i設為中值多1否則設指示最右邊的指針i為中值少1
End If ‘結束條件判斷
ans = ans + Str(m) ‘將中值元素值累加到變量ans中
Loop ‘結束循環
由以上程序分析知該程序采用二分法查找數據并將中值累加到變量ans中。第一次循環i=1，j=9，m=5
“h”<>“b”“d”>“b”，故i=m+1=6，ans=“5”，第二次循環，i=6，j=9，m=7，此時“a”<>“b”,且“a”j=9，故m=8，此時key=c退出循環，不再累加ans值，最后ans=”57“。故答案選D。
【分析】本題考查的是對分法查找數據的算法。對分法查找過程是先將一個數列放于一個有序數組中，然后比較中間數組元素的值與要查找的值，或中間數組的值比要查找的值大，則在前半個數組中查找，若中間數組的值比要查找的值小則在后半個數組中查找。查找方法仍是比較中間數組元素的值和要查找的值。以此類推直到查到或下限大于了上限（沒查找）為止。
二、非選擇題（本大題共4小題，4+8+7+7，共26分）
13．（2019高三上·浙江月考）使用Excel軟件制作了反映浙江省各地市國際旅游外匯收入的工作表，請回答下列問題：
（1）如圖a所示，區域B12：L12的數據是通過公式計算得到的：在B12單元格中輸入公式　 　，再利用自動填充功能完成區域C12：L12的計算。
圖a
（2）根據圖a中的數據制作了圖表，如圖b所示，創建該圖表的數據區域是　 　。
圖b
（3）小明發現Excel可以按行排序，他選擇區域B2：L10，按照圖c所示的方式進行排序。排序完成后，圖b顯示的圖表　 　（填：會/不會）改變，C12單元格顯示的值是　 　。
圖c
【答案】（1）=RANK(B11,$B$11:$L$11)
（2）B2:L2,B11:L11
（3）會；9
【知識點】表格數據的基本操作；表格數據的處理與計算
【解析】【解答】(1)由圖a可知，F12單元格的公式為： RANK(F11,$B$11:$L$11) ，即求F11在B11到L11中的排名，而F11為相對引用，$B$11:$L$11為絕對引用，由F12的公式可知本小題答案就填空：=RANK(B11,$B$11:$L$11) 。
（2）由圖b可知，本圖為簇狀柱形圖，其橫坐標為城市名稱在B2：L2行上，縱坐標為各地市平均外匯收入在F12到L12上，故本小題答案填寫： B2:L2,B11:L11 。
（3）在排序后，各城市的順序發生了變化，即圖表數據區域： B2:L2,B11:L11 也發生了變化，基于該數據上的圖表也會發生變化，故本小題第一個空答案填寫：會。由圖可知各聲調按2017年旅游外匯收入排序，其順序為衢州市、舟山市、嘉興市、紹興市、臺州市、湖州市、金華市、溫州市、寧波市、麗水市、杭州市，衢州市排在B列、舟山市數據排在C列，故本小題第二個空填寫：9。
【分析】本題考查的是單元格地址的相對引用和絕Excel的地址引用有相對地址引用和絕對地址引用及混合地址引用3種方式，相對地址引用就是單元格地址前不加任何東西，單元格地址會隨單元格的變化而變化，絕對單元格地址引用就是在單元格地址前加$號，不會隨單元格的變化而變化。混合引用是在行號或列標前加$號，另一個不加，在復制公式時加$號的不變，不加$號的變化。在排序時注意不要選擇合并的單元格，尤其選擇標題欄時注意標題欄是否為合并單元格。圖表數據區域的選擇是看其橫軸和縱軸的數據，從而確定圖表的數據區域。
14．（2019高三上·浙江月考）要制作一個主題為“國慶閱兵”的多媒體作品。首先使用Photoshop軟件制作背景圖片，然后使用Flash軟件制作動畫，請回答下列問題：
圖a
（1）如圖a所示，在Photoshop中下列操作可行的有 （多選，填字母）
A．將“氣球”圖層移到“背景”圖層下方
B．選中“氣球”圖層，使用“魔棒工具”選擇白色區域后按“Delete”鍵刪除
C．選中“國慶快樂”圖層，使用“油漆桶工具”將字體顏色改為紅色
D．復制“國慶快樂”圖層的圖層樣式，粘貼至“背景”圖層
E．使用“圖像大小”修改“背景”圖層的寬度
（2）如圖b所示，“飛機”圖層實現了飛機先從位置（600,300）飛至位置（400,100），再從右向左順時針旋轉兩次飛至位置（100,100），最后飛至位置（-100,300）的效果，那么“飛機”圖層第1至第12幀的動畫類型是　 　（單選，填字母：A .逐幀動畫 / B .動畫補間 / C .形狀補間）。整個動畫飛機飛行的軌跡是　 　（單選，填字母：A . （缺選項） / B
. / C . / D . ）
圖b
（3）圖b中“音樂”圖層聲音的同步方式是“數據流”，若動畫播放3秒后需要重新播放該音樂，在不改變其他動畫效果的前提下，應進行的操作是　 　。
（4）測試影片時，若想實現單擊“停止”按鈕后關閉動畫，則按鈕上應添加的動作腳本是　 　。
【答案】（1）A；B；E
（2）B；C
（3）復制“音樂”圖層第1幀，粘貼至第36幀
（4）on (release) {fscommand("quit");}
【知識點】圖片加工常用工具的使用；動畫的類型；常用影片控制函數的應用
【解析】【解答】（1）選項A：由圖可知，“背景”圖層不是真正意義上的背景圖層。背景圖層為一個空心鎖，而此處的背景圖層為一個實心鎖，可以將“氣球”圖層移動到另一個圖層的下方，本項對。選項B：選中“氣球”圖層后，使用“Delete”鍵可以刪除白色區域從而使該圖層透明化，本項對。選項C：“國慶快樂”圖層為文本圖層，不能使用“油漆桶工具”，本項錯。選項D：由圖a可知“背景”圖層處于鎖定狀態是不能編輯的，本項錯。選項E：“圖像大小”工具可以修所有圖層的寬度也包括“背景”圖層的寬度，本項對。故本小題答案選ABE。
（2）由圖b的“飛機”圖層可知該圖層為一個紫色背景加幾個黑色箭頭，故本小題答案選填B。由圖了可知“飛機”圖層的飛機剛開始位置為（600，300）在屏幕的右下角，然后飛至（400，100）由運動方向為左上方，然后飛至（100，100），為水平向左運動，然后飛至 （-100,300） 運動方各為左下方，故本小題第二個空選C。
（3）由圖b可知，“音樂”圖層的同步方式為“數據流”則動畫不停聲音就不停止，而音樂是從第一幀到第50幀的，若想從第3秒開始重新播放則需要從動畫的第三秒開始重新開始該音樂而該動畫的幀頻為12fps，即播放3秒需要36幀，故本小題答案應填寫： 復制“音樂”圖層第1幀，粘貼至第36幀 。
（4） 若想實現單擊“停止”按鈕后關閉動畫 ，則需要的動作腳本為：按下“停止”按鈕或釋放該按鈕時退出動畫，故本小題答案應填寫： on (release) {fscommand("quit");} 或 on (press) {fscommand("quit");} 。
【分析】本小題考查的是背景、文本圖層的特點、動畫補間類型、由對象的x軸y軸數據確定其運動規跡、聲音同步事件設置、幀頻及動作腳本。背景圖層不可以調節圖層順序，永遠在最下邊，不可以調節不透明度和加圖層樣式，以及蒙版。可以使用畫筆，漸變，濾鏡，圖章和修飾工具。文字圖層通過文字工具創建。文字層不可以進行濾鏡，可以使用圖層樣式等的操作。可由象的x軸y軸數據確定其運動規跡。聲音的同步設置一般由數據流和事件兩種。幀頻就是每秒播放的幀的次數。多媒體加入動作腳本可以增強多媒體作品的人機交互功能。
15．（2019高三上·浙江月考）數組a存儲降序排列的m個數據，數組b中存儲的是升序排列的n個數據，且兩個數組中存儲的數據為區間[1,20]范圍內的不重復的隨機整數。現將兩個數組的數據合并到c數組中，使c數組的數據為左右交替上升，如下表所示：
a(1) a(2) a(3) a(4) a(5)
19 17 6 4 3
a數組
b(1) b(2) b(3) b(4) b(5) b(6)
5 7 8 13 15 20
b數組
c(1) c(2) c(3) c(4) c(5) c(6) c(7) c(8) c(9) c(10) c(11)
3 5 7 13 17 20 19 15 8 6 4
c數組
當窗體Form1加載時，自動產生a、b數組的數據，并分別顯示在列表框List1與List2中，單擊合并按鈕Command1后，在c數組中保存按規則合并后的a、b數組的數據，并顯示在列表框List3中。程序截圖如下所示：
實現該功能的VB程序如下：
Const m = 5
Const n = 6
Dim a(1 To m) As Integer
Dim b(1 To n) As Integer
Dim c(1 To m + n) As Integer
‘窗體加載時，生成數組a、b中的數據，并按要求排序后顯示在列表框中，代碼略
Private Sub Command1_Click()
Dim pa As Integer, pb As Integer, pc As Integer, s As Integer, flag As Boolean
pa = m: pb = 1: pc = 1
flag = True
Do While ①
If a(pa) < b(pb) Then
s = a(pa)
pa = pa - 1
Else
s = b(pb)
pb = pb + 1
End If
c(pc) = s
If flag Then
pc = m + n - pc + 1
Else
pc =
End If
②
Loop
‘處理a、b數組中剩余數據，并在列表框List3中輸出數組c，代碼略
End Sub
（1）窗體加載的事件處理過程名為　 　。（填字母：A .Form1_Click / B .Form_Click / C .Form1_Load / D .Form_load）
（2）加框處代碼有錯，請改正。
（3）在劃線處填入合適的代碼。
①　 　②　 　
【答案】（1）D
（2）m + n – pc + 2
（3）pa >= 1 And pb <= n；flag = Not flag
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；排序算法及程序實現
【解析】【解答】本題程序分析如下：
Const m = 5 ‘定義符號常量m，并對m賦值為5
Const n = 6 ‘定義符號常量n，并對m賦為5
Dim a(1 To m) As Integer ‘定義整型數組a，a共有5個元素，用于存放降序序列
Dim b(1 To n) As Integer ‘定義整型數組b，b共有6個元素，用于存儲升序序列
Dim c(1 To m + n) As Integer ‘定義整型數組c，c共有11個元素，用于存儲交替上升數據
‘窗體加載時，生成數組a、b中的數據，并按要求排序后顯示在列表框中，代碼略
Private Sub Command1_Click() ‘命令按鈕1單擊事件過程開始
Dim pa As Integer, pb As Integer, pc As Integer, s As Integer, flag As Boolean ‘定義整型變量pa、pb、pc、s和布爾型變量flag
pa = m: pb = 1: pc = 1 ‘初始化pa值為5，pb值為1，pc值為1，pa指示降序數組，pb為升序數組指針
flag = True ‘初始化flag的值為true
Do While ① ‘在pa值大于1且pb值小于n時進行循環，即數組a的指針由后向前不能小于1，數組b的指針由前向后不能大于n，故本處答案應填寫： pa >= 1 And pb <= n
If a(pa) < b(pb) Then ‘如果數組a的pa指示的元素小于數組b的pb指示的元素時進行如下處理
s = a(pa) ‘將數組a的pa指示的元素值賦給變量s
pa = pa - 1 ‘將數組a的指針減1，意為處理完了數組a的一個元素
Else ‘否則即數組a的pa指示的元素大于數組b的pb指示的元素時進行如下處理
s = b(pb) ‘將數組b的pb指示的元素值賦給變量s
pb = pb + 1 ‘將數組b的指針加1，意為處理完了數組b的一個元素
End If ‘結束條件判斷
c(pc) = s ‘將變量s的值賦給由pc指示的數組c的元素。
If flag Then ‘如果標記變量flag的值為真，表示上次對數組c左邊的元素進行賦賦值，下次pc值應指向數組c的右邊，則進行如下處理
pc = m + n - pc + 1 ‘將數組c的指針指向右邊
Else ‘否則即flag值為假時，下次應指向數組c的左邊，則進行如下處理
pc = ‘將數組c的指針指向左邊，故本處答案應填改為： m + n – pc + 2
End If ‘結束條件判斷
② ‘將標記變量取反，故本處答案應填寫： flag = Not flag
Loop ‘結束循環
‘處理a、b數組中剩余數據，并在列表框List3中輸出數組c，代碼略
End Sub ‘結束事件過程
（1）選項A： Form1_Click 使用窗體名稱時錯誤，窗體在事件中使用的是類名而不是對象名。選項B： Form_Click 為窗體單擊事件過程。選項C： Form1_Load 使用窗體名稱時錯誤，窗體在事件中使用的是類名而不是對象名。選項D： Form_load 為窗體加載事件過程。故本小題答案填寫：D。
（2）加框處為將數組c的指針指向左邊，故本處答案應填改為： m + n – pc + 2。
（3）①處為：在pa值大于1且pb值小于n時進行循環，即數組a的指針由后向前不能小于1，數組b的指針由前向后不能大于n，故本處答案應填寫： pa >= 1 And pb <= n。
②處為：將標記變量取反，故本處答案應填寫： flag = Not flag。
【分析】本題考查的是交替上升數組的排序算法。其算法為有一個降序數組和一個升序數組，然后有兩個指針分別指向兩個數組的最小值（降序在下標最大位置，升序在下標最小位置），然后比較兩個數，如果哪個小就先將其排在數組c的左側，將相應的數組指針移動，然后調整數組c的指針，指向右側，再次比較兩個數組中的數，將次小的排在數組C的右側，依此類推直到將兩個數組的元素排完為止，此時數組c就是一個交替上升數組。
16．（2019高三上·浙江月考）條形碼按照一定的編碼規則排列，用以表達一組信息的圖形標識符。其中，EAN-13條形碼是由13位數字組成，最右邊的是校驗位。校驗規則如下：
⑴從左向右將13個數字按順序排列，最左邊的是第1位，最右邊的是第13位（即校驗位）。將所有偶數位的數據相加，結果乘3，得到p。將除校驗位以外所有奇數位的數據相加，得到q。
⑵計算p加q得到的和除以10的余數，再計算該余數以10為模的補數（如3以10位模的補數為7,8以10為模的補數為2）。
⑶若補數與校驗位相等，則驗證正確，否則驗證錯誤。
小李對上述校驗規則進行了加密處理，他將前12位數字分成3個一組。每組上每個數字分別循環向左移1位輪換（如第2位移到第1位，第7位移到第9位），再分別加上所處的位置后除以10 的余數，示例如下：
位置 1 2 3 4 5 6 7 8 9 10 11 12 13
原文 9 7 8 7 5 1 0 1 3 7 0 1 3
輪換 7 8 9 5 1 7 1 3 0 0 1 7 3
密文 8 0 2 9 6 3 8 1 9 0 2 9 3
小李還編寫了解密驗證程序，代碼如下，運行界面如圖所示。
Private Sub Command1_Click()
Dim i As Integer, t As Integer, code As String, res As String
Dim p As Integer, q As Integer, x As Integer
Dim a(1 To 13) As Integer
code = Text1.Text
For i = 1 To 12
ch = Mid(code, i, 1)
t = ①
a(i + 1 - ( ② ) * 3) = t
Next i
For i = 1 To 12
If i Mod 2 = 0 Then p = p + a(i) Else q = q + a(i)
Next i
x = ③
If x = Val(Mid(code,13,1)) Then res = "驗證正確" Else res = "驗證錯誤"
Label3.Caption = res
End Sub
請回答下列問題：
（1）根據題意，若加密條形碼是“8025530167878”（不含引號），則原文的后4位是　 　。
（2）在劃線處填入合適的代碼。
①　 　②　 　③　 　
【答案】（1）5778
（2）(Val(ch) + 10 - i) Mod 10；1 - (i Mod 3 + 1) \ 2 或 (2 - i Mod 3) \ 2；10 - (p * 3 + q) Mod 10
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
【解析】【解答】本題程序分析如下：
Private Sub Command1_Click() ‘命令按鈕單擊事件過程開始
Dim i As Integer, t As Integer, code As String, res As String ‘定義整型變量i、t和字符串變量code和res
Dim p As Integer, q As Integer, x As Integer ‘定義整型變量p、q和x
Dim a(1 To 13) As Integer ‘定義整型數組a，a共有13個元素用于存儲條形碼上的13個數
code = Text1.Text ‘將文本框1中輸入的數據賦給字符串變量code
For i = 1 To 12 ‘使用i來控制循環，i的初值為1，終值為12
ch = Mid(code, i, 1) ‘按i值從code中中取一個字符賦給變量ch
t = ① ‘將字符ch轉為數值型并加上10減去數所在的位置i并求其除以10的余數后賦給變量t，故此處答案應填寫： (Val(ch) + 10 - i) Mod 10 。
a(i + 1 - ( ② ) * 3) = t ‘將t值放于按其位置右移一位的位置，故本處答案應填寫： 1 - (i Mod 3 + 1) \ 2 或 (2 - i Mod 3) \ 2
Next i ‘結束循環
For i = 1 To 12 ‘使用i來控制循環，i的初值為1，終值為12，步簪為1
If i Mod 2 = 0 Then p = p + a(i) Else q = q + a(i) ‘如果i值為偶數將其累加到變量p中如果為奇數累加到變量q中
Next i ‘結束循環
x = ③ ‘計算校驗碼并賦給變量x，故本處答案應填寫： 10 - (p * 3 + q) Mod 10
If x = Val(Mid(code,13,1)) Then res = "驗證正確" Else res = "驗證錯誤" ‘如果校驗碼正好等于code的第13位則將res值賦為 "驗證正確"，否則將res值賦為"驗證錯誤" 。
Label3.Caption = res ‘使用標簽3輸出res的值
End Sub ‘結束事件過程
（1）按以上程序算法，先計算其輪換后的數： “8025530167878” 計算方法為將每個數加上10后減去其位置后求其與10的余數，故它輪換后數據為：7891073377758，將其三位一右移得到的數為9787107335778。故本小題答案應填寫： 5778 。
（2）①處為將字符ch轉為數值型并加上10減去數所在的位置i并求其除以10的余數后賦給變量t。故此處答案應填寫： (Val(ch) + 10 - i) Mod 10 。
②處為將t值放于按其位置右移一位的位置。故本處答案應填寫： 1 - (i Mod 3 + 1) \ 2 或 (2 - i Mod 3) \ 2。
③處為計算校驗碼并賦給變量x，故本處答案應填寫： 10 - (p * 3 + q) Mod 10。
【分析】本題考查的是條形碼的解密算法并求驗證其校驗碼的正確與否。其解密算法就是其加密運算的逆運算，加密時先輪換再將其加上該數所處的位置除以10的余數。而解密時先將該數加上10后減去該位置再求10的補碼得到輪換后的數，再三位一右移得到其原文，在得到原文后根據校驗碼的算法計算校驗碼從而判斷校驗是否正確。
1 / 1浙江省之江教育評價聯盟2019-2020學年高三上學期信息技術第二次聯考試卷
一、選擇題（本大題共12小題，每小題2分，共24分）
1．（2019高三上·浙江月考）下列有關信息與信息技術的說法，正確的是（　　）
A．信息可以脫離它所反映的事物而被存儲、保存和傳播，說明信息不需要載體
B．信息具有時效性，說明信息一定會過期
C．小孔成像現象體現了圖像的數字化
D．第一代計算機采用的是電子管技術
2．（2019高三上·浙江月考）下列有關網絡資源的說法，不正確的是（　　）
A．因特網上存儲著海量信息，獲取的方式也多種多樣
B．通過“網頁，全部”的方式保存網頁，同時也收藏了網址
C．POP3協議將郵件從郵件服務器端送到個人終端機器上
D．不同搜索引擎的檢索結果可能不同
3．（2019高三上·浙江月考）下列應用中，體現了人工智能技術的是（　　）
A．使用手機遠程控制電器 B．使用手機掃描二維碼進行付款
C．AlphaGo與棋手對弈 D．使用通訊軟件與家人視頻通話
4．（2019高三上·浙江月考）下列關于Access數據庫和數據表的說法，正確的是（　　）
A．一張數據表用來存儲同一類型或同一主題的相關數據
B．若數據表中已經有記錄，則該數據表就不能再新建自動編號類型的字段
C．修改數據表中某字段的數據類型，保存后再改回原類型，對字段值沒有影響
D．Access數據表的數據導出到Excel后，Excel中顯示的記錄值不變
5．（2019高三上·浙江月考）使用Ultraedit觀察字符內碼，部分界面如圖所示，下列說法正確的是（　　）
A．圖中共有6個GB2312字符，3個ASCII碼字符
B．字符“國”的二進制編碼是10111001 11111010
C．ASCII碼字符“70”的十六進制內碼是37 A3 B0
D．圖中所有字符內碼相加之和再轉換成二進制后，最右邊的是“0”
6．（2019高三上·浙江月考）下列有關多媒體技術相關概念的說法，正確的是（　　）
A．導航軟件播報前方路況信息，主要體現了多媒體技術的交互性
B．位圖是用一組指令集合或數學公式來描述的
C．壓縮算法要盡量復雜是衡量壓縮技術好壞的指標之一
D．媒體元素分解涉及的內容有描述素材類型和獲取方式等
7．（2019高三上·浙江月考）下列選項的結果與其他選項不同的是（　　）
A．Val(Mid("2019",3,2))
B．Int(Rnd * 9 + 10) \ 10 + 18
C．2019 Mod 100 - 2019 Mod 10
D．(Asc("D") - Asc("A"))^ 3-Sqr(64)
8．（2019高三上·浙江月考）某算法的部分流程圖如圖所示，執行該流程后，輸出i，k的值分別是（　　）
A．52,4 B．52,5 C．50,4 D．50,5
9．（2019高三上·浙江月考）有如下程序段：
s = "2019Nian12yue3Ri"
For i = Len(s)-1 To 1 step -1
If Mid(s, i, 1) <= "9" And Mid(s, i + 1, 1) >= "A" Then
sum= sum+ Val(Mid(s, i, 1))
End If
Next i
運行程序后，變量sum 的值是（　　）
A．2034 B．2019 C．12 D．14
10．（2019高三上·浙江月考）為了判斷一個三位正整數的各個位置之和是否是9的倍數，下列程序劃線處應填入的語句是（　　）
x = ①
t = 0: s = ""
Do While x <> 0
t = ②
x = x \ 10
Loop
If ③ Then Then Then s = "是9的倍數" Else s = "不是9的倍數"
A．①Int(Rnd * 900) + 100 ② x Mod 10 ③ t Mod 9 = 0
B．①Int(Rnd * 900) + 100 ② t + x Mod 10 ③ t Mod 9 = 0
C．①Int(Rnd * 899) + 100 ② t + x Mod 10 ③ t / 9 = 1
D．①Int(Rnd * 900) ② t + x \ 10 ③ t \ 9 = 1
11．（2019高三上·浙江月考）有如下程序段：
Dim a(1 To 5) As Integer
For i = 1 To 5
a(i) = Int(Rnd * 30 + 10)
t = t + a(i) \ 10
Next i
For j = 1 To t \ 3
If j Mod 2 = 1 Then a(j) = a(j) + 1 Else a(j) = a(j) - 1
Next j
運行程序后，數組a各個元素的值，不可能的是（　　）
A．40,10,32,11,17 B．34,9,33,33,31
C．12,13,14,9,10 D．31,32,33,9,21
12．（2019高三上·浙江月考）有如下程序段：
s = "defghiabc"
key = Text1.Text
i = 1: j = Len(s)
Do While i <= j
m = (i + j) \ 2
c = Mid(s, m, 1)
If c = key Then Exit Do
If Mid(s, i, 1) < c Then
If key >= Mid(s, i, 1) And key < c Then j = m - 1 Else i = m + 1
Else
If key > c And key <= Mid(s, j, 1) Then i = m + 1 Else j = m - 1
End If
ans = ans + Str(m)
Loop
運行程序后，若在文本框Text1中輸入字符"b"，則變量ans的值是（　　）
A．5 B．5 7 8 C．5 3 D．5 7
二、非選擇題（本大題共4小題，4+8+7+7，共26分）
13．（2019高三上·浙江月考）使用Excel軟件制作了反映浙江省各地市國際旅游外匯收入的工作表，請回答下列問題：
（1）如圖a所示，區域B12：L12的數據是通過公式計算得到的：在B12單元格中輸入公式　 　，再利用自動填充功能完成區域C12：L12的計算。
圖a
（2）根據圖a中的數據制作了圖表，如圖b所示，創建該圖表的數據區域是　 　。
圖b
（3）小明發現Excel可以按行排序，他選擇區域B2：L10，按照圖c所示的方式進行排序。排序完成后，圖b顯示的圖表　 　（填：會/不會）改變，C12單元格顯示的值是　 　。
圖c
14．（2019高三上·浙江月考）要制作一個主題為“國慶閱兵”的多媒體作品。首先使用Photoshop軟件制作背景圖片，然后使用Flash軟件制作動畫，請回答下列問題：
圖a
（1）如圖a所示，在Photoshop中下列操作可行的有 （多選，填字母）
A．將“氣球”圖層移到“背景”圖層下方
B．選中“氣球”圖層，使用“魔棒工具”選擇白色區域后按“Delete”鍵刪除
C．選中“國慶快樂”圖層，使用“油漆桶工具”將字體顏色改為紅色
D．復制“國慶快樂”圖層的圖層樣式，粘貼至“背景”圖層
E．使用“圖像大小”修改“背景”圖層的寬度
（2）如圖b所示，“飛機”圖層實現了飛機先從位置（600,300）飛至位置（400,100），再從右向左順時針旋轉兩次飛至位置（100,100），最后飛至位置（-100,300）的效果，那么“飛機”圖層第1至第12幀的動畫類型是　 　（單選，填字母：A .逐幀動畫 / B .動畫補間 / C .形狀補間）。整個動畫飛機飛行的軌跡是　 　（單選，填字母：A . （缺選項） / B
. / C . / D . ）
圖b
（3）圖b中“音樂”圖層聲音的同步方式是“數據流”，若動畫播放3秒后需要重新播放該音樂，在不改變其他動畫效果的前提下，應進行的操作是　 　。
（4）測試影片時，若想實現單擊“停止”按鈕后關閉動畫，則按鈕上應添加的動作腳本是　 　。
15．（2019高三上·浙江月考）數組a存儲降序排列的m個數據，數組b中存儲的是升序排列的n個數據，且兩個數組中存儲的數據為區間[1,20]范圍內的不重復的隨機整數。現將兩個數組的數據合并到c數組中，使c數組的數據為左右交替上升，如下表所示：
a(1) a(2) a(3) a(4) a(5)
19 17 6 4 3
a數組
b(1) b(2) b(3) b(4) b(5) b(6)
5 7 8 13 15 20
b數組
c(1) c(2) c(3) c(4) c(5) c(6) c(7) c(8) c(9) c(10) c(11)
3 5 7 13 17 20 19 15 8 6 4
c數組
當窗體Form1加載時，自動產生a、b數組的數據，并分別顯示在列表框List1與List2中，單擊合并按鈕Command1后，在c數組中保存按規則合并后的a、b數組的數據，并顯示在列表框List3中。程序截圖如下所示：
實現該功能的VB程序如下：
Const m = 5
Const n = 6
Dim a(1 To m) As Integer
Dim b(1 To n) As Integer
Dim c(1 To m + n) As Integer
‘窗體加載時，生成數組a、b中的數據，并按要求排序后顯示在列表框中，代碼略
Private Sub Command1_Click()
Dim pa As Integer, pb As Integer, pc As Integer, s As Integer, flag As Boolean
pa = m: pb = 1: pc = 1
flag = True
Do While ①
If a(pa) < b(pb) Then
s = a(pa)
pa = pa - 1
Else
s = b(pb)
pb = pb + 1
End If
c(pc) = s
If flag Then
pc = m + n - pc + 1
Else
pc =
End If
②
Loop
‘處理a、b數組中剩余數據，并在列表框List3中輸出數組c，代碼略
End Sub
（1）窗體加載的事件處理過程名為　 　。（填字母：A .Form1_Click / B .Form_Click / C .Form1_Load / D .Form_load）
（2）加框處代碼有錯，請改正。
（3）在劃線處填入合適的代碼。
①　 　②　 　
16．（2019高三上·浙江月考）條形碼按照一定的編碼規則排列，用以表達一組信息的圖形標識符。其中，EAN-13條形碼是由13位數字組成，最右邊的是校驗位。校驗規則如下：
⑴從左向右將13個數字按順序排列，最左邊的是第1位，最右邊的是第13位（即校驗位）。將所有偶數位的數據相加，結果乘3，得到p。將除校驗位以外所有奇數位的數據相加，得到q。
⑵計算p加q得到的和除以10的余數，再計算該余數以10為模的補數（如3以10位模的補數為7,8以10為模的補數為2）。
⑶若補數與校驗位相等，則驗證正確，否則驗證錯誤。
小李對上述校驗規則進行了加密處理，他將前12位數字分成3個一組。每組上每個數字分別循環向左移1位輪換（如第2位移到第1位，第7位移到第9位），再分別加上所處的位置后除以10 的余數，示例如下：
位置 1 2 3 4 5 6 7 8 9 10 11 12 13
原文 9 7 8 7 5 1 0 1 3 7 0 1 3
輪換 7 8 9 5 1 7 1 3 0 0 1 7 3
密文 8 0 2 9 6 3 8 1 9 0 2 9 3
小李還編寫了解密驗證程序，代碼如下，運行界面如圖所示。
Private Sub Command1_Click()
Dim i As Integer, t As Integer, code As String, res As String
Dim p As Integer, q As Integer, x As Integer
Dim a(1 To 13) As Integer
code = Text1.Text
For i = 1 To 12
ch = Mid(code, i, 1)
t = ①
a(i + 1 - ( ② ) * 3) = t
Next i
For i = 1 To 12
If i Mod 2 = 0 Then p = p + a(i) Else q = q + a(i)
Next i
x = ③
If x = Val(Mid(code,13,1)) Then res = "驗證正確" Else res = "驗證錯誤"
Label3.Caption = res
End Sub
請回答下列問題：
（1）根據題意，若加密條形碼是“8025530167878”（不含引號），則原文的后4位是　 　。
（2）在劃線處填入合適的代碼。
①　 　②　 　③　 　
答案解析部分
1．【答案】D
【知識點】信息及其特征
【解析】【解答】 信息可以脫離它所反映的事物而被存儲、保存和傳播，說明信息可由一個載體轉移到另一個載體，體現了信息的可傳遞性，本項錯。選項B：信息具有時效性， 隨著時間的推移信息的價值會發生變化，但信息可以被再次加工利用，說信息會過期是錯誤的。選項C：信息數字化是將圖像存儲在電腦中以數字形式表示，而小孔成像沒有將圖像變為數字，本項錯。選項C：第一代計算機采用電子 管技術，第二代采用晶體管技術，第三代為集成電路技術，第四代為大規模超大規模集成電路技術。本項對。故答案選D。
【分析】本題考查的是信息的特征和計算機的發展史。信息有五個基本特征和五個一般特征。基本特征：普遍性、依附性、傳遞性、價值性、時效性；一般特征：共享性、真偽性、不完全性、價值相對性、可處理性。
2．【答案】B
【知識點】信息獲取的環節與方法；電子郵件，電子公告板等信息交流方式；網絡資源的檢索；網頁、網站的概念與聯系
【解析】【解答】選項A： 因特網上存儲著海量信息， 可以搜索查詢，也可以下載，可以看，可以聽，獲取方法多種多樣，本項對。選項B：通過“網頁，全部”的方式保存網頁中的文字和圖像，但不能將網址放到收藏夾，本項錯。選項C：POP3協議又稱郵局協議，是用戶接收郵件的協議，本項對。選項D：搜索引擎即提供搜索功能的網站由于這些網站采用的搜索技術不同，所以搜索結果也不同，本項對。故答案選B。
【分析】本題考查的是信息的獲取方法、網頁的保存、郵件的發送及網絡搜索功能。信息獲取指圍繞一定目標，在一定范圍內，通過一定的技術手段和方式方法獲得原始信息的活動和過程。獲取信息的途徑不是單一的，是多種多樣的。保存網頁的類型有四種：1.“網頁，全部是” 將你現打開的網頁文字、內容等所有都保存下來。 2.“Web檔案，單一文件（mht）” 將你打開的網頁文字、圖片、文字格式等保存下來，但是建立文件夾而是保存在一個文件中。 3.“網頁，僅HTML”與第一種網頁，全部是 一種保存方式，但不建立與網頁同名的文件夾不保存圖片。 4.文本文件僅將網頁所有文字保存下來其他圖片、格式等都不保存。SMTP是發送郵件的協議，POP3是接收郵件的協議。搜索引擎即提供搜索功能的網站由于這些網站采用的搜索技術不同，所以搜索結果也不同。
3．【答案】C
【知識點】人工智能的應用
【解析】【解答】選項A：使用手機遠程控制電器使用的是遠程控制技術，不是人工智能技術。選項B： 使用手機掃描二維碼進行付款不屬于人工智能技術。選項C：AlphaGo與棋手對弈使用的是機器人技術，屬于人工智能技術。選項D： 使用通訊軟件與家人視頻通話使用的是視頻通信技術，不是人工智能技術。故答案選C。
【分析】本題考查的是人工智能技術的范疇。人工智能（Artificial Intelligence），英文縮寫為AI。它是研究、開發用于模擬、延伸和擴展人的智能的理論、方法、技術及應用系統的一門新的技術科學。人工智能包括機器人、語音識別、圖像識別、生物識別、自然語言處理和專家系統等。
4．【答案】A
【知識點】數據表、字段、記錄的概念；數據表、字段、記錄的編輯
【解析】【解答】選項A數據庫中的數據是以表為單位進行存儲和處理的，一張數據表可以存儲同一類型的數據也可存儲不同類型的數據，但各數據之間必須有關，本項對。選項B： 若數據表中已經有記錄，則該數據表 仍可添加新字段，新字段的類型仍可為自動編號類型，本項錯。選項C：在將一個字段類型改為其他類型時字段值會發生變化，如果再改回來由字段值將不能還原，本項錯。選項D： Access數據表的數據導出到Excel后，Excel中顯示的記錄值會發生變化，如是/否類型將用true和false代替，本項錯。故答案選A。
【分析】本題考查的是Access的字段類型及數據導出。Access允許九種數據類型：文本、備注、數值、日期/時間、貨幣、自動編號、是/否、OLE對象、超級鏈接、查詢向導。在表的設計視圖中，每一個字段都有設計類型。在字段類型發生變化時其字段值也會發生變化。Access可以實現與其他軟件的數據交換這就是數據的導入和導出。在導出時數據類型會適應其他軟件的數據從而導致某些字段值發生變化。
5．【答案】B
【知識點】信息的編碼
【解析】【解答】選項A：同圖可知，圖中共有7個GB2312字符和2個ASCII字符（2、9），本項錯。選項B：由圖可知“國”的十六進制編碼為“B9 FA”，轉為二進制編碼為“1011 1001 1111 1010”，本項對。選項C：由圖可知“2”的十六進制編碼為“32”可以推知“0”的十六進制編碼為“30”，“7”的十六進制編碼為“37”，故“70”的十六進制編碼為“30 37”，本項錯。選項D：計算本題字符ASCII碼之和較困難，但判斷其奇偶性較簡單，只要將十六進制的最后一位相加（可按十進制計算）然后判斷最后一位相加得到的最右位的奇偶性即可，如本題可以將2+0+1+9+0+2+4+8+1=27，故其內碼之和為一個奇數，最右邊位為“1”，本項錯。故答案選B。
【分析】本題考查的是中英文及字符在計算機內部的內碼表示。在計算機內部中英文字符都是以二進制來表示的，為了方便表示，Ultraedit以十六進制碼來表示內碼，在計算機內部，一個中文及其字符以二個字節、16位二進制數、4位十六進制數來表示的。而英文用一個字節、8位二進制數、2位十六進制數來表示，在ASCII碼中，英文字母和數字是按字母表和數字的小大順序排序的，所以可由已知字符的內碼來推測未知字符和數字的內碼。
6．【答案】D
【知識點】多媒體技術的概念和特征；多媒體技術的應用；多媒體數據壓縮技術
【解析】【解答】選項A： 導航軟件播報前方路況信息，主要體現了多媒體技術的實時性而不是交互性，本項錯。選項B：位圖是由像素點來描述圖像的，而矢量圖才是由一組指令集合或數學公式來描述的 ，本項錯。選項C：壓縮比是 衡量壓縮技術好壞的指標之一 ，算法復雜度是稱量算法好壞的指標，不是衡量壓縮技術的指標，本項錯。選項D：媒體元素分解所涉及的工作有：1、將原始素材列成表格；2、確定原始素材的獲取方式；3、制定多媒體素材的處理方案；4、指明所有到的設備和工具軟件。本項對。故本題答案選D。
【分析】本題考查的是多媒體技術的特點和多媒體作品制作的過程。多媒體的特點有集成性、控制性、交互性、非線性、實時性、互動性、信息使用的方便性、信息結構的動態性。多媒體制作過程可分為五個步驟：確定主題、分析與策劃、采集與加工、作品集成、測試與評價。其中多媒體設計與策劃包括應用需求分件和創作需求及腳本編寫三部分。腳本編寫包括：制定腳本大綱、編寫文字腳本、編寫制作腳本、媒體元素分解等四步驟。
7．【答案】C
【知識點】運算符、基本運算與表達式
【解析】【解答】選項A： Val(Mid("2019",3,2)) =val（“19”）=19。選項B： Int(Rnd * 9 + 10) \ 10 + 18 =（10到19）\10+18=1+18=19。選項C：2019 mod 100-2019 mod 10=19-9=10。選項D： (Asc("D") - Asc("A"))^ 3-Sqr(64) =（68-65）^3-8=27-8=19。在本題各選項中ABD的值為19，C的值為10。故答案選C。
【分析】本題考查的是VB常用函數的功能及mod運算符的作用。在本題中涉及到的函數有val（）是將字符串轉為數值型，mid（）為按指定的位置在指定的字符串中中取指定長度的子串，rnd為隨機函數，int（）為取整函數，其值取不大于參數的整數。mod為取模運算符，結果為兩個數相除的余數。asc（）是求參數的ASCII碼值，sqr（）為求參數的算術平方根。
8．【答案】B
【知識點】算法的常用表示方法；算法的控制結構
【解析】【解答】由本題的流程圖可知，初始時i=0，k=0，i=0【分析】本題考查的是觀察流程圖來分析整個程序執行過程。在本題中先將i和k初始化為0，然后判斷i值是否小于50，如果小于50則執行循環體：將i除以6看其余數是否為0，如為0則將k值增1，無論除盡不能除盡6，則將i值增4.執行完循環體后看i值是否小于50，如果小于50繼續執行循環體直到i值大于等于50為止，大于50時退出循環并輸出i和k的值。
9．【答案】D
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
【解析】【解答】本題程序分析如下：
s = "2019Nian12yue3Ri" ‘將字符串"2019Nian12yue3Ri"賦給字符串變量s
For i = Len(s)-1 To 1 step -1 ‘使用i來控制循環，i的初值為字符串長度少1，終值為1，步長為-1，i代表在字符串中字符的位置，相當于字符指針，中取字符時由后向前取
If Mid(s, i, 1) <= "9" And Mid(s, i + 1, 1) >= "A" Then ‘如果該字符比“9”的ASCII碼值小且其后的字符的ASCII碼值大于字符“A”的ASCII值時進行如下處理
sum= sum+ Val(Mid(s, i, 1)) ‘將這個字符取出來轉為數值型并累加到累加器sum中
End If ‘結束條件判斷
Next i ‘結束循環
在本題中將其后為字符的數字轉為數值型并累加到sum中，故sum=3+2+9=14。故答案選D。
【分析】本題考查的是中取函數mid(　　)的功能、累加器的使用及條件判斷的含義。在本題中mid(　　)是按指定的位置從指定的字符串中取指定長度的子串。而本題的條件是取其后為字符但其后不能是數字的字符并轉為數值型。累加器是將某一變量或表達式的值累加到該變量的變量，本題累加器的形式為： sum= sum+ Val(Mid(s, i, 1)) 。
10．【答案】B
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
【解析】【解答】本題程序分析如下：
x = ① ‘將一個【100，999】范圍內的隨機整數賦給變量x，故本處答案應填寫： Int(Rnd * 900) + 100
t = 0: s = "" ‘初始化t的值為0，s的值為空串，其中t為各位上的數之和，s存儲判斷結果
Do While x <> 0 ‘在x不等于0時執行循環
t = ② ‘將x的最后一位取出來累加到變量t中，故本處答案應填寫： t + x Mod 10
x = x \ 10 ‘將x去掉個位數后再賦給x
Loop ‘結束循環
If ③ Then Then Then s = "是9的倍數" Else s = "不是9的倍數" ‘如果t能被9除盡則將s值賦為 "是9的倍數"，否則s值為 "不是9的倍數" ，故本處答案應填寫： t Mod 9 = 0
由以上程序分析知， ① 處為將一個【100，999】范圍內的隨機整數賦給變量x，故本處答案應填寫： Int(Rnd * 900) + 100。② 處為將x的最后一位取出來累加到變量t中，故本處答案應填寫： t + x Mod 10。③ 處為如果t能被9除盡則將s值賦為 "是9的倍數"，否則s值為 "不是9的倍數" ，故本處答案應填寫： t Mod 9 = 0。故答案選B。
【分析】本題考查的是產生一個隨機數的公式、判斷一個數能否被其他數整除的方法及累加器的使用。產生指定范圍內的隨機數公式為：int((上限-下限+1）*rnd）+下限，判斷一個數能被另一個數整除，可從他們的余數上來判斷，如果余數為0則表示除盡否則沒有除盡。累加器是將一個變量或表達式通過循環累加到某個變量的變量，本題累加器的形式為：t= t + x Mod 10 。
11．【答案】C
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
【解析】【解答】本題程序分析如下：
Dim a(1 To 5) As Integer ‘定義一個整型數組a，a共有5個元素
For i = 1 To 5 ‘使用i來控制循環，i的初值為1，終值為5，步長為1
a(i) = Int(Rnd * 30 + 10) ‘將一個【10，39】的隨機整數賦給數組a的一個元素
t = t + a(i) \ 10 ‘將數組元素a除以10后將其整數商累加到變量t中
Next i ‘結束循環
For j = 1 To t \ 3 ‘使用j來控制循環，j的初值為1，終值為t除以3的整數商，步長為1
If j Mod 2 = 1 Then a(j) = a(j) + 1 Else a(j) = a(j) - 1 ‘如果j為奇數則將其對應的數組元素加1，否則將數組元素減少1
Next j ‘結束循環
由以上程序分析知，數組元素的初始值的范圍為【10，39】，再加上1或減去1后其范圍為【9，40】，本題各選項均符合，然后從其異常調整過的數來判斷，A：至少調整了第一個元素，第一個元素的原值為39，從第二個元素開始其范圍在【10，39】之間，t值至少為1，由十位數之和來看t值項符合要求。選項B：第二個元素為9，說明t值至少為6，而從其十位上的數來看t=3+1+3+3+3=10大于6，t值符合要求。選項C：由第四個元素的值為9來看至少t的值為12，而本項t=1+1+1+1+1=5，其值小于12不合要求，本項錯。選項D：由第四個元素的值為9來看至少t的值為12，而本項t=3+3+3+1+2=12，符合要求。故答案選C。
【分析】本題考查的是產生一個指定范圍內的隨機整數及累加器的使用。產生指定范圍內的隨機數公式為：int((上限-下限+1）*rnd）+下限。累加器可以將一個變量或一個表達式的值通過循環累加到該變量的變量，在本題累加器是累加隨機整數的十位上的數，其格式為： t = t + a(i) \ 10 。
12．【答案】D
【知識點】查找算法及程序實現
【解析】【解答】本題程序分析如下：
s = "defghiabc" ‘給符串變量s賦值為 "defghiabc"
key = Text1.Text ‘將從文本框1中輸入的字符賦給變量key
i = 1: j = Len(s) ‘將i初始化為1，將j賦值為字符串的長度，i和j指示著字符串左右兩邊的位置
Do While i <= j ‘在i值小于等于j值時進行循環
m = (i + j) \ 2 ‘求i和j的中值并賦給變量m
c = Mid(s, m, 1) ‘將中值指向的字符中取出來賦給變量c
If c = key Then Exit Do ‘如果c值為key值相同則退出循環
If Mid(s, i, 1) < c Then ‘如果最左邊的字符小于中值字符時說明從左到中值為升序排序則進行如下處理
If key >= Mid(s, i, 1) And key < c Then j = m - 1 Else i = m + 1 ‘如果要查找的字符大于左邊字符時且要查找的值小于中值時將指示最右邊的指針j設為中值少1否則設指示最左邊的指針i為中值多1
Else ‘否則即從最左邊到中值為降序排序時進行如下處理
If key > c And key <= Mid(s, j, 1) Then i = m + 1 Else j = m - 1 ‘如果要查找的字符大于中值字符時且要查找的值小于最右側字符值時將指示最左邊的指針i設為中值多1否則設指示最右邊的指針i為中值少1
End If ‘結束條件判斷
ans = ans + Str(m) ‘將中值元素值累加到變量ans中
Loop ‘結束循環
由以上程序分析知該程序采用二分法查找數據并將中值累加到變量ans中。第一次循環i=1，j=9，m=5
“h”<>“b”“d”>“b”，故i=m+1=6，ans=“5”，第二次循環，i=6，j=9，m=7，此時“a”<>“b”,且“a”j=9，故m=8，此時key=c退出循環，不再累加ans值，最后ans=”57“。故答案選D。
【分析】本題考查的是對分法查找數據的算法。對分法查找過程是先將一個數列放于一個有序數組中，然后比較中間數組元素的值與要查找的值，或中間數組的值比要查找的值大，則在前半個數組中查找，若中間數組的值比要查找的值小則在后半個數組中查找。查找方法仍是比較中間數組元素的值和要查找的值。以此類推直到查到或下限大于了上限（沒查找）為止。
13．【答案】（1）=RANK(B11,$B$11:$L$11)
（2）B2:L2,B11:L11
（3）會；9
【知識點】表格數據的基本操作；表格數據的處理與計算
【解析】【解答】(1)由圖a可知，F12單元格的公式為： RANK(F11,$B$11:$L$11) ，即求F11在B11到L11中的排名，而F11為相對引用，$B$11:$L$11為絕對引用，由F12的公式可知本小題答案就填空：=RANK(B11,$B$11:$L$11) 。
（2）由圖b可知，本圖為簇狀柱形圖，其橫坐標為城市名稱在B2：L2行上，縱坐標為各地市平均外匯收入在F12到L12上，故本小題答案填寫： B2:L2,B11:L11 。
（3）在排序后，各城市的順序發生了變化，即圖表數據區域： B2:L2,B11:L11 也發生了變化，基于該數據上的圖表也會發生變化，故本小題第一個空答案填寫：會。由圖可知各聲調按2017年旅游外匯收入排序，其順序為衢州市、舟山市、嘉興市、紹興市、臺州市、湖州市、金華市、溫州市、寧波市、麗水市、杭州市，衢州市排在B列、舟山市數據排在C列，故本小題第二個空填寫：9。
【分析】本題考查的是單元格地址的相對引用和絕Excel的地址引用有相對地址引用和絕對地址引用及混合地址引用3種方式，相對地址引用就是單元格地址前不加任何東西，單元格地址會隨單元格的變化而變化，絕對單元格地址引用就是在單元格地址前加$號，不會隨單元格的變化而變化。混合引用是在行號或列標前加$號，另一個不加，在復制公式時加$號的不變，不加$號的變化。在排序時注意不要選擇合并的單元格，尤其選擇標題欄時注意標題欄是否為合并單元格。圖表數據區域的選擇是看其橫軸和縱軸的數據，從而確定圖表的數據區域。
14．【答案】（1）A；B；E
（2）B；C
（3）復制“音樂”圖層第1幀，粘貼至第36幀
（4）on (release) {fscommand("quit");}
【知識點】圖片加工常用工具的使用；動畫的類型；常用影片控制函數的應用
【解析】【解答】（1）選項A：由圖可知，“背景”圖層不是真正意義上的背景圖層。背景圖層為一個空心鎖，而此處的背景圖層為一個實心鎖，可以將“氣球”圖層移動到另一個圖層的下方，本項對。選項B：選中“氣球”圖層后，使用“Delete”鍵可以刪除白色區域從而使該圖層透明化，本項對。選項C：“國慶快樂”圖層為文本圖層，不能使用“油漆桶工具”，本項錯。選項D：由圖a可知“背景”圖層處于鎖定狀態是不能編輯的，本項錯。選項E：“圖像大小”工具可以修所有圖層的寬度也包括“背景”圖層的寬度，本項對。故本小題答案選ABE。
（2）由圖b的“飛機”圖層可知該圖層為一個紫色背景加幾個黑色箭頭，故本小題答案選填B。由圖了可知“飛機”圖層的飛機剛開始位置為（600，300）在屏幕的右下角，然后飛至（400，100）由運動方向為左上方，然后飛至（100，100），為水平向左運動，然后飛至 （-100,300） 運動方各為左下方，故本小題第二個空選C。
（3）由圖b可知，“音樂”圖層的同步方式為“數據流”則動畫不停聲音就不停止，而音樂是從第一幀到第50幀的，若想從第3秒開始重新播放則需要從動畫的第三秒開始重新開始該音樂而該動畫的幀頻為12fps，即播放3秒需要36幀，故本小題答案應填寫： 復制“音樂”圖層第1幀，粘貼至第36幀 。
（4） 若想實現單擊“停止”按鈕后關閉動畫 ，則需要的動作腳本為：按下“停止”按鈕或釋放該按鈕時退出動畫，故本小題答案應填寫： on (release) {fscommand("quit");} 或 on (press) {fscommand("quit");} 。
【分析】本小題考查的是背景、文本圖層的特點、動畫補間類型、由對象的x軸y軸數據確定其運動規跡、聲音同步事件設置、幀頻及動作腳本。背景圖層不可以調節圖層順序，永遠在最下邊，不可以調節不透明度和加圖層樣式，以及蒙版。可以使用畫筆，漸變，濾鏡，圖章和修飾工具。文字圖層通過文字工具創建。文字層不可以進行濾鏡，可以使用圖層樣式等的操作。可由象的x軸y軸數據確定其運動規跡。聲音的同步設置一般由數據流和事件兩種。幀頻就是每秒播放的幀的次數。多媒體加入動作腳本可以增強多媒體作品的人機交互功能。
15．【答案】（1）D
（2）m + n – pc + 2
（3）pa >= 1 And pb <= n；flag = Not flag
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；排序算法及程序實現
【解析】【解答】本題程序分析如下：
Const m = 5 ‘定義符號常量m，并對m賦值為5
Const n = 6 ‘定義符號常量n，并對m賦為5
Dim a(1 To m) As Integer ‘定義整型數組a，a共有5個元素，用于存放降序序列
Dim b(1 To n) As Integer ‘定義整型數組b，b共有6個元素，用于存儲升序序列
Dim c(1 To m + n) As Integer ‘定義整型數組c，c共有11個元素，用于存儲交替上升數據
‘窗體加載時，生成數組a、b中的數據，并按要求排序后顯示在列表框中，代碼略
Private Sub Command1_Click() ‘命令按鈕1單擊事件過程開始
Dim pa As Integer, pb As Integer, pc As Integer, s As Integer, flag As Boolean ‘定義整型變量pa、pb、pc、s和布爾型變量flag
pa = m: pb = 1: pc = 1 ‘初始化pa值為5，pb值為1，pc值為1，pa指示降序數組，pb為升序數組指針
flag = True ‘初始化flag的值為true
Do While ① ‘在pa值大于1且pb值小于n時進行循環，即數組a的指針由后向前不能小于1，數組b的指針由前向后不能大于n，故本處答案應填寫： pa >= 1 And pb <= n
If a(pa) < b(pb) Then ‘如果數組a的pa指示的元素小于數組b的pb指示的元素時進行如下處理
s = a(pa) ‘將數組a的pa指示的元素值賦給變量s
pa = pa - 1 ‘將數組a的指針減1，意為處理完了數組a的一個元素
Else ‘否則即數組a的pa指示的元素大于數組b的pb指示的元素時進行如下處理
s = b(pb) ‘將數組b的pb指示的元素值賦給變量s
pb = pb + 1 ‘將數組b的指針加1，意為處理完了數組b的一個元素
End If ‘結束條件判斷
c(pc) = s ‘將變量s的值賦給由pc指示的數組c的元素。
If flag Then ‘如果標記變量flag的值為真，表示上次對數組c左邊的元素進行賦賦值，下次pc值應指向數組c的右邊，則進行如下處理
pc = m + n - pc + 1 ‘將數組c的指針指向右邊
Else ‘否則即flag值為假時，下次應指向數組c的左邊，則進行如下處理
pc = ‘將數組c的指針指向左邊，故本處答案應填改為： m + n – pc + 2
End If ‘結束條件判斷
② ‘將標記變量取反，故本處答案應填寫： flag = Not flag
Loop ‘結束循環
‘處理a、b數組中剩余數據，并在列表框List3中輸出數組c，代碼略
End Sub ‘結束事件過程
（1）選項A： Form1_Click 使用窗體名稱時錯誤，窗體在事件中使用的是類名而不是對象名。選項B： Form_Click 為窗體單擊事件過程。選項C： Form1_Load 使用窗體名稱時錯誤，窗體在事件中使用的是類名而不是對象名。選項D： Form_load 為窗體加載事件過程。故本小題答案填寫：D。
（2）加框處為將數組c的指針指向左邊，故本處答案應填改為： m + n – pc + 2。
（3）①處為：在pa值大于1且pb值小于n時進行循環，即數組a的指針由后向前不能小于1，數組b的指針由前向后不能大于n，故本處答案應填寫： pa >= 1 And pb <= n。
②處為：將標記變量取反，故本處答案應填寫： flag = Not flag。
【分析】本題考查的是交替上升數組的排序算法。其算法為有一個降序數組和一個升序數組，然后有兩個指針分別指向兩個數組的最小值（降序在下標最大位置，升序在下標最小位置），然后比較兩個數，如果哪個小就先將其排在數組c的左側，將相應的數組指針移動，然后調整數組c的指針，指向右側，再次比較兩個數組中的數，將次小的排在數組C的右側，依此類推直到將兩個數組的元素排完為止，此時數組c就是一個交替上升數組。
16．【答案】（1）5778
（2）(Val(ch) + 10 - i) Mod 10；1 - (i Mod 3 + 1) \ 2 或 (2 - i Mod 3) \ 2；10 - (p * 3 + q) Mod 10
【知識點】運算符、基本運算與表達式；常量、變量及變量的賦值
【解析】【解答】本題程序分析如下：
Private Sub Command1_Click() ‘命令按鈕單擊事件過程開始
Dim i As Integer, t As Integer, code As String, res As String ‘定義整型變量i、t和字符串變量code和res
Dim p As Integer, q As Integer, x As Integer ‘定義整型變量p、q和x
Dim a(1 To 13) As Integer ‘定義整型數組a，a共有13個元素用于存儲條形碼上的13個數
code = Text1.Text ‘將文本框1中輸入的數據賦給字符串變量code
For i = 1 To 12 ‘使用i來控制循環，i的初值為1，終值為12
ch = Mid(code, i, 1) ‘按i值從code中中取一個字符賦給變量ch
t = ① ‘將字符ch轉為數值型并加上10減去數所在的位置i并求其除以10的余數后賦給變量t，故此處答案應填寫： (Val(ch) + 10 - i) Mod 10 。
a(i + 1 - ( ② ) * 3) = t ‘將t值放于按其位置右移一位的位置，故本處答案應填寫： 1 - (i Mod 3 + 1) \ 2 或 (2 - i Mod 3) \ 2
Next i ‘結束循環
For i = 1 To 12 ‘使用i來控制循環，i的初值為1，終值為12，步簪為1
If i Mod 2 = 0 Then p = p + a(i) Else q = q + a(i) ‘如果i值為偶數將其累加到變量p中如果為奇數累加到變量q中
Next i ‘結束循環
x = ③ ‘計算校驗碼并賦給變量x，故本處答案應填寫： 10 - (p * 3 + q) Mod 10
If x = Val(Mid(code,13,1)) Then res = "驗證正確" Else res = "驗證錯誤" ‘如果校驗碼正好等于code的第13位則將res值賦為 "驗證正確"，否則將res值賦為"驗證錯誤" 。
Label3.Caption = res ‘使用標簽3輸出res的值
End Sub ‘結束事件過程
（1）按以上程序算法，先計算其輪換后的數： “8025530167878” 計算方法為將每個數加上10后減去其位置后求其與10的余數，故它輪換后數據為：7891073377758，將其三位一右移得到的數為9787107335778。故本小題答案應填寫： 5778 。
（2）①處為將字符ch轉為數值型并加上10減去數所在的位置i并求其除以10的余數后賦給變量t。故此處答案應填寫： (Val(ch) + 10 - i) Mod 10 。
②處為將t值放于按其位置右移一位的位置。故本處答案應填寫： 1 - (i Mod 3 + 1) \ 2 或 (2 - i Mod 3) \ 2。
③處為計算校驗碼并賦給變量x，故本處答案應填寫： 10 - (p * 3 + q) Mod 10。
【分析】本題考查的是條形碼的解密算法并求驗證其校驗碼的正確與否。其解密算法就是其加密運算的逆運算，加密時先輪換再將其加上該數所處的位置除以10的余數。而解密時先將該數加上10后減去該位置再求10的補碼得到輪換后的數，再三位一右移得到其原文，在得到原文后根據校驗碼的算法計算校驗碼從而判斷校驗是否正確。
1 / 1

展開更多......

收起↑