麻烦各位帮我解答一下这道VB的二级题，谢谢了

2024-11-16 10:56:11

推荐回答（3个）

回答1：

s=fun(10)就是说你传入 funtion fun（m as integer）as integer的值M=10
dim k as integer,sum as integer 定义K,SUM为整形
sum=0 赋予sum的初值为0

for k= m to 1 step -2
sum=sum+k
next k
这是一个循环每循环一次K的值减2 、sum的值由原值加上K的当前值
应为M=10 所以 K从10 到 1循环
K= 10 — 8—6—4—2—0
当K=0时小于下限1 跳出循环
所以sum=sum+k
列出来就是
sum=0
k=10 sum=0+10
k=8 sum=0+10+8
k=6 sum=0+10+8+6
.
.
k=0 K<1跳出for
所以sum=10+8+6+4+2=30
fum =sum 该步骤将fum值等于sum，该值将返回给S
end function

回答2：

同初值为10，循环中 K=10+8+6+4+2 ，最后返回S=30

回答3：

循环中10 + 8 + 6 + 4 + 2=30，循环5次