问题
填空题
下面程序的功能是计算给定正整数序列中奇数之和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)。