有下列程序段，单击命令按钮执行程序后，输出结果为( )。
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

题库:计算机等级考试 类型:最佳选择题 时间:2017-07-03 15:44:51 免费下载:《单项选择》Word试卷

有下列程序段，单击命令按钮执行程序后，输出结果为( )。
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

本题关键词:程序,出门按钮,输出结果,竣工结算程序,行政诉讼程序,单位工程验收程序,单位工程施工程序,行为结果,工程施工程序,复苏程序;