2016-2017學年浙江省臺州市書生中學高二（下）第一次月考信息技術試卷
發布：2024/12/5 3:30:2
一、選擇題（本大題共12小題，每小題2分，共24分．每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分）
-
1．下列關于信息和信息技術的相關說法不正確的是（ ）
組卷：22引用：3難度：0.9 -
2．徐老師平時關注手機的正確使用，她所編輯的文章截圖如圖所示：
下列說法正確的是（ ）組卷：7引用：1難度：0.9 -
3．某顏色對應的十進制 RGB 值為（213，36，125 ），在圖片處理過程中將綠色顏色分量的值增加了 30，則處理后的綠色分量對應的二進制值為（ ）
組卷：14引用：6難度：0.9 -
4．小華利用IE瀏覽器瀏覽網頁，地址欄上的信息為：“http://www.zjedu.gov.cn/Default.jye.ai”，下列描述不正確的是（ ）
組卷：6引用：1難度：0.7 -
5．浙江考生可通過浙江教育考試院網站http://www.jye.ai.net進行學考和選考報名，首次報名需進行注冊（如圖所示），再進行考試報名，確認之前可對報名信息進行修改．以下說法正確的是（ ）
組卷：8引用：1難度：0.9
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題4分，第17小題5分，共26分）
-
16．明編寫了一個輸出十進制與二進制數對應表的VB程序．程序運行時，單擊“輸出”按鈕Command1后，在列表框List1中輸出運行結果如圖所示．實現上述功能的VB代碼如下，但加框處代碼有錯，請改正．
Dim b（4）As Integer'數組b按位存儲二進制數
Private Sub pprint（m As Integer）
'本過程打印輸出一行十進制數m和對應的二進制數
'代碼略
End Sub
Private Sub Command1_Click （ ）
Dim i As Integer,j As Integer
List1．Clear
List1．AddItem“十進制數 二進制數“
For i=1To 4
b（i）=0
Next i
For i=0To 15
Call pprint（i）'打印輸出一行
j=
'（1）
b（j）=b（j）+1
Do While
'（2）
b（j）=0
j=j-1
b（j）=b（j）+1
Loop
Next i
End Sub.組卷：8引用：1難度：0.1 -
17．用VB設計查詢并統計某公司的銷售數據．實現如下功能：
①將所有員工的姓名和銷售量存儲到數組xm和xse中；
②對銷售量數組進行求和，并輸出該地區平均銷售量（保留整數）；
③根據輸入“銷售排名前幾位”篩選出排名前幾位銷售人員的數據．
程序運行界面如圖所示．
（1）下列程序對員工的銷售額進行排序的主要算法屬于（選填：解析算法/枚舉算法/冒泡排序算法/選擇排序算法）
（2）實現上述功能的VB程序如下．請在橫線處填入合適的代碼．
Dim xse（1To 3000）As Long'存儲銷售員工的銷售量，最大處理個數為3000
Dim xm（1To 3000）As String'存儲銷售員工的姓名
Dim mc（1To 3000）As Integer'存儲銷售員工的名次
Dim num As Integer'當前員工總數
Private Sub Form_Load（ ）'將銷售量、姓名數據存入xse和xm數組
'計算員工總數num
'代碼略
End Sub
Private Sub Command1_Click（ ）Dim sum As Long
Dim i As Integer,flag As Integer
pm=Val（Text2．Text）
dq=Text1．Text
sum=0
For i=1To num
sum=sum+xse（i）
Next i
For i=1To pm'對員工銷售量進行排序
For j=①To i+1Step-1
If xse（j-1）＜xse（j） Then
t=xse（j-1）：xse（j-1）=xse（j）：xse（j）=t
st=xm（j-1）：xm（j-1）=xm（j）：xm（j）=st
End If
Next j
Next i
mc（1）=1
For i=2To pm
If ②Then
mc（i）=mc（i-1）
Else
mc（i）=i
End If
Next i
List1．Clear
List1．AddItem“排名“+“姓名“+“銷售量“
For i=1To pm
List1．AddItem Str（mc（i））+““+xm（i）+““+Str（xse（i））
Next i
List1．AddItem dq+“平均銷售額約為：“+③
End Sub.組卷：11引用：1難度：0.1