2018-2019學年浙江省稽陽聯誼學校高三（上）月考信息技術試卷（10月份）
發布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分，每小題列出的四個備選項中只有一個是符合題目要求的，不選、錯選、多選均不得分．）
-
1．下列有關信息的說法，不正確的是（ ）
組卷：9引用：1難度：0.6 -
2．下列不屬于網絡協議的是（ ）
組卷：3引用：3難度：0.7 -
3．下列應用中，沒有體現人工智能技術的有（ ）
①家用電飯鍋的預約功能
②微信支付時采用指紋支付
③半導體集成電路技術
④最新研發的一項可穿戴技術，用來幫助用戶保持身材，矯正坐姿和行走姿態
⑤在《我是未來》節目中能和人智能對話的“微軟小冰”虛擬機器主持人組卷：12引用：2難度：0.7 -
4．使用Access軟件打開某個數據庫文件，部分界面如圖所示。下列說法正確的是（ ）
組卷：7引用：1難度：0.3 -
5．使用UltraEdit軟件查看字符內碼，部分界面如圖所示，以下說法正確的是（ ）
組卷：10引用：1難度：0.6
二、非選擇題（本大題共5小題，其中第13題小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分）
-
16．有一組正整數，基于冒泡排序對其中的數進行升序排序。排序后奇數在前，偶數在后。排序示例如下：
實現上述功能的VB程序如下，但加框處代碼有誤，請改正。排序前 78 30 64 39 49 4 8 32 18 32 排序后 39 49 83 4 8 18 30 32 64 78
Const n=10
Dim d（1To n） As Integer
Private Sub Command1_Click （ ）
Dim i As Integer,j As Integer,t As Integer
'讀取一組正整數，存儲在數組d中，代碼略
i=1
Do While i＜=n-1
For j=n To i+1Step-1
If d（j） Mod 2=d（j-1）Mod 2Then
If
Then'（1）
t=d（j）：d（j）=d（j-1）：d（j-1）=t
End If
（2）
t=d（j）：d（j）=d（j-1）：d（j-1）=t
End If
Next j
i=i+1
Loop
'依次輸出排序后的數據，代碼略
End Sub組卷：17引用：1難度：0.4 -
17．計算機的基本功能是計算，信息加工處理本質上都是通過計算完成的。現有一圖象模糊處理的算法，以10*10像素圖象的模糊處理為例，具體算法如下：
（1）各像素點的顏色信息值（介于0至255之間的一個正整數），存儲至數組a中。
（2）給定模糊處理的模糊中心位置p和模糊半徑r（r＞1），中心位置p即為半徑為1的區域，
①確定模糊中心點在如下數陣中的位置。若模糊中心為36時，該模糊中心在數陣中對應位置為第4行第6列；
②根據中心點和模糊半徑確定模糊處理的像素點的范圍。
（3）依序將模糊處理范圍內的像素點進行模糊處理。模糊處理的方式為：最外側的像素點顏色信息不變，中間各像素點的新顏色信息值為該像素點上下左右相鄰四個像素點顏色信息值的平均值。
程序運行時，在文本框Text1中輸入模糊的中心點p,在文本框Text2中輸入模糊的半徑r,窗體加載，通過列表框List1輸出圖象模糊處理前的信息，單擊命令按鈕Command1后通過列表框List2輸出模糊后的圖象信息。程序運行效果如圖b所示。相應的模糊中心位置由橢圓圈注，中間各像素點由矩形框圈注
實現上述功能的VB程序如下。請回答下列問題：
（1）若以a（48）為模糊中心，布置成如第17題圖a所示數陣后模糊中心處于數陣的第 行。
（2）請在橫線處填入合適的代碼。
Const n=10
Dim a（1To n*n） As Integer'介于0至255之間的值，存儲10*10圖象像素點的顏色信息
Private Sub Form_Load （ ）
'讀取100個正整數，存儲在數組a中以表示10*10圖片的像素點顏色信息，代碼略。
'并按右對齊方式將該圖片的各像素點顏色信息輸出至列表框List1中，代碼略。
End Sub
Private Sub Command1_Click （ ）
Dim r As Integer,p As Integer
Dim i As Integer,j As Integer,k As Integer
p=Val（Text1．Text）：r=Val（Text2．Text）
①
i=1
Do While j＞n
j=j-n
i=i+1
Loop
'確定模糊處理的范圍，處理范圍的起始行，結束行，起始列，結束列保存到i1，i2，j1，j2中，代碼略
For i=i1+1To i2-1'中間像素點的模糊處理
For j=j1+1To j2-1
②
a（k）=ave（k）
Next j
Next i
'并按右對齊方式將該圖片的各像素點顏色信息輸出至列表框List2中，代碼略。
End Sub
Function ave（k As Integer） As Integer
ave=③
End Function組卷：2引用：1難度：0.4