2016-2017學(xué)年浙江省臺州市書生中學(xué)高二(下)第一次月考信息技術(shù)試卷
發(fā)布:2024/12/5 3:30:2
一、選擇題(本大題共12小題,每小題2分,共24分.每小題列出的四個備選項中只有一個是符合題目要求的,不選、多選、錯選均不得分)
-
1.下列關(guān)于信息和信息技術(shù)的相關(guān)說法不正確的是( ?。?/h2>
組卷:22引用:3難度:0.9 -
2.徐老師平時關(guān)注手機(jī)的正確使用,她所編輯的文章截圖如圖所示:
下列說法正確的是( ?。?/h2>組卷:7引用:1難度:0.9 -
3.某顏色對應(yīng)的十進(jìn)制 RGB 值為(213,36,125 ),在圖片處理過程中將綠色顏色分量的值增加了 30,則處理后的綠色分量對應(yīng)的二進(jìn)制值為( )
組卷:12引用:6難度:0.9 -
4.小華利用IE瀏覽器瀏覽網(wǎng)頁,地址欄上的信息為:“http://www.zjedu.gov.cn/Default.jye.ai”,下列描述不正確的是( ?。?/h2>
組卷:6引用:1難度:0.7 -
5.浙江考生可通過浙江教育考試院網(wǎng)站http://www.jye.ai.net進(jìn)行學(xué)考和選考報名,首次報名需進(jìn)行注冊(如圖所示),再進(jìn)行考試報名,確認(rèn)之前可對報名信息進(jìn)行修改.以下說法正確的是( )
組卷:8引用:1難度:0.9
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題4分,第17小題5分,共26分)
-
16.明編寫了一個輸出十進(jìn)制與二進(jìn)制數(shù)對應(yīng)表的VB程序.程序運行時,單擊“輸出”按鈕Command1后,在列表框List1中輸出運行結(jié)果如圖所示.實現(xiàn)上述功能的VB代碼如下,但加框處代碼有錯,請改正.
Dim b(4)As Integer'數(shù)組b按位存儲二進(jìn)制數(shù)
Private Sub pprint(m As Integer)
'本過程打印輸出一行十進(jìn)制數(shù)m和對應(yīng)的二進(jìn)制數(shù)
'代碼略
End Sub
Private Sub Command1_Click ( )
Dim i As Integer,j As Integer
List1.Clear
List1.AddItem“十進(jìn)制數(shù) 二進(jìn)制數(shù)“
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設(shè)計查詢并統(tǒng)計某公司的銷售數(shù)據(jù).實現(xiàn)如下功能:
①將所有員工的姓名和銷售量存儲到數(shù)組xm和xse中;
②對銷售量數(shù)組進(jìn)行求和,并輸出該地區(qū)平均銷售量(保留整數(shù));
③根據(jù)輸入“銷售排名前幾位”篩選出排名前幾位銷售人員的數(shù)據(jù).
程序運行界面如圖所示.
(1)下列程序?qū)T工的銷售額進(jìn)行排序的主要算法屬于
(2)實現(xiàn)上述功能的VB程序如下.請在橫線處填入合適的代碼.
Dim xse(1To 3000)As Long'存儲銷售員工的銷售量,最大處理個數(shù)為3000
Dim xm(1To 3000)As String'存儲銷售員工的姓名
Dim mc(1To 3000)As Integer'存儲銷售員工的名次
Dim num As Integer'當(dāng)前員工總數(shù)
Private Sub Form_Load( ?。?將銷售量、姓名數(shù)據(jù)存入xse和xm數(shù)組
'計算員工總數(shù)num
'代碼略
End Sub
Private Sub Command1_Click( ?。〥im 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'對員工銷售量進(jìn)行排序
For j=①
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 ②
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