有以下通用过程： Function fun(N As Integer) 　　s＝0 　　For k＝1 To N 　　　　　　s＝s＋k *(k＋1) 　　Next k 　　fun＝s End Function 该过程的功能是(　　)。

admin2015-08-28 106

问题有以下通用过程：
Function fun(N As Integer)
　　s＝0
　　For k＝1 To N
　　　　　　s＝s＋k *(k＋1)
　　Next k
　　fun＝s
End Function
该过程的功能是(　　)。

选项 A、计算N！
B、计算1＋2＋3＋...＋N
C、计算1×2×2×3×3×... ×N×N
D、计算1×2＋2×3＋3×4＋...＋N×(N＋1)