{
int temp;
for(int i=0;i<n;i++)
{
for(j=i+1;j<n;j++)
{
if(a[i]>a[j])
{
temp=a[i];
a[i]=a[j];
a[j]=temp;
}
}
}
for(i=0;i<n;i++)
cout<<a[i]<<' ';
cout<<endl;
}
能详细的告诉我 VB 里冒泡排序法么?最好要有个详细的举例。
'有5个数要排序，需要进行5-1=4次两两比较 For j = 5 To i + 1 Step -1 '从末尾一个元素到第i个元素进行两两比较 If x(j)< x(j - 1)Then '从小到大排序，若需要从大到小排序，将“<”改为“>”'若次序不对，则马上交换位置 t = x(j)x(j)= x(j - 1)x(j - 1)= ...
VB编程,求随机生成50个1至100的数。并升序排列(用冒泡法)
Private Sub Form_Click()Dim i, j, t, a(1 To 50)Cls Randomize Print "50个随机数："For i = 1 To 50 a(i) = 1 + Int(100 * Rnd)Print a(i);If i Mod 10 = 0 Then Print Next Rem 用冒泡法排序 For i = 1 To 49 For j = 1 To 50 - i If a(j) > a(j + ...
什么是冒泡排序算法
冒泡排序算法：重复地走访过要排序的元素列，依次比较两个相邻的元素，如果他们的顺序（如从大到小、首字母从A到Z）错误就把他们交换过来。走访元素的工作是重复地进行直到没有相邻元素需要交换，也就是说该元素已经排序完成。这个算法的名字由来是因为越大的元素会经由交换慢慢“浮”到数列的顶端（升序...
excel vba 内存数组按升序排序,试了几次很困惑,哪位大侠能详解,或者字 ...
提供一个比较普通的数组冒泡排序方法 Sub ABC()arr = Array("d", "g", "v", "p", "a")For i = 0 To UBound(arr) - 1 For j = i + 1 To UBound(arr)If arr(i) > arr(j) Then Temp = arr(j)arr(j) = arr(i)arr(i) = Temp End If Next Next [a1].Resize(1, U...
VB问题,数组s中的100个降序排序, '并将排序结果按紧凑格式打印_百度...
s(j)=t'最后把s(j)的值换成t,也是之前s(i)的值 '到这里就完成了位置的调换 '接下来就是不断循环这个过程来完成数组排序 end if next j next i 两两比较过程是这样的 s(1)&s(2),s(1)&s(3),s(1)&s(4)...s(1)&s(100)s(2)&s(3)...s(2)&s(100)...s(99)&s(100...
...0到100之间的整数,分别使用选择法和冒泡法对其进行升序排序...
选择法：Private Sub Form_Click()Dim i%, j%, a%(1 To 10)Randomize For i = 1 To 10 a(i) = Int(101 * Rnd)Next i For i = 1 To 9 k = i For j = i + 1 To 10 If a(j) < a(k) Then k = j Next j If k <> i Then t = a(i): a(i) = a(k): a...
这儿有一个VB升序排列的程序,但有些地方我也不懂,求解释
因为Step -1 指的是步长为-1，循环过程 i=4 i=3 i=2 共三次循环。2、arr1 = Array(Val(Text1.Text), Val(Text2.Text), Val(Text3.Text), Val(Text4.Text))Array指定义并赋予函数组值，结果为：arr1(0)=Val(Text1.Text)arr1(1)=Val(Text2.Text)arr1(2)=Val(Text3.Text)arr...
能详细的告诉我 VB 里冒泡排序法么?最好要有个详细的举例。
冒泡排序法是最简单的排序法，但也是效率最低的排序法。一个程序如下：Private Sub Command1_Click()Dim a(1 To 5) As Integer For i = 1 To 5 a(i) = Int(Rnd * 100)Print a(i);Next i For i = 5 To 2 Step -1 For j = 1 To i - 1 If a(j) > a(j + 1) Then ...
什么是冒泡排序法?能说具体点吗?
冒泡排序（BubbleSort）的基本概念是：依次比较相邻的两个数，将小数放在前面，大数放在后面。即在第一趟：首先比较第1个和第2个数，将小数放前，大数放后。然后比较第2个数和第3个数，将小数放前，大数放后，如此继续，直至比较最后两个数，将小数放前，大数放后。至此第一趟结束，将最大的数放...
VB中如何给指定的数组排序??
Picture2.Print "学号 姓名 VC VB"Picture2.Print "---"For i = 0 To n - 1 Picture2.Print a(i).number, a(i).name, a(i).vc, a(i).vb Print Next i End Sub
