在窗体上有一个过程函数 然后编写如下事件程序 该过程的功能是用选择交换法将10个数排成升序 请在空白
在窗体上有一个过程函数,然后编写如下事件程序,该过程的功能是用选择交换法将10个数排成升序,请在空白处填入适当的语句。 Sub SORT( ) Dim a(1 To 10) For i=1 To 10 a(i)=Val(InputBox(" " ," ",0)) Next i For i=【 】 k=i For j=【 】 If a(k)>a(j)Then【 】 If k< >i Then b=a(k) a(k)=a(i) a(i) =b End If Next j Next i For k=1 To 10 Print a(k) Next k End Sub
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:1 To 9 I+1 To 10 k=j
由于是10个数所以1从1到9,j从i到10形成两次循环,如果是100个的话,那就是1从1到99,j从1到100形成两次循环;由于a(k)〉a(j)所以要交换,以便排序。
相似问题
当用【 】方式打开文件时 如果对文件进行与操作 则写入的数据附加到原来文件的后面。请帮忙给出正确答案
当用【 】方式打开文件时,如果对文件进行与操作,则写入的数据附加到原来文件的后面。请帮忙给出正确答案和分析,谢谢!
以下程序段执行后y的值是【 】。 x=6 y=int(x+0.5) print y请帮忙给出正确答案
以下程序段执行后y的值是【 】。 x=6 y=int(x+0 5) print y请帮忙给出正确答案和分析,谢谢!
Visual Basic对象可以分为两类 分别为【 】和【 】。请帮忙给出正确答案和分析 谢谢!
Visual Basic对象可以分为两类,分别为【 】和【 】。请帮忙给出正确答案和分析,谢谢!
与数学表达式cos (a+B)/3x+5对应的Visual Basic表达式是【 】。请帮忙给出正确
与数学表达式cos (a+B) 3x+5对应的Visual Basic表达式是【 】。请帮忙给出正确答案和分析,谢谢!
下面程序的功能是产生10个小于100(不含100)的随机正整数 并统计其中5的倍数所 占比例 但程序
下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所 占比例,但程序不完整,请补充完整。 Sub PR( ) Randomize Dim a(1
