我想做一个计算类的程序,过程是这样的:
现有一行一列两组数,例如
891 101 235 437 558
543 a1 a2 a3 a4 a5
671 b1 b2 b3 b4 b5
489 c1 c2 c3 c4 c5
我需要通过计算使得中间的数(a1-c5)每行,每列的和都等于行首和列首的数字,即
a1+a2+a3+a4+a4=543
b1+b2+b3+b4+b5=671
c1+c2+c3+c4+c5=489
a1+b1+c1=891
a2+b2+c2=101
a3+b3+c3=235
a4+b4+c4=437
a5+b5+c5=558
这中间当然要判断原始行,列中的数是否为空等,请问这个程序在VB中怎么写?
现有一行一列两组数,例如
891 101 235 437 558
543 a1 a2 a3 a4 a5
671 b1 b2 b3 b4 b5
489 c1 c2 c3 c4 c5
我需要通过计算使得中间的数(a1-c5)每行,每列的和都等于行首和列首的数字,即
a1+a2+a3+a4+a4=543
b1+b2+b3+b4+b5=671
c1+c2+c3+c4+c5=489
a1+b1+c1=891
a2+b2+c2=101
a3+b3+c3=235
a4+b4+c4=437
a5+b5+c5=558
这中间当然要判断原始行,列中的数是否为空等,请问这个程序在VB中怎么写?
在a1,a2,a3,a4,a5中a1要是最大的,其次是a5,a4,a3,a2
for i=1 to n
for j=1 to m
a(i,0)=a(i,0)+a(i,j)
next j
next ifor i=1 to m
for j=1 to n
a(0,i)=a(0,i)+a(i,j)
next j
next i