[填空题] 下列程序的功能是:找出给定的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
[填空题] 下列程序的功能是:找出给定的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来存储元素的最大值。
VIP截止日期:2024-12-31 04:09:15
←请使用支付宝扫码支付VIP截止日期:2024-12-31 04:09:15
←请使用微信扫码支付