[填空题] 下面程序的功能是计算给定正整数序列中奇数之和y与偶数之和x,最后输出x平方根与 y平方根的乘积。请在画线处填上适当的内容使程序完整。
Private Sub Form_Click()
a=Array(3,6,8,11,64,13,24,9,42,35,22)
y=Fun1(a)
print y
End Sub
Private Function Fun1(b)
x=0:y=0
for k=0 to 10
If 【9】 Mod 2=0 then
x=x+b(x)
else
y=y+b(x)
End If
Next
Fun1=Sqr(x)*Sqr(y)
End Function
参考答案:
a(0)问题解析:
数据的奇偶性,在默认的情况下数组的下标从0开始,所以填a(0)。

![[填空题] 下面程序的功能是计算给定正整数序列中奇数之和y与偶数之和x,最后输出x平方根与 y平方根的乘积。请在画线处填上适当的内容使程序完整。 Private Sub Form_Click()a= [填空题] 下面程序的功能是计算给定正整数序列中奇数之和y与偶数之和x,最后输出x平方根与 y平方根的乘积。请在画线处填上适当的内容使程序完整。 Private Sub Form_Click()a=](http://www.mshxw.com/aiimages/31/256430.png)
