设有以下函数过程: Functio fun(m As Integer) As Integer Dim k As Integer, sum As Integer sum=0 For k=m To 1 Ste

admin2010-03-30  28

问题 设有以下函数过程:
   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。
转载请注明原文地址:https://jikaoti.com/ti/Ckg0FFFM
0

最新回复(0)