2018年浙江省信息技術仿真試卷（3）（選考）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分．每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分）
-
1．關于算法的三種基本模式，下列說法正確的是（ ）
組卷：22引用：2難度：0.9 -
2．某算法流程圖如圖所示：
執(zhí)行該算法，當s的值為0時（ ?。?/h2>組卷：5引用：6難度：0.9 -
3．枚舉算法的使用范圍是（ ?。?/h2>
組卷：38引用：2難度：0.9 -
4．下列關于對象的描述中，錯誤的是（ ?。?/h2>
組卷：26引用：4難度：0.9 -
5．下列VB表達式的值等于3的是（ ?。?/h2>
組卷：15引用：10難度：0.9
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題4分，第15小題5分，第16小題8分，第17小題5分，共26分）
-
16．鄭均收集了某公司生豬生長各階段的產(chǎn)肉比數(shù)據(jù)，他設計了如下Visual Basic程序進行數(shù)據(jù)處理．程序運行界面如圖所示，左邊列表框List1中顯示生豬生長的各階段編號及對應的產(chǎn)肉比，單擊“排序”按鈕Command1后，右邊的列表框List2中顯示按產(chǎn)肉比從高到低排序后的數(shù)據(jù)．所收集到的不同生長階段編號和對應的產(chǎn)肉比數(shù)據(jù)已分別保存在數(shù)組a和數(shù)組b中．
排序部分程序如下：
Dim a（1To 10）As String′數(shù)組a用于存儲階段編號
Dim b（1To 10）As Single′數(shù)組b用于存儲產(chǎn)肉比
Private Sub Command1-Click （ ?。?br />Dim i As Integer,j As Integer,k As Integer,t As Single,s As String
For i=1To 9
k=i
For j=i+1To 10
If ① Then k=j
Next j
If k＜＞i Then
s=a（i）：a（i）=a（k）：a（k）=s
t=b（i）：②：b（k）=t
End If
Next i
For i=1To 10
List2．AddItem a（i）+””+Str（b（i））
Next i
End Sub
Private Sub Form Load （ ）′此過程用于對數(shù)組a和數(shù)組b進行賦值，并顯示在List1中，代碼略
End Sub
（1）解決此問題采用的算法是．（填“選擇排序”或“冒泡排序”）
（2）在程序①和②畫線處填入適當?shù)恼Z句或表達式，將程序補充完整：
程序中①畫線處應填入．
程序中②畫線處應填入．組卷：20引用：3難度：0.1 -
17．編寫VB程序，實現(xiàn)如下功能：在文本框Text1中輸入一個整數(shù)，單擊“查找刪除”按鈕Command1，采用對分查找法在數(shù)組A中刪除該數(shù)（該數(shù)后面的數(shù)組元素都前移一位），并在標簽Label2中顯示刪除后的結果（運行效果如圖所示）；否則，在標簽Label2中顯示“該數(shù)沒有找到”．
實現(xiàn)上述功能的VB代碼如下，但加框處代碼有錯，請改正．
Dim A（1To 10）As Integer′用于保存10個按從小到大順序排列的整數(shù)
′Form-Load事件過程產(chǎn)生10個整數(shù)，按升序保存在數(shù)組A中，并在標簽Label1中顯示
Private Sub Form-Load （ ）
′代碼略
End Sub
Private Sub Command1-Click （ ?。?br />Dim I As Integer,j As Integer,m As Integer,k As Integer
Dim x As Integer,f As Boolean′變量f用于標記是否在數(shù)組中找到x
x=Val（Text1．Text）
i=1：j=10
f=False
Do While （i＜=j）And （f=False）
m=Int（（i+j）/2）
If A（m）=x Then f=True
If
Then i=m+1Else j=m-1′（1）
Loop
If f=True Then
For k=m To 9
′（2）
Next k
Label2．Caption=””
For k=1to 9
Label2．Caption=Label2．Caption+Str（A（k））+””
Next k
Else
Label2．Caption=”該數(shù)沒有找到”
End If
End Sub.組卷：3引用：3難度：0.1