Question

求1*2*3*4+3*4*5*6+5*6*7*8+…+97*98*99*100的值

Answer 1

VB

Sub 计算4连数积和()

'

' 计算4连数积和 Macro

' 宏在 2013-6-18 由 QianYi

'

s = 0

For k = 1 To 49

s = s + (2 * k - 1) * 2 * k * (2 * k + 1) * (2 * k + 2)

Next

MsgBox s

End Su