下列程序的功能是：单击窗体时将求出随机生成的10个两位数中的最大数及其下标 请填空。 Option
下列程序的功能是：单击窗体时将求出随机生成的10个两位数中的最大数及其下标，请填空。 Option Base 1 Private Sub Form_Click() Dim a(10) As Integer，i As Integer Dim max As Integer，max_i As Integer Randomize For i=1 To 10 a(i)=【 】 Next i max=a(1)：max_i=1 For i=1 To 10 If【 】Then max=a(i) max_i=i End If Next i Print max,max_i End Sub
请帮忙给出正确答案和分析，谢谢！
参考解答
435***262
2023-07-21 07:19:45
正确答案：Int(90*Rnd)+10 max＜a(i)
本题通过一个循环给数组的各个元素赋一个两位随机数，两位数的范围为10～99，产生的随机数公式是：Int((99-10+1)*Rnd)+10。求一维数组的最大值及其下标的方法是：首先认为第一个元素a(1)最大，并用一个表示最大值的变量max记下它，用一个表示最大值的下标变量max_i记下它的下标1。然后用最大值max和后面的每个元素比较，如果后面的元素值大，则用max记下它，用max_i记下它的下标。故[13处应填“max＜a(i)”。
相似问题
下面程序的功能是：求出所有的三位数 其各位数字的立方和等于该数。如： 153=13+53+33。 O
下面程序的功能是：求出所有的三位数，其各位数字的立方和等于该数。如： 153=13+53+33。 Option Explicit Private Sub Form_Click() Dim x1 As
下列程序的功能是：当发生窗体的单击事件时 求出3～1000之间的所有素数的和以及所有能被3和5整除的
下列程序的功能是：当发生窗体的单击事件时，求出3～1000之间的所有素数的和以及所有能被3和5整除的数的和(素数是指只能被1和它本身整除的数)，并在窗体
下列程序的功能是求出所有的1～100之间的孪生素数。孪生素数是指两个素数的差为2 如3和5 11和1
下列程序的功能是求出所有的1～100之间的孪生素数。孪生素数是指两个素数的差为2，如3和5，11和13等，请填空。 Private Sub Form_Click() Dim i As
图片按钮的【 】属性用来设置命令按钮无效时显示的图形。请帮忙给出正确答案和分析 谢谢！
图片按钮的【 】属性用来设置命令按钮无效时显示的图形。请帮忙给出正确答案和分析，谢谢！
在窗体上画一个列表框 然后编写如下两个事件过程： Private Sub Form_Click()
在窗体上画一个列表框，然后编写如下两个事件过程： Private Sub Form_Click() List1．RemoveItem 1 List1．Removeltem 3 List1．RemoveItem 1
