16.某高中韻律操比賽,20支比賽隊(duì)隊(duì)伍的名稱和比賽得分分別保存在數(shù)組a和數(shù)組b中,第i支隊(duì)伍的名稱保存在a(i)中,對(duì)應(yīng)的得分保存在b(i)中.下面的程序段實(shí)現(xiàn)按積分降序排序,閱讀程序段,并完成后面的幾個(gè)問題: Private Sub Command1_Click ( ?。?br />Dim a(1To 20)As Integer ① Dim b(1To 20)As Integer Dim i As Integer,j As Integer,ta As Integer,tb As Integer,m As Integer For i=1To 19 m=i For j=i+1To 20 If b(j)<b(m) Then m=j ② Next j If m<>i Then ta=a(m):a(i)=a(m):a(i)=ta ③ tb=b(m):b(m)=b(i):b(i)=tb End If Next i End Sub (1)該程序段算法采用的是
(填“冒泡排序”或“選擇排序”) (2)程序中橫線處的語(yǔ)句或表達(dá)式應(yīng)更正為 ①
17.素?cái)?shù)又稱質(zhì)數(shù),指在一個(gè)大于1的自然數(shù)中,除了1和此整數(shù)自身外,沒法被其他自然數(shù)整除的數(shù).超級(jí)素?cái)?shù)的定義:當(dāng)一個(gè)素?cái)?shù)從低位到高位依次去掉一位數(shù)后剩下的數(shù)仍然是素?cái)?shù),則此數(shù)為超級(jí)素?cái)?shù).例如:7331、733、73、7均為素?cái)?shù),所以7331為超級(jí)素?cái)?shù).小明設(shè)計(jì)了一個(gè)程序查找四位正整數(shù)中的超級(jí)素?cái)?shù).程序運(yùn)行時(shí),單擊Command1,則在列表框List1中顯示所有四位數(shù)的超級(jí)素?cái)?shù),并在標(biāo)簽Label1中顯示超級(jí)素?cái)?shù)的數(shù)量.程序運(yùn)行效果如第17題圖所示.實(shí)現(xiàn)上述功能的VB程序如下: Private Sub Command1_Click ( ?。?br />Dim i As Integer,tmp As Integer,c As Integer Dim flag As Boolean c=0 For i=1001To 9999Step 2 ① flag=True Do While tmp<>0 If Not prime(tem) Then flag=False Exit Do End If tmp=tmp\10 Loop If flag Then List1.AddItem Str(i) ② End If Next i Label1.Caption=“四位超級(jí)素?cái)?shù)共有“+Str(c)+“個(gè)“ End Sub Function prime(x As Integer) As Boolean'判斷是否是素?cái)?shù) Dim i As Integer prime=True For i=2To x-1 If ③Then prime=False Exit Function End If Next i End Function 請(qǐng)?jiān)跈M線處填入對(duì)應(yīng)①②③處的合適代碼. ①