Question

生成10个随机数,求出它们中最大的那个值，并输出

dim a(9) as integer dim max as integer cls print "随机生成的10个数"; randomize for i = _______________ a(i)=——————— next i max=—————— for i =1 to 9 if a(i)>_______then_______ next i print print "最大值是"；max

Answer 1

Dim a(9) As Integer Dim max As Integer Cls Print "随机生成的10个数"; Randomize For i = 0 To 9 '_______________ a(i) = Int(Rnd * 101) '这一句根据随机数范围要求应适当改一下 ——————— Next i max = a(0) '—————— For i = 1 To 9 If a(i) > max Then max = a(i) '_______then_______ Next i Print Print "最大值是"; max 追问： 你好，问一下a（0）是什么意思 回答： 数组的第一个元素。 追问： 能否解释一下啊！只要从max=a（0）开始吧！！拜托了，非常谢谢！！ 回答： 你看max=a(0),的下一句是for i=1 to 9 也就是从下标为一的元素开始，所以给max的初值应该a(0)的值是的值，才能确保全部元素的值在查找最大值时都有比较到。