题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-10-23 04:17:51

[填空题]下面是用冒泡法将5个整数按升序排列,请将程序补充完整。   Sub GASR( )     Dim m     m=Array(10,1,5,6,7)     For i=0 To 3       For j=【 】          If m(i) >=m(j) Then         【 】          m(i) =m(j)         m(j) =t       End If     Next j     【 】     For i=0 To 4       Print m(i)    Next i   End Sub

更多"下面是用冒泡法将5个整数按升序排列,请将程序补充完整。   Sub "的相关试题:

[填空题]下面是用冒泡法将5个整数按升序排列,请将程序补充完整。   Sub GASR( )     Dim m     m=Array(10,1,5,6,7)     For i=0 To 3       For j=【 】          If m(i) >=m(j) Then         【 】          m(i) =m(j)         m(j) =t       End If     Next j     【 】     For i=0 To 4       Print m(i)    Next i   End Sub
[填空题]下面是用冒泡法将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
[填空题]下面程序是用冒泡法将数组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 = 【12】
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
[填空题]下面的程序是用冒泡法将数组a中的10个整数按升序排列,并将程序补充完整。
Private Sub Command1_Click( )
Dim a
Dim Tmp As Integer
a=Array(678 , 45 , 324 , 528 , 439 , 387 , 87 , 875 , 273 , 823)
For i=______
For j=______
If a(i)______a(j)Then
Tmp=a(i)
a(i)=a(j)
a(j)=Tmp
End If
Next j
Next i
For i=0 To 9
Print a(i)
Next i
End Sub
[填空题]下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请将程序补充完整。
Option Base 1
Private Sub Command1_Click( )
Dim a
a = Array(549, 45, 324, 561, 439, 258, 87, 435, 587, 823)
For i = 【5】
For j = 【6】
If a(i) 【7】 a(j) Then
al = a(i)
a(i) = a(j)
a(j) = al
End If
Next j
Next i
For i = 1 To 10
Print a(i)
Next i
End Sub
[填空题]下面的程序用冒泡法将数组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
[填空题]下面的程序用“冒泡”法将数组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= 【8】 For j= 【9】 If a(i) 【10】 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
[填空题]下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请在横线处将程序补充完整。 public class Sun{ public static void main(String args []){ int [] a={678,45,324,528,439,387,87,875,273,823}; int a1=0; for(int i=0i<=8;i++){ for(int j= 【13】 ;j<=9;j++) if (a [i]>=a[j]){ a1=a[j]; a[j]=a[i]; a[i]=a1; } } for(int i=0;i<=9;i++) System.out.println(a[i]); } }

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

截图扫码使用小程序[完全免费查看答案]
请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码