2020年浙江省舟山中學(xué)高考信息技術(shù)仿真模擬試卷
發(fā)布：2024/11/24 13:30:2
一、（本大題共12小題，每小題2，共24分，每小題列出的四個備選項中只有一個是符合題目要求的，不選、錯選、多選均不得分。）
-
1．下列有關(guān)信息與信息技術(shù)的說法，正確的是（ ?。?br />①信息表達(dá)的規(guī)范化有利于信息的交流
②信息的表示、傳播、存儲不一定依附于某種載體
③多媒體信息必須數(shù)字化后，才能被計算機存儲和處理
④信息的加工和管理必須使用計算機才能完成
⑤近代信息技術(shù)有攝影技術(shù)、微電子技術(shù)、廣播和電視技術(shù)
⑥信息具有時效性，獲取的信息應(yīng)當(dāng)立即發(fā)布
⑦信息具有共享性，可以在網(wǎng)盤中共享各類視頻點播服務(wù)組卷：5引用：1難度：0.6 -
2．下列關(guān)于網(wǎng)站與網(wǎng)頁描述正確的是（ ?。?/h2>
組卷：5引用：1難度：0.6 -
3．有一條數(shù)據(jù)“20210106，楊逸，F(xiàn)alse,2001/12/08”想分別復(fù)制到相應(yīng)的字段中，有出錯提示，可能原因是（ ?。?br />
組卷：4引用：1難度：0.6 -
4．一幅大小為 1024*768，位深度為 24 位的 BMP 圖片，把它另存為大小為 512*768 像素的黑白 256 級灰 度 BMP 圖象，其存儲容量約為原來的（ ?。?/h2>
組卷：1引用：1難度：0.6 -
5．使用 GoldWave 軟件打開某音頻文件，選中一段音頻后的部分界面如圖所示。下面說法正確的是（ ）
組卷：1引用：1難度：0.2
二、非選擇題（本大題共4小題，其中第1小題4分，第14小題8分，第15小題7分，第16小題7分，共26分）
-
15．現(xiàn)要編寫一個程序，對每個班級的同學(xué)生成考試座位號，規(guī)則如下：先按成績從高到低排序，如果成績相同，學(xué)號在前的學(xué)生座位號在前，最后輸出每個同學(xué)的座 位號。小王和小李采用不同的方法實現(xiàn)了上述算法。 請仔細(xì)比較兩位同學(xué)的代碼的不同之處，并完成相關(guān)代碼的填空。
Dim xm（1 To n） As String,xh（1 To n） As String
Dim cj（1 to n）As Integer
Private Sub form_load （ ?。?br />‘讀取相關(guān)數(shù)據(jù)表，把姓名、學(xué)號、成績分別存儲到數(shù)組 xm、xh、cj 中，并在 List1 中顯示，代碼略 End Sub
Private Sub Com1_Click （ ?。湫⊥蹙帉懙拇a部分
Dim wz（1 To n） As Integer
For i=1 To n-1 wz（i）=i
For j=n To i+1 Step-1
If （1）Then
t=cj（j）：cj（j）=cj（j-1）：cj（j-1）=t t=xh（j）：xh（j）=xh（j-1）：xh（j-1）=t
End If
Next j
Next i
（2） For i=1 To n-1
For j=n To i+1 Step-1
If（3）Then
t=cj（j）：cj（j）=cj（j-1）：cj（j-1）=t t=xh（j）：xh（j）=xh（j-1）：xh（j-1）=t t=wz（j）：wz（j）=wz（j-1）：wz（j-1）=t
End If
Next j
Next i
List2．Clear
List2．AddItem″學(xué)號 姓名 成績 座位號″For i=1 To n
List2．AddItem xh（i）+″″+xm（i）+″″+Str（cj（i））+““+Str（wz（i））
Next i
End Sub
Private Sub Com2_Click （ ?。湫±罹帉懙拇a部分
Dim wz（1 To n） As Integer,t（1 To n） As Integer
For i=1 To n t（i）=i
Next i
For i=1 To n
For j=n To i+1 Step-1
If（4）Then
temp=t（j）：t（j）=t（j-1）：t（j-1）=temp
End If
Next j（5）Next i
List2．Clear
List2．AddItem″學(xué)號 姓名 成績 座位號″For i=1 To n
List2．AddItem xh（i）+″″+xm（i）+″″+Str（cj（i））+″″+Str（wz（i））
Next i
End Sub組卷：5引用：1難度：0.3 -
16．小奕同學(xué)基于排序算法設(shè)計了一個數(shù)字矩陣排序的程序。程序界面如圖所示，在文本框中輸入矩陣大小，點擊“生成”按鈕 Command1，在左側(cè)列表框 List1 中輸出一個長寬均為指定大小的隨機 整數(shù)矩陣，隨機整數(shù)范圍為【1，99】。點擊“排序”按鈕 Command2，結(jié)果輸出在右側(cè)列表框 List2 中，奇數(shù)行從左到右依次遞增，偶數(shù)行從右至左依次遞增，且保持輸出矩陣的長寬不變。
（1）實現(xiàn)上述功能的 VB 程序如下，顯示數(shù)據(jù)用的additem 是一種（單選，填字母：A．屬性名
/B．事件名/C．方法名/D．過程名）。
（2）請在橫線處填入合適的代碼。
（3）程序中加框處代碼有錯，請改正。Dim a（1 To 100）As Integer
Dim n As Integer
Function dq（s As String,L As Integer） As String'自定義對齊函數(shù)
Rem 在輸入的字符串 s 前加若干空格，輸出長度為 L 的字符串，代碼略 End Function
PrivateSub Command1_Click （ ?。?生成數(shù)字矩陣
‘隨機生成 n^2 個數(shù)字，存儲在數(shù)組 a 中，代碼略
‘以一行 n 個，共 n 行的格式顯示在 List1 中，代碼略
End Sub
Private Sub Command2_Click （ ?。?數(shù)字矩陣排序
Dim i As Integer,k As Integer,j As Integer,s As String
Dim f As Boolean
List2．Clear f=True
For i=1 To n^2 Step n s=″″
For j=i To
k=n^2
Do While①
If a（k）＜a（k-1）Then
t=a（k）：a（k）=a（k-1）：a（k-1）=t
End If
k=k-1
Loop
If f=True Then
s=s+″″+dq（Str（a（j）），2）Else
s=″″+dq（Str（a（j）），2）+s
End If Next j List2．AddItem s
② Next i
End Sub組卷：0引用：1難度：0.5