主题：转置后的临时表怎么用

此主题相关图片如下：qq图片20181129174418.png

你要弄懂计算方式。

 

两线的纵坐标的差值的绝对值，就是所求内容。

 

比如 p7的计算，p线的合计值是10，而p7是第3列，找到合计列为2的行，是第14行。那么 10-(14-1)=-3 取绝对值，就是3

 

比如 p1的计算，p线的合计值是8，而p1是第6列，找到合计列为5的行，是第7行。那么8-(7-1)=2

 

比如 p4的计算，p线的合计值是9，而p4是第4列，找到合计列为3的行，是第13行。那么 9-(13-1)=-3

 

最后，你把各个列的值相加，就是所求。也就是循环每一个列计算。

甜老师，这样的公式好像不对。

不知用什么方法计算

感觉像是初中算术题

 

公式没问题

 

p8的合计=4，第10列，合计为9的行是第2行，abs（4-（2-1））= 3

 

汗，很简单的问题啊。

 

Dim ps() As Double = {4,5,6,7,8,8,9,10,11,12}
Dim ss() As String = {10,9,8,7,6,6,5,5,5,5,4,4,3,2,1,0}

For i As Integer = 1 To ps.length
    Dim idx = array.Indexof(ss, cstr(ps.length-i))
    Dim s As Double = math.Abs(ps(i-1)-(idx))
    output.show(ps.length-i+1 & " " & s)
Next

 

如果还有疑问，请具体说明。

帮我看看，老甜