填空题

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

点击查看答案&解析