當(dāng)前位置： 2016-2017學(xué)年浙江省紹興一中高二（下）期末信息技術(shù)試卷> 試題詳情

【加試題】有如下程序段：
For i=1To 6
f=False
For j=7To i+1Step-1
If d（j）＜d（j-1）Then
t=d（j）：d（j）=d（j-1）：d（j-1）=t
f=True
End If
Next j
If f=False Then Exit For
Next i
如果數(shù)組元素d（1）到d（7）的值依次為“18，22，9，32，16，12，40”，則執(zhí)行此程序段后，變量i的值為（　?。?/h1>

A．4

B．6

C．7

D．3

【考點(diǎn)】冒泡排序算法及其實(shí)現(xiàn)．

【答案】A

【解答】

【點(diǎn)評(píng)】

聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。

當(dāng)前模式為游客模式，立即登錄查看試卷全部?jī)?nèi)容及下載

發(fā)布：2024/11/3 11:30:1組卷：10引用：1難度：0.7

相似題

1．以下程序的功能是隨機(jī)生成20個(gè)1到100之間的正整數(shù)，用選擇排序法將其按從大到小的順序排列后輸出．請(qǐng)將下列程序補(bǔ)充完整．
Private Sub Command1_Click

Dim a（20）As Integer,i As Integer
Dim j As Integer,temp As Integer
Prin“排序前：”
For i=1 To 20
a（i）=Int（Rnd*100）+1
Print a（i）；
Next i
Print
For i=1 To 19
For

To 20
If

Then
t=a（i）
a（i）=a（j）

End If
Next j
Next i
Print“排序后：”
For i=1To 20
Print a（i）；
Next i
End Sub
（1）程序中橫線處①應(yīng)填入

．
（2）程序中橫線處②應(yīng)填入

．
（3）程序中橫線處③應(yīng)填入

．
發(fā)布：2024/11/5 5:0:1組卷：21引用：1難度：0.1
解析

2．有一個(gè)數(shù)組，采用冒泡排序，第一遍排序后的結(jié)果為：2，10，5，45，6，7，9，20，24那么該數(shù)組的原始順序不可能的是（　?。?/h2>

A．10，5，45，6，7，9，20，24，2

B．10，5，45，6，7，9，2，20，24

C．10，5，45，2，6，7，9，20，24

D．2，10，5，45，20，9，24，6，7

發(fā)布：2024/11/5 3:0:2組卷：2引用：2難度：0.5

解析

3．為了找出QQ在線時(shí)間最長(zhǎng)的5名學(xué)生，李風(fēng)設(shè)計(jì)了一個(gè)排序程序．程序運(yùn)行界面如圖所示：

左邊列表框List1中顯示排序前數(shù)據(jù)，單擊“排序”按鈕Command1，在右邊列表框List2中顯示在線時(shí)間從高到低排名前5名的數(shù)據(jù)．程序中數(shù)組a和數(shù)組b分別存儲(chǔ)學(xué)生的QQ昵稱和對(duì)應(yīng)的QQ在線時(shí)間．
程序代碼如下：
Const n As Integer=14'n為學(xué)生數(shù)
Dim a（1To n） As String'數(shù)組a用于存儲(chǔ)學(xué)生的QQ昵稱
Dim b（1To n） As Integer'數(shù)組b用于存儲(chǔ)學(xué)生的QQ在線時(shí)間
Private Sub Command1_Click （　?。?br />Dim i As Integer,j As Integer,t As String,p As Integer
For i=1To n-1
For j=n To i+1Step-1
If ①Then
t=a（j-1）：a（j-1）=a（j）：a（j）=t
p=b（j-1）：b（j-1）=b（j）：b（j）=p
End If
Next j
Next i
For i=1To 5
List2．AddItem SpaceEx（a（i））+Str（b（i））+“分鐘“
Next i
End Sub
'以下函數(shù)用于在字符串后補(bǔ)插空格
Function SpaceEx（s As String） As String
Dim t As String,d As Integer,i As Integer
t=s：d=Len（s）
For i=1To 5-d
t=t+““
Next i
SpaceEx=②
End Function
Private Sub Form_Load （　?。?br />'此過(guò)程用于對(duì)數(shù)組a和數(shù)組b進(jìn)行賦值，并顯示在List1中，代碼略
End Sub
（1）解決此問(wèn)題采用的算法是

．（填：選擇排序/冒泡排序）
（2）在程序①和②填入適當(dāng)?shù)恼Z(yǔ)句或表達(dá)式，將程序補(bǔ)充完整：
程序中①應(yīng)填入

．程序中②處應(yīng)填入

．
發(fā)布：2024/11/5 1:30:1組卷：21引用：2難度：0.1
解析

把好題分享給你的好友吧~~

2．有一個(gè)數(shù)組，采用冒泡排序，第一遍排序后的結(jié)果為：2，10，5，45，6，7，9，20，24那么該數(shù)組的原始順序不可能的是（ ?。?/h2>

2．有一個(gè)數(shù)組，采用冒泡排序，第一遍排序后的結(jié)果為：2，10，5，45，6，7，9，20，24那么該數(shù)組的原始順序不可能的是（　?。?/h2>