2020年浙江省溫州市永嘉中學(xué)高考信息技術(shù)仿真試卷(3月份)
發(fā)布:2024/4/20 14:35:0
一、選擇題(本大題共12小題,每小題2分,共24分.在每小題給出的四個選項中,只有一個符合題目要求)
-
1.語文課本中收錄了孟浩然的詩《春曉》。下列說法正確的是( ?。?/h2>
組卷:12引用:3難度:0.7 -
2.下列有關(guān)電子郵件的說法,正確的是( ?。?/h2>
組卷:0引用:1難度:0.5 -
3.Access中的一張數(shù)據(jù)表設(shè)計視圖如圖所示。下列說法正確的是( ?。?/h2>
組卷:7引用:3難度:0.5 -
4.某大于1小于128的十進制奇數(shù)x,將其轉(zhuǎn)化為二進制數(shù)y,下列說法正確的是( ?。?/h2>
組卷:34引用:1難度:0.2 -
5.使用GoldWave軟件編輯某音頻文件,選中其中一段音頻進行編輯的界面如圖所示,下列說法正確的是( ?。?br />
組卷:10引用:1難度:0.7
二、非選擇題(本大題共4小題,其中第13小題4分,第14小題8分,第15小題7分,第16小題7分,共26分)
-
15.編寫了一個尋找最長連續(xù)相同子串的程序,功能如下:程序運行時,在文本框Text1中輸入一個非降序字符串。單擊輸出按鈕Command1后,在文本框text2上顯示最長相同子串。程序運行界面如圖所示。
(1)實現(xiàn)上述功能的VB程序如下,請在橫線處填入合適的代碼。
Private Sub Command1_Click
Dim a(1 To 100)As String,s As String
Dim i As Integer,m As Integer,n As Integer,pos As Integer
Dim L As Integer,R As Integer,length As Integer,Max As Integer
s=Text1.Text
n=Len(s)
For i=1 To n
a(i)=Mid(s,i,1)
Next i
For i=1 To n
L=i+1:R=n
Do While L<=R
m=(L+R)\2
If①Then
L=m+1
Else
R=m-1
End If
Loop
②
If length>Max Then
Max=length:pos=i
End If
i=i+length-1
Next i
Text2.Text=
End Sub
(2)上述程序段中加框處代碼有誤,請改正。
(3)若文本框Text1中輸入的非降字符串是“00111222”,執(zhí)行這段程序后,文本框Text2中輸出的內(nèi)容是組卷:0引用:1難度:0.6 -
16.在一個數(shù)組中存儲了若干個學(xué)生的技術(shù)成績小題分,其中a(1)存儲學(xué)生個數(shù),從a(2)開始按順序存儲小題分數(shù)據(jù)。每個學(xué)生有33個小題的數(shù)據(jù),例:a(2)-a(13)是“學(xué)生1”的信息客觀題得分,a(27)-a(30)是“學(xué)生1”的信息主觀題得分;a(14)-a(26)是“學(xué)生1”的通用客觀題得分,a(31)-a(34)是“學(xué)生1”的通用主觀題得分。
具體如表:題號 1-12 13-25 26-29 30-33 科目題型 信息客觀題 通用客觀題 信息主觀題 通用主觀題 滿分分值 每題2 分 每題2分 4/8/7/7 6/9/3/6
算法的VB程序如下,回答下列問題。
(1)根據(jù)題目描述,使用如圖所示數(shù)據(jù),a(95)的數(shù)值是
(2)在程序橫線處填上合適代碼,使程序完整
Dim a(1 To 1000)As Integer,n As Integer
Private Sub Form_Load ( ?。?br />‘讀入數(shù)據(jù)到數(shù)組a,數(shù)據(jù)個數(shù)n,代碼略
End Sub
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 Single'數(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'對結(jié)果四舍五入保留1位小數(shù)
List2.AddItem Str(i)+Str(b(j))+“%“
ave=③
Next i
Text1.Text=Str(ave/100)
End Sub組卷:1引用:1難度:0.5