VB 输入一个3行4列的二维数组,分别求出每一行、每一列元素之和 要求
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/16 00:12:27
VB 输入一个3行4列的二维数组,分别求出每一行、每一列元素之和 要求
你可以将行列算出的值用一个数组接收,这里是采用变量接收的方式.
Option Compare Database
Private Sub aa()
Dim h1, h2, h3, l1, l2, l3, l4, i, j As Integer
Dim a(2, 3) As Integer
For i = 0 To 2
For j = 0 To 3
a(i, j) = Int(InputBox("输入a(" & i & "," & j & ")的值", "输入"))
Next
Next
For i = 0 To 3
h1 = h1 + a(0, i) '计算第一行
h2 = h2 + a(1, i) '计算第二行
h3 = h3 + a(2, i) '计算第三行
Next
For j = 0 To 2
l1 = l1 + a(j, 0) '计算第一列
l2 = l2 + a(j, 1) '计算第二列
l3 = l3 + a(j, 2) '计算第三列
l4 = l4 + a(j, 3) '计算第四列
Next
Print h1, h2, h3, l1, l2, l3, l4
End Su
Option Compare Database
Private Sub aa()
Dim h1, h2, h3, l1, l2, l3, l4, i, j As Integer
Dim a(2, 3) As Integer
For i = 0 To 2
For j = 0 To 3
a(i, j) = Int(InputBox("输入a(" & i & "," & j & ")的值", "输入"))
Next
Next
For i = 0 To 3
h1 = h1 + a(0, i) '计算第一行
h2 = h2 + a(1, i) '计算第二行
h3 = h3 + a(2, i) '计算第三行
Next
For j = 0 To 2
l1 = l1 + a(j, 0) '计算第一列
l2 = l2 + a(j, 1) '计算第二列
l3 = l3 + a(j, 2) '计算第三列
l4 = l4 + a(j, 3) '计算第四列
Next
Print h1, h2, h3, l1, l2, l3, l4
End Su
VB 输入一个3行4列的二维数组,分别求出每一行、每一列元素之和 要求
C语言程序设计 定义一个二维数组a[3][4],要求输入12个数每一行从小到大排列,每一列从小到大排列
/*LAB5_2.c:输入一个M行M列的二维数组,分别计算两条对角线上的元素之和*/
输入一个M行M列的二维数组,计算四周元素之和
编程题:利用函数,将一个3行4列的二维数组a的每一列的最大元素放到一个一维的数组中.
输入一个M行M列的二维数组,分别计算两条对角线上的元素之和.M由下面的符号常量定义:
输入一个4行4列的矩阵,分别求出主对角元素之和以及上三角元素之和.
输入4行4列的二维数组,求计算主对角线各元素之和,计算副对角线各元素之和.
输入一个M行M列的二维数组,计算四周元素之和.M由以下符号常量定义:#define M 5
用C语言编程:3行4列的二维数组中输出每一行的最大值怎么编程呀
(1)VB 用随机函数产生20个两位数的整数,存于4行5列的二维数组中,并求出其中的最大元素及它的行、列坐标,将数组按行
请编写函数int fun ,a是一个M行N列的二维数组,函数的功能是求出二维数组周边元素之和,作为函数值返回.