用vb编一个程序!随机产生十个三位数,实现从小到大和从大到小的排序,并计算这十个三位数的和

来源：学生作业帮编辑：拍题作业网作业帮分类：综合作业时间：2024/04/29 01:50:25

dim ary(14),jg as long,dim SerAim(),sum as long
randomize
for i=1 to 13
ary(i)=int(rnd*1000)
next
For i = 1To 12
For j = i + 1 To 13
ReDim SerAim(i)
If ary(i) > ary(j) Then '这个语句是以小到大排序,数组的第一个就是最小数
If ary(i) < ary(j) Then '这个语句是以大到小排序,数组的第一个就是最大数
'注意上面的二个语句只能用一个!
Num = ary(i)
ary(i) = ary(j)
ary(j) = Num
End If
Next
Sum = Sum +ary(i)
Next

用vb编一个程序!随机产生十个三位数,实现从小到大和从大到小的排序,并计算这十个三位数的和 vb程序随机1到100产生二十个随机数,并从高到低排序 c#程序,从0到9十个数字组成没有重复数字的三位数.算出个数和输出这些三位数. 用C语言的指针（!）实现①输入十个数字,按从小到大的顺序排序后并输出②输入十个字符,按字典顺序排序输十个连续的三位数中最大的一个数不超过130,这十个数的和是105的倍数,求这十个数的和? VB语言随机产生10个10-99内的整数,分别用冒泡法和选择法将数据从大到小排序并显示结果用VB编一个程序,随机产生10个100以内的不同的偶数用0到9十个数组成一个四位数一个三位数一个两位数和一个一位数使它们的和为1998 请问三位数最小是多少用VB求“用0～9这十个数字可以组成能被15整除且无重复数字的三位数的个数”并打印结果十个连续的三位数相加的和是77的倍数最大的三位数小于130求这十个数的和从0至9这十个数字中,选出九个数字,组成一个两位数,一个三位数,一个四位数,和为2012,求未选的数. 把0至9十个数字任意组合成两个三位数和一个四位数,并满足这两个三位数的和等于这个四位数.数字不能重复