“编制通用函数过程,计算Double 类型一维数组所有元素的平均值"怎样用V
答案:1 悬赏:80
解决时间 2021-03-14 16:39
- 提问者网友:几叶到寒
- 2021-03-13 22:30
“编制通用函数过程,计算Double 类型一维数组所有元素的平均值"怎样用V
最佳答案
- 二级知识专家网友:平生事
- 2021-03-13 22:53
Function Average(mySinge() As Single) As Single
Dim sn As Single
Dim cn As Integer, i As Integer
cn = UBound(mySinge) - LBound(mySinge) + 1
For i = LBound(mySinge) To UBound(mySinge)
sn = sn + mySinge(i)
Next i
Average = sn / cn
End Function
Dim sn As Single
Dim cn As Integer, i As Integer
cn = UBound(mySinge) - LBound(mySinge) + 1
For i = LBound(mySinge) To UBound(mySinge)
sn = sn + mySinge(i)
Next i
Average = sn / cn
End Function
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯
• 手机登qq时,显示手机磁盘不足,清理后重新登 |
• 刺客的套装怎么选啊? |