爱问知识人 爱问教育 医院库

vb6.0用选择法对10个整数排列

首页

vb6.0用选择法对10个整数排列

vb6.0编程

提交回答
好评回答
  • 2007-12-21 17:14:39
    Dim a(1 to 10) as Integer, maxIndex as Integer, tmp as Integer
    'a(1-10)=?赋值
    For i = 1 to 9
    maxIndex = i
    For j = i + 1 to 10
    If a(j) > a(maxIndex) Then
    maxIndex = j
    End If
    Next j
    tmp = a(i)
    a(i) = a(maxIndex)
    a(maxIndex) = tmp
    Next i

    p***

    2007-12-21 17:14:39

类似问题

换一换
  • VB 相关知识

  • 电脑网络技术
  • 电脑网络

相关推荐

正在加载...
最新问答 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 171-190
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):