下面是用冒泡法将5个整数按升序排列,请将程序补充完整。
Sub GASR()
Dim m
m=Array(10, 1, 5, 6, 7)
For i=0 To 3
For j= 【13】
If m(i) >=m(j) Then
【14】
m(i) =m(j)
m(j) =t
End If
Next j
【15】
For i=0 To 4
Print m(i)
Next i
End Sub
第1题:
for(i=0;i</**/m-1/**/;i++)
if/**/(a[j]<a[j+1])/**/
a[j]=/**/a[j+1]/**/;
第2题:
以下冒泡法程序对存放在a[1],a[2],……,a[n]中的序列进行冒泡排序完成程序中的空格部分,其中n是元素个数,要求按升序排列。
(1)j<=n-1
(2)i<=n-j
(3)a[i]=a[i+1]
(4)a[i+1]=temp
(5)当某趟冒泡中没有出现交换则已排好序结束循环。
略
第3题:
以下冒泡法程序对存放在a[1],a[2],……,a[n]中的序列进行冒泡排序,完成程序中的空格部分,其中n是元素个数,程序按升序排列。
(1)j<=n-1
(2)i<=n-j
(3)a[i]=a[i+1]
(4)a[i+1]=temp
(5)当某趟冒泡中没有出现交换则已排好序,结束循环
略
第4题:
下列程序将x、y和z按从小到大的顺序排列,请将下面的函数模板补充完整。 template<class T> void fun (______) { T a; if(x>y) { a=x; x=y;y=a; } if(y>z) { a=y; y=z;z=a; } if(x>y) { a=x; x=y;y=a; } }
A.T x,T y,T z
B.T x;y;z
C.T &x,T &y,T &z
D.T &x, &y, &z
第5题:
对n个元素进行冒泡排序,要求按升序排列,程序中设定某一趟冒泡没有出现元素交换,就结束排序过程。对某n个元素的排序共进行了3n-6次元素间的比较就完成了排序,则()。
A原序列是升序排列
B原序列是降序排列
C对序列只进行了2趟冒泡
D对序列只进行了3趟冒泡