下面程序是用冒泡法将数组a中的10个整数按升序排列 请将程序补充完整。 Private Sub Co

大学专科 已帮助: 时间:2023-07-20 19:40:48

下面程序是用冒泡法将数组a中的10个整数按升序排列,请将程序补充完整。 Private Sub Command1_Click( ) Dim a, Tmp As Integer a = Array (678,45,324,528,439,387,87,875,273,823) For i =【 】 Forj =0 To 9 Ifa (i)<a(j) Then Tmp = a(i): a(i) = a(j) i a(j) = Tmp End If Next j,i For i = 0 To 9 Print a(i) Next End Sub
请帮忙给出正确答案和分析,谢谢!

难度:⭐⭐⭐

题库:大学专科,电子信息,计算机类

标签:升序,整数,程序

参考解答

用户头像

461***262

2023-07-20 19:40:48

正确答案:0 To 9
使用Array函数给数组赋值时,默认数组的下标从0开始,依次比较各数大小,则i=0To9。

上一篇 Private Sub Form_Activate( ) For j = 1 to 3 x=3 Fo

下一篇 下列过程的功能是用来计算并输出S=1+1/2+1/3+……+1/100的值 请完善程序。 Funct

相似问题