VB排序题.:随即产生10个2位数,按从大到小递减的顺序排列,并显示排序结果.急我是新生,

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/10 01:05:56
VB排序题.:随即产生10个2位数,按从大到小递减的顺序排列,并显示排序结果.急我是新生,

VB排序题.:随即产生10个2位数,按从大到小递减的顺序排列,并显示排序结果.急我是新生,
VB排序题.:随即产生10个2位数,按从大到小递减的顺序排列,并显示排序结果.急
我是新生,

VB排序题.:随即产生10个2位数,按从大到小递减的顺序排列,并显示排序结果.急我是新生,
Private Sub form_click()
Randomize
Dim tmp As Integer
Dim a(1 To 10) As Integer
Print "排序前为:" '可删除
For i = 1 To 10 '开始随机生成10个数
a(i) = Int(Rnd * 89+10)
Print a(i); ‘可删除
Next i
Print ’可删除
'开始插入排序
For i = 2 To 10
If a(i) > a(i - 1) Then
tmp = a(i)
For j = i - 1 To 1 Step -1
If tmp < a(j) Then Exit For
a(j + 1) = a(j)
Next j
a(j + 1) = tmp
End If
Next i
Print "排序结果:"
For i = 1 To 10
Print a(i);
Next i
Print
End Sub
这个程序将排序前随机的数也显示出来了,比较直观,若不需要删除即可(有可删除标注).

VB排序题.:随即产生10个2位数,按从大到小递减的顺序排列,并显示排序结果.急我是新生, vb中利用随机函数产生30个不同的三位正整数,打印出这30个数,然后将它们按从大到小的次序排序 VB语言随机产生10个10-99内的整数,分别用冒泡法和选择法将数据从大到小排序并显示结果 利用随即函数产生50到100范围内的20个随即整数,显示其中的最大值 最小值和平均数. 尽量简单点 VB解决 VB的:用随机函数产生n个三位整数,用选择法排序后将它们的值从大到小输出,n=204! 想问下 vb中 rnd产生随即数的问题rnd*4 是否产生的是 从0开始到4 同时包括4的 数字?int(rnd*4)是否产生的是0 1 2 3 VB随机产生10个两位数整数(正整数),要求分别用选择排序法和冒泡排序法将这10个数降序排列输出在窗体上是编程问题用VB编程 VB随机产生10个100到200之间的整数,将其按从大到小顺序排列 vb程序随机1到100产生二十个随机数,并从高到低排序数组score中存储有20个学生一门课程的成绩(整型),编程用随机函数给整型数组score赋值,然后从高到低排序,并按一行五个输出显示在文本框 VB随机产生3位数的代码 求一个vb程序,关于产生随机数排序的.实现随机产生两位整数并排序的功能程序运行后,单击产生随机数“按钮,在图片框中输出10个随机的两位整数.单击”排序“按钮,接着输出排序结果.例如 VB 输入3个不同的数,将它们从大到小排序. VB语言从多个范围产生一个随机数 VB设计程序(找奇偶数和素数并进行排序和求和)随机产生n个(20≤n≤100)两位整数,找出其中的奇数、偶数和素数,并将奇数按升序排序,将偶数按降序排序,将素数求和.1.将随机产生的n个整 从10个数字里每次必须挑选3个,问随即选2个对的概率多少?从0-9里面取3个别数字 可以都能一样 问随即取2个对的概率? 用VB在1-100中产生10个随机整数,按从小到大的顺序排列 如题..求代码 要产生30~35范围内的随即函数,采用的VB表达方式是?~ 随即产生10个整数 ,求他们得最大值、最小值、和、平均数java变成