2017-2018學年浙江省名校協(xié)作體高三(下)月考信息技術試卷(3月份)
發(fā)布:2024/4/20 14:35:0
一、選擇題(本大題共12小題,每小題2分,共24分.在每小題給出的四個選項中,只有一個符合題目要求)
-
1.關于信息與信息技術,以下說法正確的是( ?。?/h2>
組卷:43引用:1難度:0.9 -
2.使用Word軟件編輯一篇文章,界面如圖所示,以下說法正確的是( ?。?br />
組卷:27引用:1難度:0.9 -
3.關于人工智能,以下說法不正確的是( ?。?/h2>
組卷:16引用:2難度:0.9 -
4.關于Access數據庫,以下說法正確的是( )
組卷:9引用:1難度:0.5 -
5.某算法的流程圖如圖所示。執(zhí)行這部分流程后,輸出變量i的值是( )
組卷:2引用:3難度:0.5
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
-
16.德國數學家哥德巴赫曾猜測:任何大于6的偶數都可以分解成兩個素數(素數對)的和。但有些偶數可以分解成多種素數對的和,如:10=3+7,10=5+5,即10可以分解成兩種不同的素數對。
小敏編寫了一個VB程序,用來求一個偶數(6到100之間)可能存在多少這樣的素數對(注:A+B與B+A認為是相同素數對,不重復統(tǒng)計),并把這些結果輸出到一個列表框中,通過邏輯推理,小敏發(fā)現(xiàn)這些素數對都是奇數,所以她只需要驗證奇數的素數對即可。運行界面如圖所示,程序代碼如下。但加框處代碼有錯,請改正。
Dim IsPrime(100)As Boolean'用來存儲是否素數,True為素數,F(xiàn)alse為非素數
Private Sub Command1_Click ( ?。?br />Dim x As Integer,y As Integer,i As Integer,num As Integer
Call Init'調用Init函數
x=Val(Text1.Text)
y=x\2
num=0
For i=3To y Step 2
If IsPrime(i) Then'①
num=num+1
List1.AddItem Str(x)+“=“+Str(i)+“+“+Str(x-i)
End If
Next i
Label2.Caption=“偶數“+Str(x)+“共有“+Str(num)+“個素數對。“
End Sub
Sub Init
Dim i As Integer,j As Integer,x As Integer
For i=3To 100Step 2
x=Int(Sqr(i))
For j=2To x Step 2'②
If i Mod j=0Then Exit For
Next j
If j>x Then IsPrime(i)=True Else IsPrime(i)=False
Next i
End Sub組卷:2引用:1難度:0.5 -
17.對于數組(形如a數組:4、5、6、1、2、3或b數組:1、2、3、4、5、6),我們稱元素1為此二數組的拐點。為尋找此類遞增或循環(huán)遞增數組的拐點,可以用順序查找和對分查找的方法,通常相比之下對分查找算法較優(yōu),以下為使用對分法查找拐點的算法。
做法是比較中點與當前查找范圍第1個數大小關系,用對分法使查找范圍逼近拐點;當余下數組只有二個元素時,可根據此二元素大小關系得到拐點的位置。
依據上述描述設計了VB程序,界面如圖所示。請回答下列問題:
(1)對于循環(huán)遞增數組“9、10、11、12、13、14、15、16、17、18、19、20、1、2、3、4、5、6、7、8”,代碼中加框處執(zhí)行的次數為
(2)請在橫線處填入合適的代碼。
Dim a(1To 20)As Integer
Private Sub Command1_Click ( ?。?br />Dim Low As Integer,High As Integer
Low=1
High=20
Do While High>Low
If
If
Label1.Caption=“拐點元素為“+Str(a(1))+“,下標為“+Str(1)
Else
Label1.Caption=“拐點元素為“+Str(a(High))+“,下標為“+Str(High)
End If
Exit Do
End If
m=(Low+High)\2
If a(m)>=a(Low) Then
Low=m
Else
End If
Loop
End Sub
Private Sub Form_Load ( )
'生成循環(huán)遞增的數組a,代碼略
End Sub組卷:0難度:0.5