arrays - 与倒置位置对角线求和数组

Question

如何对数组求和，数组可能是10x10或2x2或3x3

1 2 3
1 2 3
1 2 3

我想从[1,3]end开始对倒置对角线求和，[3,1]但我们想考虑数组的长度可能会改变。

Answer 1

像这样的事情应该这样做（假设你的 Array 被称为x）：

    Dim Sum As Double = 0

    For i = 0 To UBound(x, 2)
        Sum += x(UBound(x, 2) - i, i)
    Next

Answer 2

假设您的数组始终是方形的（即 2x2、6x6、200x200 等），那么以下伪代码将产生您所追求的结果：

x = [square array]
i = 0
j = x.length - 1
sum = 0

while (i < x.length)
    sum += x[j--][i++]