用VB编写把9个元素的数组A的围成一圈,每三个相邻数相加得到数组B,再对B升序排列

来源：学生作业帮编辑：拍题作业网作业帮分类：综合作业时间：2024/05/01 17:12:30

Public Function MyMod&(ByVal N&, ByVal M&)
MyMod = (N + M) Mod M
End Function
Private Sub Command1_Click()
Dim i%, j%, a%(9), b%(9), t%: Cls
Print "数组a() : "
For i = 0 To 8 '产生并输出数组a()
a(i) = Int(Rnd() * 10)
Print a(i) & " ";
Next
Print: Print "数组b() 未排序: "
For i = 0 To 8 '产生并输出数组B()
b(i) = a(MyMod(i - 1, 9)) + a(MyMod(i, 9)) + a(MyMod(i + 1, 9))
Print b(i) & " ";
Next
For i = 0 To 7 '数组B()排序
For j = i + 1 To 8
If b(i) > b(j) Then t = b(i): b(i) = b(j): b(j) = t
Next
Next
Print: Print "数组b() 已排序: "
For i = 0 To 8 '输出数组B()
Print b(i) & " ";
Next
End Su

用C语言编写函数判断一个具有10个数组元素的证书数字是否升序排列? 用冒泡排序法对偶数下标的数组元素进行升序排列用选择排序法对奇数下标的数组元素进行降序排列编写函数有10个数围成一圈,求出相邻三个数之和的最小值并返回最小值的起始数组元素的下标(用指针变量做函数参数传递最小的值已知有a[10]、b[5]两个数组,其中a 为升序数组,编写程序将b 数组中的各个元素插入完成其中的fun函数,该函数的功能是：将已按升序排列好的数组a和已按降序排列好的数组b中的所有元素按降序 vb程序题:将二维数组A中的100个元素分别赋给一维数组B的每个元素并打印出来用c++语言分别在a数组和b数组中放入若干个数,把两个数组中的数按由小到大的顺序归并到c数组 VB随机产生10个任意的两位正整数存放在一维数组中,求数组的最大值、平均值、能实现将数据升序排列,并且输入数组int a[n],b[n]的元素,用数组a和b构造数组c[n],使: 用VB编写一个程序,计算出给定的10*10矩阵（存放在二维数组A中）每行元素的最大值和每列元素的最小值整型数组a中有10个元素,整型数组b中有6个元素,编程将那些在数组a中而不在数组b的数据组成新数组c并输出定义一个整型数组a,a包括20个元素,每五个元素求平均值,将平均值放入数组b中,将b中元素输出.要不该大挂了啊!用C编的