2. 计算机
  3. 有下列程序段，单击命令按钮执行程序后，输出结果为( )。 Option Base 1 Private Sub Command1_Click() Dim x x=Array(23，-5，17，38，-31，46，11，8，5，-4)

有下列程序段，单击命令按钮执行程序后，输出结果为( )。 Option Base 1 Private Sub Command1_Click() Dim x x=Array(23，-5，17，38，-31，46，11，8，5，-4)

admin2010-03-30  46
问题 有下列程序段，单击命令按钮执行程序后，输出结果为(    )。  Option Base 1  Private Sub Command1_Click()  Dim x    x=Array(23，-5，17，38，-31，46，11，8，5，-4)    s1=0    s2=0    For k=1 To 10       If(x(k)＞0)Then          s1=s1+x(k)       Else          s2=s2+x(k)       End If    Next k    Y=s1/Abs(s2)    Print Y  End Sub
选项 A、148
B、40
C、-40
D、3.7
答案8
解析 For循环中，通过两个条件语句，计算数组中大于零的元素的和s1，小于零的元素的和s2，然后计算s1和s2的绝对值之商，正确结果为3.7。 [知识拓展]Abs函数的作用是返回参数的绝对值，其返回值的类型和参数相同。
转载请注明原文地址:https://kaotiyun.com/show/Rd1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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