将3*3的矩阵转置我编了个程序
来源:学生作业帮 编辑:搜狗做题网作业帮 分类:综合作业 时间:2024/07/15 13:58:04
将3*3的矩阵转置我编了个程序
Private Sub Form_click()
Dim a(1 To 3,1 To 3),i As Byte,j As Byte,t As Byte
For i = 1 To 3
For j = 1 To 3
a(i,j) = Val(InputBox("a(" & i & "," & j & ")=?"))
Next j
Next i
For i = 2 To 3
For j = 1 To i - 1
t = a(i,j):a(i,j) = a(j,i):a(j,i) = t
Next j
Next i
For i = 1 To 3
For j = 1 To 3
Print a(j,i);
Next j
Print
Next i
End Sub
为什么输出的还是原来的矩阵,没有转置呢?
Private Sub Form_click()
Dim a(1 To 3,1 To 3),i As Byte,j As Byte,t As Byte
For i = 1 To 3
For j = 1 To 3
a(i,j) = Val(InputBox("a(" & i & "," & j & ")=?"))
Next j
Next i
For i = 2 To 3
For j = 1 To i - 1
t = a(i,j):a(i,j) = a(j,i):a(j,i) = t
Next j
Next i
For i = 1 To 3
For j = 1 To 3
Print a(j,i);
Next j
Next i
End Sub
为什么输出的还是原来的矩阵,没有转置呢?
因为你输出时又转置了一下……
For i = 1 To 3
For j = 1 To 3
Print a(j,i);'
For i = 1 To 3
For j = 1 To 3
Print a(j,i);'
将3*3的矩阵转置我编了个程序
VB矩阵转置.编写程序将2*3的矩阵转置,即转换成3*2的矩阵.
、矩阵转置.编写程序将2*3的矩阵转置,即转换成3*2的矩阵.【提示】使用两个二维数组来完成.求程序
编一个程序,用成员函数重载运算符“+”和“-”,将两个矩阵(这两个矩阵均为2行3列)相加和相减.
编写程序实现,随机生成3*3矩阵(元素值在0~100之间的整数)并将矩阵转置
请编程序计算并输出整数矩阵周边元素除外的个元素之和,矩阵的维数是7*4
用JAVA编写程序求1+3+7+…+(2的20次幂-1)的值 我编的程序哪错了?
有一个2行4列的矩阵,要求编程序求其中平均值.( 此矩阵为a[2][4]={ 4, 8, 3,5,7
编一个程序,用C++实现矩阵的cholesky分解
编了个“从键盘输入一个3*4整数矩阵,要求输出其最大元素的值,以及它的行号和列号.”,错了,
C语言 矩阵转置编写程序 将4*4大小的矩阵转置 矩阵的数据:1234567890121234越简单越好··还有一个:输
谁给我几个编椭圆的宏程序,最好带图的!3Q