2. 计算机
  3. 下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及它在原来12个数中的位置。请填空。 Option Base 1 Private Sub Form_Click() Dim x x=Array(57，-9，

下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及它在原来12个数中的位置。请填空。 Option Base 1 Private Sub Form_Click() Dim x x=Array(57，-9，

admin2010-03-30  69
问题 下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及它在原来12个数中的位置。请填空。
   Option Base 1
   Private Sub Form_Click()
   Dim x
       x=Array(57，-9，17，42，-31，46，11，8，6，-4，3，90)
       Max=1
       For k=2 To 10 Step 1
          If x(k)＞x(Max)Then
             ______
          End If
       Next k
       y=______
       Print Max，y
   End Sub
选项
答案Max=k , x(Max)
解析 在数组中查找多个数中最大的数的算法是：首先设变量 Max为1，从第一个数组元素开始与x(Max)对比，如果数组元素大于 x(Max)，则Max记录该数组元素的下标，比较完后，Max记录了最大数的下标。所以第1个横线处，应填写Max=k，用Max记录较大数的下标：第2个横线处，用y来存储元素的最大值。
转载请注明原文地址:https://kaotiyun.com/show/Qd1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)