[填空题] 要打印出50个在-100～100之间不同的随机整数，并找出第几个是最大数。给定的程序不完整，将程序补充完整。 Option Base 1 Private Sub Command1_Click()Dim b()Randomize 【12】 Do x=Rnd If x＞0.5 Then y=1 Else y=-1 t=yInt(Rnd100)+1 【13】 Do While k＜j If t ＜＞ b(k)Thenk = k + 1 ElseExit Do End If L

参考答案：

[12]j=1
[13]k=1
[14]p=1
[15]Max=b(n)

解析：

[分析]：变量j是记录已产生数据的个数，变量k是查找是否有重复时记录用，变量p是记录最大数据的位置。在查找最大数据之前，将数组的第一个下标和数据先记录到p和Max中。

● 参考解析

相关题目:

推荐题目