2017年浙江省普通高校高考信息技術模擬試卷（1）
發布：2024/4/20 14:35:0
一、選擇題（本大題共9小題，每小題2分，共24分．每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分）
-
1．下列有關信息的說法，不正確的是（ ?。?/h2>
組卷：17引用：6難度：0.9 -
2．用UltraEdit軟件觀察字符內碼，結果如圖所示，則該字符內碼可能是（ ?。?br />
組卷：10引用：2難度：0.9 -
3．某用戶對文字進行修訂和批注，修訂參數如圖1所示，修訂界面如圖2所示，接受所有修訂，正確的結果為（ ?。?/h2>組卷：7引用：1難度：0.9 -
4．小明利用Access軟件創建了某數據表，此表結構如圖1所示，并在該數據表中錄入了部分數據，如圖2所示，下列說法不正確的是（ ?。?br />
組卷：8引用：2難度：0.7 -
5．如圖是一個用Access軟件創建的數據表，記錄了某班學生的體檢情況．
以下有關該數據表的說法正確的是（ ）組卷：6引用：1難度：0.9
【加試題】
-
16．經典的狐貍抓兔子故事：圍繞著山頂有10個洞，狐貍要吃兔子，兔子說：“可以，但必須找到我，我就藏身于這十個洞中，你從10號洞出發，先到1號洞找，第二次隔1個洞找（即3號洞），第三次隔2個洞找（即6號洞），以后如此類推，次數不限．”但狐貍從早到晚進進出出了1000次，仍沒有找到兔子．問兔子空間藏在哪個洞里？
實現上述功能的程序如下，但加框處代碼有誤，請改正．
Private Sub Command1_Click （ ）
Const n=10
Dim hole（10）As Integer'hole數組模擬10個洞，值為0時表示未被訪問
Dim i,j,numbe As Integer
For i=1To 10
hole（i）=0
Next i
number=0
For j=1To 1000'循環訪問hole數組1000次
'（1）
i=number Mod n
if i=0then
'（2）
hole（i）=1
Nextj
For i=1To n
If hole（i）=0Then
list1．additem“兔子可能藏在”&str（i）&“號洞”
Next i
End Sub.組卷：4引用：1難度：0.1 -
17．創建VB程序，統計英語短文中字母出現的次數，并輸出出現次數最多的字母和未出現的字母．字母不區分大小寫，均表示為大寫字母．程序運行界面如圖所示．
算法如下：
（1）獲取輸入的英語短文，存入變量s
（2）統計字母出現次數依次取出s中的每個字符如果是大寫字母，計算其在字母表中的位置n,并計數如果是小寫字母，計算其在字母表中的位置n,并計數（用數組a存放26個字母出現的次數，a（1）存儲“A”出現的次數，a（2）存儲“B”出現的次數，…，a（26）存儲“Z”出現的次數）
（3）找出最大出現次數
（4）找出出現次數最多和未出現過的字母并輸出VB程序如下，在其中①②③橫線處填指定相應代碼，完善程序．
Private Sub Command1_Click （ ?。?br />Dim i As Integer,n As Integer,max As Integer
Dim a（1To 26）As Integer'數組a存放26個字母出現的次數
Dim s As String,c As String'變量s存放輸入的短文
Dim s1As String,s2As String'變量s1、s2分別存放出現次數最多和未出現的字母組成的字符串
s=Text1．Text
'統計字母出現次數
For i=1 To Len（s）
c=Mid（s,i,1）
if c＞=“A”And c＜=“Z”Then
n=Asc（c）-Asc（“A”）+1
a（n）=
ElseIf c＞=“a”And c＜=“z”Then
n=Asc（c）-32-Asc（“A”）+1
a（n）=a（n）+1
End If
Next i
'找出最大出現次數
max=a（1）
For i=1 to 26
IfThen
max=a（i）
End If
Next i
'找出出現次數最多和未出現過的字母
For i=1 To 26
IfThen
s1=s1+“”+Chr（Asc（“A”）+i-1）
ElseIf a（i）=0Then
s2=s2+“”+Chr（Asc（“A”）+i-1）
End if
Next i
Label 2．Caption=“出現次數最多的字母是：”&s1&“出現次數為：”&Str（max）
Label3．Caption=“未出現的字母是：”&s2
End Sub.組卷：6引用：2難度：0.1