【简答题】下面程序的功能是找出给定的10个数中最大的一个数,最后输出这个数以及它在原来 10个数中的位置。请在下划线处填入适当的内容,将程序补充完整。 Option Base 1 Private SubForm_Cfick() Dim X x=Array(23,-5,17,38,-31,46,11,8,5,-4) Max=1 k=1 10 k=k+1 ifx(k)>x(max)then [13] End i...
【简答题】下面程序的功能是找出给定的12个数中最大的一个数,然后输出这个数以及它在原来12个数中的位置。请在下划线处填入适当的内容,将程序补充完整。 Option Base 1 Private Sub Form_Click0 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(M...