2020-2021學(xué)年浙江省溫州市十校聯(lián)合體高二（下）期末信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題(本大題共12小題,每小題2分,共24分。每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的,不選、多選、錯(cuò)選均不得分)、
-
1．下列有關(guān)信息和信息處理的說(shuō)法，正確的是（ ?。?/h2>
組卷：5引用：2難度：0.7 -
2．下列應(yīng)用中，不屬于人工智能應(yīng)用范疇的是（ ?。?/h2>
組卷：8引用：1難度：0.6 -
3．用 Access 軟件設(shè)計(jì)某大學(xué)新生管理信息系統(tǒng)的數(shù)據(jù)庫(kù)，其中“基本信息表”中需要存儲(chǔ)如表所示的數(shù)據(jù)。
下列關(guān)于該新生管理信息系統(tǒng)的描述，正確的是（ ）學(xué)號(hào) 姓名 性別 出生年份 戶籍所在地 注冊(cè)日期 是否住校 202002001 張陽(yáng) 男 2002 溫州市甌海區(qū) 2020/8/31 是 202003001 李玥 女 2001 寧波市北侖區(qū) 2020/8/30 否 ... ... ... ... ... ... ... 組卷：11引用：3難度：0.4 -
4．某數(shù)轉(zhuǎn)換為十進(jìn)制數(shù)為 n,若n\5=5，則該數(shù)可能是（ ）
組卷：5引用：1難度：0.5 -
5．使用 Photoshop 軟件制作“四月你好”的作品，部分編輯界面如圖所示。
下列說(shuō)法正確的是（ ?。?/h2>組卷：2引用：1難度：0.4
二、非選擇題(本大題共4小題,共26分)
-
15．為方便習(xí)題講解，需對(duì)某次考試中選擇題得分率數(shù)據(jù)進(jìn)行統(tǒng)計(jì)分析，找出選擇題得分率最低的前m 項(xiàng)對(duì)應(yīng)的題號(hào)及考點(diǎn)（若有與第 m 項(xiàng)得分率相同的，一并選?。?。
編寫(xiě) VB 程序，實(shí)現(xiàn)上述功能。運(yùn)行程序時(shí)，先讀取每個(gè)選擇題的題號(hào)、得分率和考點(diǎn)，顯示在列表框 List1 中。在文本框 Text1 中輸入得分率最低的前 m 項(xiàng)值，單擊“統(tǒng)計(jì)”按鈕，按照得分率從小到大升序排序，并在列表框 List2 中輸出得分率最低前 m 項(xiàng)的題號(hào)、得分率及考點(diǎn)。程序運(yùn)行界面如圖所示。
請(qǐng)回答下列問(wèn)題：
（1）“統(tǒng)計(jì)”按鈕的事件過(guò)程名是。
（2）實(shí)現(xiàn)上述功能的 VB 程序如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
（3）程序中加框處代碼有錯(cuò)，請(qǐng)改正。
Dim n As Integer
Dim th（0 To 100）As Integer,df（0 To 100）As Single,kd（1 To 100）As String Private Sub Form_Load（ ?。?br />'讀取題號(hào)、得分率和考點(diǎn)分別存入數(shù)組 th、df 和 kd 數(shù)組，在列表框 List1 中顯示，代碼略
'選擇題的個(gè)數(shù)存入變量 n,代碼略End Sub
Function dq（x As String,k As Integer） As String
'固定數(shù)據(jù)的位數(shù)
dq=x
Do While①
dq=dq+““
Loop
End Function
Private Sub Select_Click（ ?。?br />Dim m As Integer,i As Integer,j As Integer,p As Integer,t As Integer,mm As Integer
List2.Clear
m=Val（Text1.Text）
i=1
Do While i＜=n-1
p=i
For j=i+1 To n
If ②Then p=j
Next j
If p＜＞i Then
t=th（i）：th（i）=th（p）：th（p）=t
End If
If
Then Exit Do'改 錯(cuò)
i=i+1
Loop
③
For i=1 To mm
List2.AddItem dq（Str（th（i）），6）+dq（Str（df（th（i））），8）+dq（kd（th（i）），12）
Next i End Sub組卷：0引用：1難度：0.3 -
16．在某區(qū)間內(nèi)有若干個(gè)障礙物，現(xiàn)需找出一個(gè)最大的空正方形用于建設(shè)方形場(chǎng)地。如圖所示，將該區(qū)間用網(wǎng)格表示（區(qū)間范圍 m*n,m、n 的值均在 1-1000 之間），障礙物（黑色圓點(diǎn)） 位于若干個(gè)網(wǎng)點(diǎn)上，障礙物個(gè)數(shù)及位置隨機(jī)生成。
對(duì) w*h（10*8）網(wǎng)格數(shù)據(jù)進(jìn)行存儲(chǔ)，無(wú)障礙物的位置對(duì)應(yīng)數(shù)組元素?cái)?shù)值為 0，有障礙物的位置對(duì)應(yīng)數(shù)組元素?cái)?shù)值為 1。數(shù)組 d 中數(shù)據(jù)初始化后，對(duì)應(yīng)數(shù)組元素?cái)?shù)值 d（2）=1：d（27）=1：d（33）=1：d（45）=1：d（52）=1：d（57）=1，其他數(shù)組元素?cái)?shù)值為 0。對(duì)應(yīng)最大空正方形的起始位置為 3，邊長(zhǎng)為 4。
找最大空正方形的方法如下：①?gòu)漠?dāng)前位置右下角開(kāi)始逐漸擴(kuò)大正方形邊長(zhǎng)，直到有障礙物出現(xiàn)，不能再擴(kuò)展為止；②取下一個(gè)位置，按照步驟①繼續(xù)查找，最后 1 列為邊界，該位置上無(wú)需查找。（1）給定 7*8 網(wǎng)格，有障礙物的位置為 d（8）=1：d（18）=1：d（27）=1：d（36）=1：d（52）=1，則對(duì)應(yīng)最大空正方形的起始位置和邊長(zhǎng)分別為。（注：兩個(gè)數(shù)字之間請(qǐng)用逗號(hào)“”，隔開(kāi)）
（2）小李根據(jù)上述描述，設(shè)計(jì)了一個(gè)查找最大的空正方形起始位置和邊長(zhǎng)的算法。算法的 VB 程序如下請(qǐng)?jiān)跈M線處填入合適的代碼。
Const w=10 Const h=8
Dim d（1 To w*h） As Integer Private Sub Form_Load（ ）
'數(shù)組初始化，無(wú)障礙物的位置對(duì)應(yīng)數(shù)組元素值為 0，有障礙物的位置對(duì)應(yīng)數(shù)組元素?cái)?shù)值為 1
End Sub
Private Sub Command1_Click（ ?。?br />Dim i As Integer,length As Integer,maxw As Integer
Dim max As Integer
max=0
For i=1 To w*h
If i Mod w＜＞0 Then'判斷該位置是否需要查找
①
If length＞max Then max=length：maxw=i
End If
Next i
'輸出最大空正方形的起始位置和邊長(zhǎng)，代碼略。End Sub
Function scan（k As Integer） As Integer
Dim j As Integer
Dim t As Integer,s As Integer
Dim dw As Integer
t=1
Do While k\w+1+t＜h And②
s=0
dw=k+w+1
For j=1 To t^2
s=s+d（dw+w*（（j-1）\t）+（j-1）Mod t）
Next j
If③Then
Exit Do'退出循環(huán)
Else
t=t+1
End If
Loop
scan=t End Function組卷：0引用：1難度：0.5