作业帮 > 综合 > 作业

VB程序:将10个数12,23,10,8,6,45,56,7,16,30存入数组中,输出其中最大值及其所在位置

来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/06/17 00:18:09
VB程序:将10个数12,23,10,8,6,45,56,7,16,30存入数组中,输出其中最大值及其所在位置
VB程序:将10个数12,23,10,8,6,45,56,7,16,30存入数组中,输出其中最大值及其所在位置
a = Array(12, 23, 10, 8, 6, 45, 56, 7, 16, 30)
c = UBound(a) - 1
For i = 0 To c
If a(i) > m Then
m = a(i)
p = i + 1
End If
Next
MsgBox "最大数" & m & " 位置" & p