关于VB的矩阵问题

来源：百度知道 编辑：UC知道 时间：2024/05/27 09:25:02
一题编写一个程序，求出5X5方阵中每行最小数并输出
二题输入一个3X4距阵要求：
1将距阵转置
2输出距阵的上三角距阵
3输出距阵的非零元素之和
4将距阵中各元素按列的次序放到一个一维数组中并输出

希望有多种解法

1.题
dim i,j as interge
dim min as interge
dim a(1 to 5,1 to 5) as interge

for i=1 o 5
min=a(i,1)
for j=1 to 5
if a(i,j)<min then min=a(i,j)
next j
print min
next i

二.题
dim i,j as interge
dim min as interge
dim a(1 to 3,1 to 4) as interge
dim b(1 to 4,1 to 3) as interge
dim Out(1 to 12） as interge
'1
for i= 1 to 3
for j=1 to 4
b(j,i)=a（i,j)
next j
next i
’2
矩阵不是对称的不知道怎么输出上三角
是输出5X5 的吧
for i=1 to 5
for j= 1 to 5
'2
if j<=i then print a(i,j)
'3
if a(i,j)<>0 then Sum=Sum +a(i,j)
'4
n=N+1
Out(n)=a(i,j)
next j
next i