資源簡介 浙江省麗水、湖州、衢州三地市2021屆高三下學期信息技術4月教學質量檢測一、選擇題(本大題共12小題,每小題2分,共24分。每小題列出的四個備選項中只有一個是符合題目要求的,不選、多選、錯選均不得分)1.(2021·麗水、湖州、衢州模擬)下列關于信息和信息技術的說法,錯誤的是( )A.同一信息可以有不同的載體B.文字、視頻、網絡、遙感遙測等都是信息的表達方式C.信息技術是對信息進行采集、處理、傳輸、存儲、表達和使用的技術D.典型的近代信息技術包括攝影技術、電影技術、廣播和電視技術等2.(2021·麗水、湖州、衢州模擬)下列關于網頁和電子郵件的說法,正確的是( )A.電子郵件的附件只能是多媒體數據文件B.網頁中一定包含文字、圖形圖像和超鏈接三種元素C.使用瀏覽器在網頁中發送郵件需用到SMTP與HTTP協議D.在IE瀏覽器中,以“網頁,僅HTML(*.htm;*.html)”類型保存網頁,可以保存網頁中的圖片3.(2021·麗水、湖州、衢州模擬)使用Access軟件設計一個數據表,存儲如圖所示的某單位員工數據。員工代號 姓名 性別 入職年月 所屬部門 獎金201903001 劉明 男 2019年3月 研發部 83,276201803203 張帥 男 2018年3月 銷售部 75,733... ... ... ... ... ...下列表結構設計合理的是( )A. B.C. D.4.(2021·麗水、湖州、衢州模擬)用UltraEdit軟件查看字符“Chang'e 5登月”的內碼,部分界面如圖所示。下列說法正確的是( )A.圖中內碼表示的ASCII碼字符共有8個B.字符“Go”的內碼值十六進制表示為“87 6F”C.字符“月”的內碼值二進制表示為“11010100 11000010”D.字符“5”、“a”、“C”的內碼值由小變大5.(2021·麗水、湖州、衢州模擬)使用GoldWave軟件編輯某音頻文件,部分界面如圖所示。下列說法正確的是( )A.執行“剪裁”操作后直接保存,音頻文件的存儲容量不變B.執行“刪除”操作后,右聲道的第10~15秒將出現靜音C.執行“靜音”操作后,可以通過“更改音量”操作將聲音恢復D.執行“復制”操作后,直接進行“粘貼”操作,音頻時長不變6.(2021·麗水、湖州、衢州模擬)一個時長為20秒、1024×512像素、24位真彩色、25幀/秒的未經壓縮的AVI格式無聲視頻文件,壓縮為MP4格式后的文件大小約為7.5MB,則其壓縮比約為( )A.4:1 B.5:1 C.100:1 D.800:17.(2021·麗水、湖州、衢州模擬)VB表達式168 Mod 100 \ 2 * 5的值是( )A.6 B.8 C.90 D.1688.(2021·麗水、湖州、衢州模擬)某算法的部分流程圖如圖所示。執行這部分流程,則輸出a的值為( )A.1B.4C.8D.129.(2021·麗水、湖州、衢州模擬)有如下VB程序段:s = "PYTHON"t = "8421"result = ""For i = 1 To Len(t)x = Val(Mid(t, i, 1))y = (x - 1) Mod Len(s) + 1result = result + Mid(s, y, 1)Next iText1.Text = result執行上述程序段后,文本框Text1中顯示的是A.PYHY B.PTPT C.TPTP D.YHYP10.(2021·麗水、湖州、衢州模擬)mn(m、n均為正整數,且m、n均大于1)可以分解成m項公差為2的等差數列,該數列各項之和與mn等值。程序界面如圖所示,實現該功能的VB程序段如下:m = Val(Text1.Text)n = Val(Text2.Text)s = ""x =For i = 1 To ms = s + Str(x)If Then s = s & " +"x = x + 2Next iLabel1.Caption = Str(m) + " ^" + Str(n) + " =" + s上述程序段中方框處可選語句為:①m ^ (n - 1) - m + 1②m ^ (n - 1) - n + 1③i < m④i = m則(1)(2)處填入的語句依次為( )A.①③ B.①④ C.②③ D.②④11.(2021·麗水、湖州、衢州模擬)有如下VB程序段:key = Val(Text1.Text)i = 1: j = 10Do While i <= jm = (i + j) \ 2If a(m) < key Then i = m + 1 Else j = m - 1Loop數組元素a(1)到a(10)存放著非降序排列的數字,執行上述程序段后,下列說錯誤的是( )A.a(i)可能大于key B.a(i + 1)可能等于keyC.a(j - 1)可能等于key D.i可能等于1112.(2021·麗水、湖州、衢州模擬)有如下VB程序段:n = 6For i = 1 To n - 1For j = n - 1 To i Step -1If a(j) > a(j + 1) Or a(j) = a(j + 1) And b(j) < b(j + 1) Thent = a(j): a(j) = a(j + 1): a(j + 1) = tt = b(j): b(j) = b(j + 1): b(j + 1) = tEnd IfNext jNext i數組元素a(1)到a(6)的值依次為3,6,7,1,8,1;b(1)到b(6)的值依次為5,3,7,7,7,4。執行上述程序段后,a(2)與b(2)的值分別是( )A.1,4 B.1,7 C.7,5 D.7,7二、非選擇題(本大題共4小題,4+8+7+7,共26分)13.(2021·麗水、湖州、衢州模擬)小吳收集了近三年全國工業產能利用率的數據,并用Excel軟件進行數據處理,如圖a所示。圖a(1)如圖a所示,區域C5:C18的數據由C4單元格公式自動填充得到,且結果正確。為了計算2019和2020年主要行業的產能利用率排名,小吳將C4:C18區域復制到E4:E18和G4:G18區域,但發現計算結果有誤,則C4單元格的公式應修改為 ,并重新進行自動填充和復制操作。(2)根據圖a中數據制作的圖表如圖b所示,則創建該圖表的數據區域為A3:B5, 。圖b(3)為了獲得名稱包含“制造”的主要行業中,2018年“產能利用率(%)”最大的5項數據,并顯示在操作結果的最前面(緊鄰第3行),一種可行的操作是:選擇數據區域A3:G18后,對該區域 (選填2個序號,按操作順序)。①按“主要行業”進行文本篩選,條件為:包含“制造”②按“主要行業”進行文本篩選,條件為:等于“*制造”③按2018年的“產能利用率(%)” 進行篩選,選擇“10個最大的值”并顯示最大的5項④以2018年的“排名”為關鍵字進行降序排序⑤以2018年的“產能利用率(%)”為關鍵字進行降序排序14.(2021·麗水、湖州、衢州模擬)小吳制作主題為“光盤行動”的多媒體作品。首先使用Photoshop軟件處理圖像,然后使用Flash軟件制作動畫作品。請回答下列問題:圖a(1)處理圖像的部分界面如圖a所示。下列說法正確的有 (多選,填字母)。A.僅選擇“農夫”圖層中的稻谷,添加“描邊”圖層樣式,描邊效果將呈現在選區邊緣B.可以使用自由變換命令調整“拒絕浪費”圖層的文字大小C.將“女孩”圖層移至“背景”圖層下方,使得“女孩”圖層的內容不可見D.無法使用文字工具修改“盤子”圖層中文字的顏色E.將“背景”圖層設置為不可見后,保存成的JPEG格式圖像背景透明(2)制作動畫作品的部分界面如圖b所示,將“聲音”圖層第1幀移動到第 幀,測試場景時,該圖層的聲音在場景動畫播放1秒后開始播放。場景動畫停止在最后一幀時聲音繼續播放,由此可見,“聲音”圖層聲音的同步屬性為 (選填:事件/數據流)。圖b(3)“光盤行動”圖層第60幀中的實例由“光盤”元件生成,“光盤”元件部分編輯界面如第14題圖c所示,實現了盤子從小到大變化的動畫效果。測試場景時,盤子動畫重復播放,現要使盤子動畫只播放一次,從小變大后就停止,則在“光盤”元件中應進行的操作是 。圖c(4)測試影片時,動畫停止在main場景的第60幀,單擊“退出”按鈕后,跳轉到“end”場景第1幀并繼續播放,則在“退出”按鈕上添加的動作腳本可能是(多選,填字母)。A.on(press){stop();}B.on(press){play();}C.on(press){fscommand(“quit”);}D.on(press){gotoAndPlay(“end”,1);}E.on(press){gotoAndStop(“end”,1); play();}15.(2021·麗水、湖州、衢州模擬)模擬圖像局部區域處理。隨機生成n * n(n≤100,且為偶數)個“0”或“1”字符,將字符按行輸出,構成一個n行n列初始矩陣,對該矩陣中的m行m列子矩陣(與初始矩陣同中心)進行水平翻轉。例如,當n為8,m為4時,構成初始矩陣如圖a所示,將子矩陣進行水平翻轉后得到處理結果,如圖b所示。編寫程序,實現上述功能:在文本框Text1中輸入偶數n,單擊“生成”按鈕Command1,在列表框List1中顯示初始矩陣,在文本框Text2中輸入偶數m(2≤m≤ n),單擊“處理”按鈕Command2,在列表框List2顯示處理結果。程序運行界面如圖c所示。請回答下列問題:(1)根據程序的運行界面,“處理”是按鈕Command2的 (單選,填字母:A .對象名/ B .屬性名/ C .方法/ D .屬性值)。(2)請在劃線處填入合適的代碼。Dim n As IntegerDim a(1 To 100 * 100) As StringPrivate Sub Command1_Click()Dim i AsIntegern =Val(Text1.Text)If n <=100 And n >= 2 And n Mod 2 = 0 ThenFor i= 1 To n * na(i) = Chr( ) ‘字符"0"的ASCII碼值為48'將初始矩陣顯示列表框List1中,代碼略Next iElseList1.AddItem "輸入有誤"End IfEnd SubPrivate Sub Command2_Click()Dim b(1 To100 * 100) As String, s As StringDim m AsInteger, y As Integer, i As Integer, R As Integer, C As Integerm =Val(Text2.Text)If m >=2 And m <= n And m Mod 2 = 0 Theny = s =""For i= 1 To n * nR= (i - 1) \ n + 1: C = (i - 1) Mod n + 1IfR <= y Or R > n - y Or C <= y Or C > n - y Thenb(i) = a(i)Elseb(i) = ‘⑶End Ifs = s + b(i)If i Mod n = 0 ThenList2.AddItem ss = ""End IfNext iElseList2.AddItem "輸入有誤"End IfEnd Sub(3)程序中加框處代碼有錯,請改正。16.(2021·麗水、湖州、衢州模擬)求解“幻圓”問題。三個圓相互重疊,形成七個區域,編號為①、②、③、④、⑤、⑥、⑦,如圖a所示。將數字1~7填入每個區域中,實現所有數字僅用一次且每個圓內的數字之和相等,如圖b所示,圓內數字的和為1 + 4 + 6 + 7 = 2 + 4 + 5 + 7 = 2+ 3 + 6 + 7,求解區域①~⑦中可以填入符合條件數字的所有方案。求解思路:在七個區域①、②、③、④、⑤、⑥、⑦上枚舉七個數字1、2、3、4、5、6、7的所有排列來進行驗證。程序運行界面如圖c所示。圖c請回答下列問題:(1)根據題意及程序代碼,在區域①~⑦中按順序分別填入7,4,2,1,3,6,5,則該排列 (選填:能/不能)構成“幻圓”。(2)請在劃線處填入合適的代碼。Dim a(1 To 7) As Integer 'a(1)~a(7)依次存儲區域①~⑦的值Private Sub Command1_Click()Dim i As Integer, n As IntegerDim y1 As Integer, y2 As Integer, y3 AsIntegerFor i = 1 To 7a(i) = iNext in = 0Do While TrueFor i = 7 To 2 Step -1If a(i) = 8 Thena(i) = 1 End IfNext iIf a(1) = 8 Then Exit DoIf check() Theny1 = a(1) + a(2) + a(3) + a(4)y2 = a(2) + a(4) + a(5) + a(6)y3 = a(3) + a(4) + a(6) + a(7)If y1 = y2 And Thenn = n + 1'在列表List1中,按格式輸出a數組元素的值,代碼略End IfEnd Ifa(7) = a(7) + 1LoopLabel1.Caption = "解法共計" & Str(n) &"種。"End SubFunction check() As BooleanDim i As Integer, n As Integer, f(1 To 8)As IntegerFor i = 1 To 8f(i) = 0Next iFor i = 1 To 7 Next in = 0For i = 1 To 7n = n + f(i)Next iIf n = 7 Then check = True Else check =FalseEnd Function答案解析部分1.【答案】B【知識點】信息及其特征;信息技術的概念與關鍵技術;信息表達方式與表達技術2.【答案】C【知識點】電子郵件,電子公告板等信息交流方式;網絡資源的類型、下載與保存;網頁組成元素3.【答案】D【知識點】字段的數據類型;數據表的創建4.【答案】C【知識點】進制及數制轉換;字符編碼5.【答案】A【知識點】聲音素材的基本處理6.【答案】C【知識點】多媒體數據壓縮技術;聲音、圖像、視頻編碼7.【答案】B【知識點】運算符、基本運算與表達式8.【答案】C【知識點】流程圖識讀9.【答案】D【知識點】循環結構語句及程序實現;常用標準函數10.【答案】A【知識點】循環結構語句及程序實現11.【答案】C【知識點】查找算法及程序實現12.【答案】A【知識點】排序算法及程序實現13.【答案】(1)=RANK(B4, B$4:B$18)(2)D3:D5,F3:F5(3)①⑤ 或 ⑤① 或1 5 或 5 1【知識點】表格數據的處理與計算;表格數據的圖表呈現14.【答案】(1)B;D(2)10或11;事件(3)在“盤子”圖層第10幀添加動作腳本stop( );(4)D;E【知識點】圖片加工常用工具的使用;圖層及圖層的基本操作;時間軸、幀、圖層、庫的概念及基本操作;常用影片控制函數的應用;聲音同步屬性設置15.【答案】(1)D(2)Int(Rnd * 2) + 48或Int(Rnd * 2) + Asc("0") 或 等效表達式;(n-m)/2或(n-m)\2或Int((n-m)/2)或Fix((n-m)/2) 或 等效表達式(3)a(n * R - C + 1)或a(n * (R - 1) + n - C + 1) 或 等效表達式【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用;分支結構語句及程序實現;循環結構語句及程序實現16.【答案】(1)能(2)a(i - 1) = a(i - 1) + 1;y1 = y3 或 y2 = y3 或y1 = y3 and y2 = y3 或 等效表達式;f(a(i)) = 1【知識點】過程與自定義函數;分支結構語句及程序實現;循環結構語句及程序實現1 / 1浙江省麗水、湖州、衢州三地市2021屆高三下學期信息技術4月教學質量檢測一、選擇題(本大題共12小題,每小題2分,共24分。每小題列出的四個備選項中只有一個是符合題目要求的,不選、多選、錯選均不得分)1.(2021·麗水、湖州、衢州模擬)下列關于信息和信息技術的說法,錯誤的是( )A.同一信息可以有不同的載體B.文字、視頻、網絡、遙感遙測等都是信息的表達方式C.信息技術是對信息進行采集、處理、傳輸、存儲、表達和使用的技術D.典型的近代信息技術包括攝影技術、電影技術、廣播和電視技術等【答案】B【知識點】信息及其特征;信息技術的概念與關鍵技術;信息表達方式與表達技術2.(2021·麗水、湖州、衢州模擬)下列關于網頁和電子郵件的說法,正確的是( )A.電子郵件的附件只能是多媒體數據文件B.網頁中一定包含文字、圖形圖像和超鏈接三種元素C.使用瀏覽器在網頁中發送郵件需用到SMTP與HTTP協議D.在IE瀏覽器中,以“網頁,僅HTML(*.htm;*.html)”類型保存網頁,可以保存網頁中的圖片【答案】C【知識點】電子郵件,電子公告板等信息交流方式;網絡資源的類型、下載與保存;網頁組成元素3.(2021·麗水、湖州、衢州模擬)使用Access軟件設計一個數據表,存儲如圖所示的某單位員工數據。員工代號 姓名 性別 入職年月 所屬部門 獎金201903001 劉明 男 2019年3月 研發部 83,276201803203 張帥 男 2018年3月 銷售部 75,733... ... ... ... ... ...下列表結構設計合理的是( )A. B.C. D.【答案】D【知識點】字段的數據類型;數據表的創建4.(2021·麗水、湖州、衢州模擬)用UltraEdit軟件查看字符“Chang'e 5登月”的內碼,部分界面如圖所示。下列說法正確的是( )A.圖中內碼表示的ASCII碼字符共有8個B.字符“Go”的內碼值十六進制表示為“87 6F”C.字符“月”的內碼值二進制表示為“11010100 11000010”D.字符“5”、“a”、“C”的內碼值由小變大【答案】C【知識點】進制及數制轉換;字符編碼5.(2021·麗水、湖州、衢州模擬)使用GoldWave軟件編輯某音頻文件,部分界面如圖所示。下列說法正確的是( )A.執行“剪裁”操作后直接保存,音頻文件的存儲容量不變B.執行“刪除”操作后,右聲道的第10~15秒將出現靜音C.執行“靜音”操作后,可以通過“更改音量”操作將聲音恢復D.執行“復制”操作后,直接進行“粘貼”操作,音頻時長不變【答案】A【知識點】聲音素材的基本處理6.(2021·麗水、湖州、衢州模擬)一個時長為20秒、1024×512像素、24位真彩色、25幀/秒的未經壓縮的AVI格式無聲視頻文件,壓縮為MP4格式后的文件大小約為7.5MB,則其壓縮比約為( )A.4:1 B.5:1 C.100:1 D.800:1【答案】C【知識點】多媒體數據壓縮技術;聲音、圖像、視頻編碼7.(2021·麗水、湖州、衢州模擬)VB表達式168 Mod 100 \ 2 * 5的值是( )A.6 B.8 C.90 D.168【答案】B【知識點】運算符、基本運算與表達式8.(2021·麗水、湖州、衢州模擬)某算法的部分流程圖如圖所示。執行這部分流程,則輸出a的值為( )A.1B.4C.8D.12【答案】C【知識點】流程圖識讀9.(2021·麗水、湖州、衢州模擬)有如下VB程序段:s = "PYTHON"t = "8421"result = ""For i = 1 To Len(t)x = Val(Mid(t, i, 1))y = (x - 1) Mod Len(s) + 1result = result + Mid(s, y, 1)Next iText1.Text = result執行上述程序段后,文本框Text1中顯示的是A.PYHY B.PTPT C.TPTP D.YHYP【答案】D【知識點】循環結構語句及程序實現;常用標準函數10.(2021·麗水、湖州、衢州模擬)mn(m、n均為正整數,且m、n均大于1)可以分解成m項公差為2的等差數列,該數列各項之和與mn等值。程序界面如圖所示,實現該功能的VB程序段如下:m = Val(Text1.Text)n = Val(Text2.Text)s = ""x =For i = 1 To ms = s + Str(x)If Then s = s & " +"x = x + 2Next iLabel1.Caption = Str(m) + " ^" + Str(n) + " =" + s上述程序段中方框處可選語句為:①m ^ (n - 1) - m + 1②m ^ (n - 1) - n + 1③i < m④i = m則(1)(2)處填入的語句依次為( )A.①③ B.①④ C.②③ D.②④【答案】A【知識點】循環結構語句及程序實現11.(2021·麗水、湖州、衢州模擬)有如下VB程序段:key = Val(Text1.Text)i = 1: j = 10Do While i <= jm = (i + j) \ 2If a(m) < key Then i = m + 1 Else j = m - 1Loop數組元素a(1)到a(10)存放著非降序排列的數字,執行上述程序段后,下列說錯誤的是( )A.a(i)可能大于key B.a(i + 1)可能等于keyC.a(j - 1)可能等于key D.i可能等于11【答案】C【知識點】查找算法及程序實現12.(2021·麗水、湖州、衢州模擬)有如下VB程序段:n = 6For i = 1 To n - 1For j = n - 1 To i Step -1If a(j) > a(j + 1) Or a(j) = a(j + 1) And b(j) < b(j + 1) Thent = a(j): a(j) = a(j + 1): a(j + 1) = tt = b(j): b(j) = b(j + 1): b(j + 1) = tEnd IfNext jNext i數組元素a(1)到a(6)的值依次為3,6,7,1,8,1;b(1)到b(6)的值依次為5,3,7,7,7,4。執行上述程序段后,a(2)與b(2)的值分別是( )A.1,4 B.1,7 C.7,5 D.7,7【答案】A【知識點】排序算法及程序實現二、非選擇題(本大題共4小題,4+8+7+7,共26分)13.(2021·麗水、湖州、衢州模擬)小吳收集了近三年全國工業產能利用率的數據,并用Excel軟件進行數據處理,如圖a所示。圖a(1)如圖a所示,區域C5:C18的數據由C4單元格公式自動填充得到,且結果正確。為了計算2019和2020年主要行業的產能利用率排名,小吳將C4:C18區域復制到E4:E18和G4:G18區域,但發現計算結果有誤,則C4單元格的公式應修改為 ,并重新進行自動填充和復制操作。(2)根據圖a中數據制作的圖表如圖b所示,則創建該圖表的數據區域為A3:B5, 。圖b(3)為了獲得名稱包含“制造”的主要行業中,2018年“產能利用率(%)”最大的5項數據,并顯示在操作結果的最前面(緊鄰第3行),一種可行的操作是:選擇數據區域A3:G18后,對該區域 (選填2個序號,按操作順序)。①按“主要行業”進行文本篩選,條件為:包含“制造”②按“主要行業”進行文本篩選,條件為:等于“*制造”③按2018年的“產能利用率(%)” 進行篩選,選擇“10個最大的值”并顯示最大的5項④以2018年的“排名”為關鍵字進行降序排序⑤以2018年的“產能利用率(%)”為關鍵字進行降序排序【答案】(1)=RANK(B4, B$4:B$18)(2)D3:D5,F3:F5(3)①⑤ 或 ⑤① 或1 5 或 5 1【知識點】表格數據的處理與計算;表格數據的圖表呈現14.(2021·麗水、湖州、衢州模擬)小吳制作主題為“光盤行動”的多媒體作品。首先使用Photoshop軟件處理圖像,然后使用Flash軟件制作動畫作品。請回答下列問題:圖a(1)處理圖像的部分界面如圖a所示。下列說法正確的有 (多選,填字母)。A.僅選擇“農夫”圖層中的稻谷,添加“描邊”圖層樣式,描邊效果將呈現在選區邊緣B.可以使用自由變換命令調整“拒絕浪費”圖層的文字大小C.將“女孩”圖層移至“背景”圖層下方,使得“女孩”圖層的內容不可見D.無法使用文字工具修改“盤子”圖層中文字的顏色E.將“背景”圖層設置為不可見后,保存成的JPEG格式圖像背景透明(2)制作動畫作品的部分界面如圖b所示,將“聲音”圖層第1幀移動到第 幀,測試場景時,該圖層的聲音在場景動畫播放1秒后開始播放。場景動畫停止在最后一幀時聲音繼續播放,由此可見,“聲音”圖層聲音的同步屬性為 (選填:事件/數據流)。圖b(3)“光盤行動”圖層第60幀中的實例由“光盤”元件生成,“光盤”元件部分編輯界面如第14題圖c所示,實現了盤子從小到大變化的動畫效果。測試場景時,盤子動畫重復播放,現要使盤子動畫只播放一次,從小變大后就停止,則在“光盤”元件中應進行的操作是 。圖c(4)測試影片時,動畫停止在main場景的第60幀,單擊“退出”按鈕后,跳轉到“end”場景第1幀并繼續播放,則在“退出”按鈕上添加的動作腳本可能是(多選,填字母)。A.on(press){stop();}B.on(press){play();}C.on(press){fscommand(“quit”);}D.on(press){gotoAndPlay(“end”,1);}E.on(press){gotoAndStop(“end”,1); play();}【答案】(1)B;D(2)10或11;事件(3)在“盤子”圖層第10幀添加動作腳本stop( );(4)D;E【知識點】圖片加工常用工具的使用;圖層及圖層的基本操作;時間軸、幀、圖層、庫的概念及基本操作;常用影片控制函數的應用;聲音同步屬性設置15.(2021·麗水、湖州、衢州模擬)模擬圖像局部區域處理。隨機生成n * n(n≤100,且為偶數)個“0”或“1”字符,將字符按行輸出,構成一個n行n列初始矩陣,對該矩陣中的m行m列子矩陣(與初始矩陣同中心)進行水平翻轉。例如,當n為8,m為4時,構成初始矩陣如圖a所示,將子矩陣進行水平翻轉后得到處理結果,如圖b所示。編寫程序,實現上述功能:在文本框Text1中輸入偶數n,單擊“生成”按鈕Command1,在列表框List1中顯示初始矩陣,在文本框Text2中輸入偶數m(2≤m≤ n),單擊“處理”按鈕Command2,在列表框List2顯示處理結果。程序運行界面如圖c所示。請回答下列問題:(1)根據程序的運行界面,“處理”是按鈕Command2的 (單選,填字母:A .對象名/ B .屬性名/ C .方法/ D .屬性值)。(2)請在劃線處填入合適的代碼。Dim n As IntegerDim a(1 To 100 * 100) As StringPrivate Sub Command1_Click()Dim i AsIntegern =Val(Text1.Text)If n <=100 And n >= 2 And n Mod 2 = 0 ThenFor i= 1 To n * na(i) = Chr( ) ‘字符"0"的ASCII碼值為48'將初始矩陣顯示列表框List1中,代碼略Next iElseList1.AddItem "輸入有誤"End IfEnd SubPrivate Sub Command2_Click()Dim b(1 To100 * 100) As String, s As StringDim m AsInteger, y As Integer, i As Integer, R As Integer, C As Integerm =Val(Text2.Text)If m >=2 And m <= n And m Mod 2 = 0 Theny = s =""For i= 1 To n * nR= (i - 1) \ n + 1: C = (i - 1) Mod n + 1IfR <= y Or R > n - y Or C <= y Or C > n - y Thenb(i) = a(i)Elseb(i) = ‘⑶End Ifs = s + b(i)If i Mod n = 0 ThenList2.AddItem ss = ""End IfNext iElseList2.AddItem "輸入有誤"End IfEnd Sub(3)程序中加框處代碼有錯,請改正。【答案】(1)D(2)Int(Rnd * 2) + 48或Int(Rnd * 2) + Asc("0") 或 等效表達式;(n-m)/2或(n-m)\2或Int((n-m)/2)或Fix((n-m)/2) 或 等效表達式(3)a(n * R - C + 1)或a(n * (R - 1) + n - C + 1) 或 等效表達式【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用;分支結構語句及程序實現;循環結構語句及程序實現16.(2021·麗水、湖州、衢州模擬)求解“幻圓”問題。三個圓相互重疊,形成七個區域,編號為①、②、③、④、⑤、⑥、⑦,如圖a所示。將數字1~7填入每個區域中,實現所有數字僅用一次且每個圓內的數字之和相等,如圖b所示,圓內數字的和為1 + 4 + 6 + 7 = 2 + 4 + 5 + 7 = 2+ 3 + 6 + 7,求解區域①~⑦中可以填入符合條件數字的所有方案。求解思路:在七個區域①、②、③、④、⑤、⑥、⑦上枚舉七個數字1、2、3、4、5、6、7的所有排列來進行驗證。程序運行界面如圖c所示。圖c請回答下列問題:(1)根據題意及程序代碼,在區域①~⑦中按順序分別填入7,4,2,1,3,6,5,則該排列 (選填:能/不能)構成“幻圓”。(2)請在劃線處填入合適的代碼。Dim a(1 To 7) As Integer 'a(1)~a(7)依次存儲區域①~⑦的值Private Sub Command1_Click()Dim i As Integer, n As IntegerDim y1 As Integer, y2 As Integer, y3 AsIntegerFor i = 1 To 7a(i) = iNext in = 0Do While TrueFor i = 7 To 2 Step -1If a(i) = 8 Thena(i) = 1 End IfNext iIf a(1) = 8 Then Exit DoIf check() Theny1 = a(1) + a(2) + a(3) + a(4)y2 = a(2) + a(4) + a(5) + a(6)y3 = a(3) + a(4) + a(6) + a(7)If y1 = y2 And Thenn = n + 1'在列表List1中,按格式輸出a數組元素的值,代碼略End IfEnd Ifa(7) = a(7) + 1LoopLabel1.Caption = "解法共計" & Str(n) &"種。"End SubFunction check() As BooleanDim i As Integer, n As Integer, f(1 To 8)As IntegerFor i = 1 To 8f(i) = 0Next iFor i = 1 To 7 Next in = 0For i = 1 To 7n = n + f(i)Next iIf n = 7 Then check = True Else check =FalseEnd Function【答案】(1)能(2)a(i - 1) = a(i - 1) + 1;y1 = y3 或 y2 = y3 或y1 = y3 and y2 = y3 或 等效表達式;f(a(i)) = 1【知識點】過程與自定義函數;分支結構語句及程序實現;循環結構語句及程序實現1 / 1 展開更多...... 收起↑ 資源列表 浙江省麗水、湖州、衢州三地市2021屆高三下學期信息技術4月教學質量檢測(學生版).docx 浙江省麗水、湖州、衢州三地市2021屆高三下學期信息技術4月教學質量檢測(教師版).docx 縮略圖、資源來源于二一教育資源庫