问题
填空题
设有以下函数过程: Functio 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=sum End Function 若在程序中用语句s=fun(10)调用此函数,则s的值为 ______。
答案
参考答案:30
解析: 本题对函数过程的掌握情况。函数过程的功能是以步长为-2,将m到1进行累加,s=fun(10)语句将参数传递给函数过程,故结果为sum=10+8+6+4+2=30。