作业帮 > 综合 > 作业

我想用vb设计一个程序:用一组数中的最大值减去最小值后,再除以这组数的的平均数,不过我不会,谢

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/24 11:39:20
我想用vb设计一个程序:用一组数中的最大值减去最小值后,再除以这组数的的平均数,不过我不会,谢
Dim i, max, min, avg, sum As Integer
For i = 0 to UBound(数组)
If i = 0 Then
min = 数组(0)
max = 数组(0)
End If
If max < 数组(i) then
max = 数组(i)
End if
If min > 数组(i) then
min = 数组(i)
End if
sum = sum + 数组(i)
Next i
Debug.Print cstr((max-min)/(sum/(UBound(数组)+1)))