下面的程序用“冒泡”法将数组a中的10个整数按升序排列 请将程序补充完整。 Option Base
下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim a a=Array(678,45,324,528,439,387,87,875,273,823) For i=【 】 For j=【 】 If a(i)【 】a(j)Then a1=a(i) a(i)=a(j) a(j)=a1 End If Next j Next i For i=1 To 10 Print a(i) Next i End Sub
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:1 To 9 i+1 To 10 >
最外层的循环负责从第1个元素到第9个元素中取出一个,内层循环负责取外层循环下标后面的元素与它比较,如果比外层循环取出的元素小,则将二者的位置对换。
相似问题
在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后 在列表中添加若干列表
在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后,在列表中添加若干列表项。当双击列表框中的某个项目时,在标签Labe1中显示所选
下述程序段在运行时的显示结果是【 】。 Cls x=1.34 + 8 Print Len(x)请帮忙
下述程序段在运行时的显示结果是【 】。 Cls x=1.34 + 8 Print Len(x)请帮忙给出正确答案和分析,谢谢!
下列语句的输出结果是【 】。 Print Format$(1256 '000 000.00')请帮忙
下列语句的输出结果是【 】。 Print Format$(1256, "000,000.00 ")请帮忙给出正确答案和分析,谢谢!
全局变量必须在【 】模块中定义。请帮忙给出正确答案和分析 谢谢!
全局变量必须在【 】模块中定义。请帮忙给出正确答案和分析,谢谢!
函数Str$(2536)的值是【 】。请帮忙给出正确答案和分析 谢谢!
函数Str$(2536)的值是【 】。请帮忙给出正确答案和分析,谢谢!
