设有以下函数过程: Function fun(m As Integer)As Integer Dim k As Integer, sum As Integer sum=0 For k=m To 1 Step-2 sum=sum+k Next k fun=s

admin2009-06-20  27

问题 设有以下函数过程:
Function fun(m As Integer)As Integer
Dim k As Integer, sum As Integer
sum=0
For k=m To 1 Step-2
sum=sum+k
Next k
fun=stlm
End Function
若在程序中用语句s=fun(10)调用此函数,则s的值为【  】。

选项

答案30

解析 在For循环中,Step是用于指定计数器的步长,本题中是—2,就是每执行一次循环后,k的值减2。本题中从10开始执行循环,当k=O时,结束循环。此时s=10+8+6+4+2=30。
转载请注明原文地址:https://kaotiyun.com/show/LN1p777K
0

最新回复(0)