2. 计算机
  3. 下面程序的功能是计算给定正整数序列中奇数之和y与偶数之和x，最后输出x平方根与 y平方根的乘积。请在画线处填上适当的内容使程序完整。 Private Sub Form_Click() a=Array(3，6，8，11，64，13，24，

下面程序的功能是计算给定正整数序列中奇数之和y与偶数之和x，最后输出x平方根与 y平方根的乘积。请在画线处填上适当的内容使程序完整。 Private Sub Form_Click() a=Array(3，6，8，11，64，13，24，

admin2009-03-15  29
问题 下面程序的功能是计算给定正整数序列中奇数之和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【  】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)。
转载请注明原文地址:https://jikaoti.com/ti/VIq0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)