2020-2021學(xué)年浙江省湖州市、麗水市、衢州市高三（下）月考信息技術(shù)試卷（4月份）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分。每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的，不選、多選、錯(cuò)選均不得分）
-
1．下列關(guān)于信息和信息技術(shù)的說法，錯(cuò)誤的是（ ?。?/h2>
組卷：6引用：1難度：0.7 -
2．下列關(guān)于網(wǎng)頁和電子郵件的說法，正確的是（ ?。?/h2>
組卷：1引用：1難度：0.4 -
3．使用Access軟件設(shè)計(jì)一個(gè)數(shù)據(jù)表，存儲(chǔ)如圖所示的某單位員工數(shù)據(jù)。
下列表結(jié)構(gòu)設(shè)計(jì)合理的是（ ）員工代號(hào) 姓名 性別 入職年月 所屬部門 獎(jiǎng)金 201903001 劉明 男 2019年3月 研發(fā)部 83，276 201803203 張帥 男 2018年3月 銷售部 75，733 ... ... ... ... ... ... 組卷：0引用：3難度：0.4 -
4．用UltraEdit軟件查看字符“Chang'e 5登月”的內(nèi)碼，部分界面如圖所示。
下列說法正確的是（ ?。?/h2>組卷：4引用：3難度：0.6 -
5．使用GoldWave軟件編輯某音頻文件，部分界面如圖所示。
下列說法正確的是（ ?。?/h2>組卷：1引用：1難度：0.4
二、非選擇題（本大題共4小題，其中第13小題4分，第14小題8分，第15小題7分，第16小題7分，共26分）
-
15．模擬圖像局部區(qū)域處理。隨機(jī)生成n*n（n≤100，且為偶數(shù)）個(gè)“0”或“1”字符，將字符按行輸出，構(gòu)成一個(gè)n行n列初始矩陣，對該矩陣中的m行m列子矩陣（與初始矩陣同中心）進(jìn)行水平翻轉(zhuǎn)。例如，當(dāng)n為8，m為4時(shí)，構(gòu)成初始矩陣如圖a所示，將子矩陣進(jìn)行水平翻轉(zhuǎn)后得到處理結(jié)果，如圖b所示。
編寫程序，實(shí)現(xiàn)上述功能：在文本框Text1中輸入偶數(shù)n,單擊“生成”按鈕Command1，在列表框List1中顯示初始矩陣，在文本框Text2中輸入偶數(shù)m（2≤m≤n），單擊“處理”按鈕Command2，在列表框List2顯示處理結(jié)果。程序運(yùn)行界面如圖c所示。
請回答下列問題：
（1）根據(jù)程序的運(yùn)行界面，“處理”是按鈕Command2的（單選，填字母：A.對象名/B.屬性名/C.方法/D.屬性值）。
（2）請?jiān)跈M線處填入合適的代碼。
（3）程序中加框處代碼有錯(cuò)，請改正。
Dim n As Integer
Dim a（1 To 100*100）As String
Private Sub Command1_Click （ ?。?br />Dim i As Integer
n=Val（Text1.Text）
If n＜=100 And n＞=2 And n Mod 2=0 Then
For i=1 To n*n
a（i）=Chr （）'字符“0“的ASCII碼值為48
'將初始矩陣顯示列表框List1中，代碼略
Next i
Else
List1.AddItem“輸入有誤“
End If
End Sub
Private Sub Command2_Click （ ?。?br />Dim b（1 To 100*100）As String,s As String
Dim m As Integer,y As Integer,i As Integer,R As Integer,C As Integer
m=Val（Text2.Text）
If m＞=2 And m＜=n And m Mod 2=0 Then
y=
s=““
For i=1 To n*n
R=（i-1）\n+1：C=（i-1）Mod n+1
If R＜=y Or R＞n-y Or C＜=y Or C＞n-y Then
b（i）=a（i）
Else
b（i）=a（n*C-R+1）'（3）
End If
s=s+b（i）
If i Mod n=0 Then
List2.AddItem s
s=““
End If
Next i
Else
List2.AddItem“輸入有誤“
End If
End Sub組卷：2引用：1難度：0.5 -
16．求解“幻圓”問題。三個(gè)圓相互重疊，形成七個(gè)區(qū)域，編號(hào)為①、②、③、④、⑤、⑥、⑦，如圖a所示。將數(shù)字1～7填入每個(gè)區(qū)域中，實(shí)現(xiàn)所有數(shù)字僅用一次且每個(gè)圓內(nèi)的數(shù)字之和相等，如圖b所示，圓內(nèi)數(shù)字的和為1+4+6+7=2+4+5+7=2+3+6+7，求解區(qū)域①～⑦中可以填入符合條件數(shù)字的所有方案。
求解思路：在七個(gè)區(qū)域①、②、③、④、⑤、⑥、⑦上枚舉七個(gè)數(shù)字1、2、3、4、5、6、7的所有排列來進(jìn)行驗(yàn)證。程序運(yùn)行界面如圖c所示。
請回答下列問題：
（1）根據(jù)題意及程序代碼，在區(qū)域①～⑦中按順序分別填入7，4，2，1，3，6，5，則該排列（選填：能/不能）構(gòu)成“幻圓”。
（2）請?jiān)跈M線處填入合適的代碼。
Dim a（1 To 7）As Integer'a（1）～a（7）依次存儲(chǔ)區(qū)域①～⑦的值
Private Sub Command1_Click （ ?。?br />Dim i As Integer,n As Integer
Dim y1 As Integer,y2 As Integer,y3 As Integer
For i=1 To 7
a（i）=i
Next i
n=0
Do While True
For i=7 To 2 Step-1
If a（i）=8 Then
a（i）=1
End If
Next i
If a（1）=8 Then Exit Do
If checkThen
y1=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 AndThen
n=n+1
'在列表List1中，按格式輸出a數(shù)組元素的值，代碼略
End If
End If
a（7）=a（7）+1
Loop
Label1.Caption=“解法共計(jì)“& Str（n） &“種。“
End Sub
Function checkAs Boolean
Dim i As Integer,n As Integer,f（1 To 8）As Integer
For i=1 To 8
f（i）=0
Next i
For i=1 To 7
Next i
n=0
For i=1 To 7
n=n+f（i）
Next i
If n=7 Then check=True Else check=False
End Function組卷：2引用：1難度：0.5