[填空题] 设有以下函数过程： Functio fun(m As Integer) As Integer Dim k As Integer， sum As I

[填空题] 设有以下函数过程： 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。