阅读下列程序: Function func(n As Integer)As Integer Sum = 0 For i = 1 To n S

admin2009-02-13  32

问题 阅读下列程序:          Function func(n As Integer)As Integer               Sum = 0                For i = 1 To n                     Sum = Sum + (i + 1)* i               Next i                func = Sum         End Function.Private Sub Command1_Click ()               Dim a As Integer               a= 5               s = func (A)Print s          End Sub     程序运行后,单击命令按钮,输出的结果为

选项 A、80
B、60
C、70
D、15

答案4

解析 本题调用一个Function过程func,该过程只有一个参数,类型为整型,返回值也为整型。过程的调用十分简单,关键是要搞清楚过程func的功能。从For-Next循环可以看出,该过程的功能是:1×2+2×3+3×4+…+(n+1)×n。在调用过程时,实参a的值为5,即上式中的n =5。因此返回的值为:1×2+2×3+3×4+4×5+5×6 =70。
转载请注明原文地址:https://jikaoti.com/ti/8rq0FFFM
0

最新回复(0)