2019-2020學年浙江省稽陽聯(lián)誼學校高三(上)月考信息技術試卷(12月份)
發(fā)布:2024/12/2 3:30:1
一、選擇題(本大題共12小題,每小題2分,共24分.在每小題給出的四個選項中,只有一個符合題目要求)
-
1.關于信息與信息技術,下列說法正確的是( )
組卷:13引用:1難度:0.5 -
2.使用OCR軟件進行字符識別,下列說法正確的是( ?。?/h2>
組卷:5引用:1難度:0.5 -
3.使用ACCESS軟件打開某數(shù)據(jù)庫,部分界面如圖所示,下列說法正確的是( ?。?img alt src="https://img.jyeoo.net/quiz/images/201912/134/7bd56722.png" style="vertical-align:middle" />
組卷:6引用:1難度:0.5 -
4.用UltraEdit軟件觀察字符內碼,部分界面如圖所示,下列說法正確的是( ?。?br />
組卷:7引用:1難度:0.4 -
5.有一段未壓縮的無聲視頻,已知該視頻的幀頻是25fps,顏色位數(shù)為16位,分辨率是800*600,視頻存儲容量約1.35GB,則視頻的時長約是( ?。?/h2>
組卷:0引用:1難度:0.4
二、非選擇題(本大題共4小題,其中第13題4分,第14題8分,第15題7分,第16小題7分,共26分.)
-
15.下列VB程序實現(xiàn)數(shù)字字母混合序列分離后分別排序,最后又合并輸出。具體算法如下:在文本框Text1輸入若干組混合序列,每組序列中僅包含一組字母和一個多位數(shù)字,序列之間用逗號隔開,以逗號結束。單擊“排序”按鈕command1,把每組序列中的字母和數(shù)字分開,并分別排序,最后在列表框list1輸出。排序規(guī)則如下:所有數(shù)字按從小到大升序排序,字母序列按長度升序排序,若長度相同,直接按字母序列大小升序排序(按字母的ASCII碼排序,“A”<“Z”<“a”<“z”)。實現(xiàn)算法的部分程序界面如圖所示,VB程序代碼如下,回答下列問題:
Private Sub Command1_Click( ?。?br />Dim a(1 To 6)As Integer,b(1 To 6)As String,I as integer,j as integer
Dim c As String,k As Integer,tmp1 As Integer,tmp2 As String
s=text1.text
i=1:k=1:tmp1=0:tmp2=″″
Do While i<=Len(s)
c=Mid(s,i,1)
If c=“,“Then
a(k)=tmp1:b(k)=tmp2
tmp1=0:tmp2=″″
Else
IfThen
tmp2=tmp2+c
Else
tmp1=tmp1*10+val(c)
End If
End If
i=i+1
Loop
For i=1 To 5
For j=1 To 6-i
If a(j)>a(j+1)Then tmp1=a(j):a(j)=a(j+1):a(j+1)=tmp1
If Len(b(j))>Len(b(j+1)) Or
tmp2=b(j):b(j)=b(j+1):b(j+1)=tmp2
End If
Next j
Next i
For i=1 To 6
List1.AddItem Str(a(i))+b(i)
Next i
End Sub
(1)代碼“l(fā)ist1.AddItem”中的AddItem是
(單選,填字母:A.屬性名 B.對象名 C.方法 D.事件名 )
(2)在程序橫線處填入合適代碼,使程序完整
(3)加框處代碼有錯,請改正
(4)若輸入的字符串為“21ckk,gho63,TCP43,23Yes,no62,phy46,”,則程序運行后第3組字符是組卷:0引用:1難度:0.5 -
16.在一個數(shù)組中存儲了若干個同學的技術成績小題分,其中a(1)存儲學生個數(shù),a(2)開始按順序存儲小題分數(shù)據(jù)。每個學生有33個小題的數(shù)據(jù),例:a(2)~a(13)是學生1的信息選擇題得分,a(27)~a(30)是學生1的信息4個主觀題得分。具體如下表
題號 1-12 13-25 26-29 30-33 科目題型 信息客觀題 通用客觀題 信息主觀題 通用主觀題 滿分分值 每題2分 每題2分 4/8/7/7 6/9/3/6
(1)根據(jù)題目描述,使用如圖所示數(shù)據(jù),a(95)的數(shù)值是
(2)在程序橫線處填上合適代碼,使程序完整
Dim a(1 To 1000)As Integer,n As Integer
Private Sub Command1_Click( ?。?br />Dim i As Integer,j As Integer
Dim fz(1 To 16)As Integer'fz數(shù)組存儲信息各題滿分值
Dim b(1 To 33)As Double'數(shù)組b存儲全卷各題的得分率
For i=1 To 16‘數(shù)組fz存儲信息16個小題的滿分值
If i<=12 Then fz(i)=2
fz(13)=4:fz(14)=8:fz(15)=7:fz(16)=7
Next i
For i=2 To n'把數(shù)組a數(shù)據(jù)分別統(tǒng)計到各題中
b(j)=a(i )+b(j)
Next i
For i=1 To 33'僅處理信息各題的平均分
If i<=12 Then
b(i)=b(i)/(a(1)*fz(i))’計算信息選擇題各題的得分率
ElseIf i>=26 And i<=29 Then
b(i)=
End If
Next i
For i=1 To 16
If i>12 Then j=i+13 Else j=i
b(j)=Int(b(j)*1000+0.5)/10'對結果四舍五入保留1位小數(shù)
List2.AddItem Str(i)+Str(b(j))+“%“
ave=
Next i
Text1.Text=Str(ave/100)
End Sub
Private Sub Form_Load( )
‘讀入數(shù)據(jù)到數(shù)組a,數(shù)據(jù)個數(shù)n,代碼略
End Sub組卷:0引用:1難度:0.5