某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下：程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是（ ） 。A. 语句max=1应改为max=a(1)B. 语句For k=2 To 10应改为For k=1 To 10C. If语句中的条件a(k)a(max)应改为a(k)maxD. 语句MaxValue=max应改为MaxValue=a(max)
某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下：
程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是（ ） 。
A. 语句max=1应改为max=a(1)
B. 语句For k=2 To 10应改为For k=1 To 10
C. If语句中的条件a(k)>a(max)应改为a(k)>max
D. 语句MaxValue=max应改为MaxValue=a(max)
相关考题：
以下函数 findmax 拟实现在数组中查找最大值并作为函数值返回 ， 但程序中有错导致不能实现预定功能#define MIN -2147483647int findmax (int x[],int n){ int i,max;for(i=0;in;i++){ max=MIN;if(maxx[i]) max=x[i];}return max;}造成错误的原因是A) 定义语句 int i,max; 中 max 未赋初值B) 赋值语句 max=MIN; 中，不应给 max 赋 MIN 值C) 语句 if(maxx[i]) max=x[i]; 中判断条件设置错误D) 赋值语句 max=MIN; 放错了位置
（ 31 ）某人编写了一个能够返回数组 a 中 10 个数中最大数的函数过程，代码如下：Function MaxValue(a() As Integer) As IntegerDim max%max=1For k = 2 To 10If a(k)a(max) Thenmax = kEnd IfNext kMaxValue = maxEnd Function程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是A ）语句 max = 1 应改为 max = a(1)B ）语句 For k = 2 To 10 应改为 For k = 1 To 10C ） If 语句中的条件 a(k)a(max) 应改为 a(k)maxD ）语句 MaxValue = max 应改为 MaxValue = a(max)
（ 34 ）某人设计了下面的函数 fun ，功能是返回参数 a 中数值的位数Function fun(a As Integer) As IntegerDim n%n = 1While a \ 10 = 0n = n + 1a = a \ 10Wendfun = nEnd Function在调用该函数时发现返回的结果不正确 ， 函数需要修改 ， 下面的修改方案中正确的是A ） 把语句 n = 1 改为 n = 0B ） 把循环条件 a \ 10 = 0 改为 a \ 10 0C ） 把语句 a = a \ 10 改为 a = a Mod 10D ） 把语句 fun = n 改为 fun = a
D）DEFABC（32）某人为计算 n!(0n=12)编写了下面的函数过程：Private Function fun(n As Integer) As LongDim p As Longp=1For k=n-1 To 2 Step-1p=p*kNext kfun=pEnd Function在调试时发现该函数过程产生的结果是错误的，程序需要修改。下面的修改方案中有3 种是正确的，错误的方案是（ ）。A）把 p=1 改为 p=nB）把 For k=n-1 To 2 Step-1 改为 For k=1 To n-1C）把 For k=n-1 To 2 Step-1 改为 For k=1 To nD）把 For k=n-1 To 2 Step-1 改为 For k=2 To n
某人为计算n!(0n=12)编写了下面的函数过程：Private Function fun(n As Integer)As LongDim P As LongP=1For k=n-1 To 2 Step-1P=P*kNext kfun=PEndFunction在调试时发现该函数过程产生的结果是错误的，程序需要修改。下面的修改方案中有3种是正确的，错误的方案是A．把P=1改为P=nB．把For k=n-1 To 2 Step-1改为For k=1 To n-lC．把For k=n-1 T02 Step-1改为Fork=1 To nD．把For k=n-1 To 2 Step-l改为FOr k=2 To n
某人编写了下列程序，用来求10个整数(整数从键盘输入)中的最大值： Private Sub Command1_Click() Dim a(10) As Integer, max As Integer For k=1 To 10 a(k)=InputBox("输入一个整数") Next k max=0 For k=1 To 10 If a(k)＞max Then max=a(k) End If Next k Print max End Sub 运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的。程序需要修改。下列修改中可以得到正确运行结果的是( )。A．把Ifa(k)＞max Then 改为 If a(k)＜max ThenB．把max=a(k)改为a(k)=maxC．把第2个循环语句For k=1 To 10改为For k=2 To 10D．把max=O改为max=a(10)
为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click a％=10：b％=20 Call swap(a，B．：Print a，b End Sub Private Sub swap(ByVal aAs Integer，ByVal bAs Integer) c=a：a=b：b=c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是。 A．调用swap过程的语句错误，应改为：Call swap a，b B．输出语句错误，应改为：Print “a”，“b” C．过程的形式参数有错，应改为：swap(ByRef a As Integer，ByRef b As Integer) D．swap中3条赋值语句的顺序是错误的，应改为a=b：b=c：c=a
某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下： Function MaxValue(aAsInteger)As Integer Dim max％：max=1 For k=2 TO 10 If a(k)a(max)Then max=k End lf Next k MaxValue=max End Function 程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是。 A．语句max=1应改为max=a(1) B．语句For k=2 TO 10应改为For k=1 TO 10 C．If语句中的条件a(k)a(max)应改为a(k)max D．语句MaxValue=max应改为MaxValue=a(max)
某人设计了下面的函数fun，功能是返回参数a中数值的位数： Function fun(a AS Integer)AS Integer Dim n％ N=1 While a＼10=0 N=n+l：a=a＼l0 Wend Fun=n End Function 在调用该函数时发现返回的结果不正确，函数需要修改，下面的修改方案中正确的是。 A．把错句n=1改为n=0 B．把循环条件a＼l0=0改为a＼l00 C．把语句a=a＼l0改为a=a Mod 10 D．把语句fun=n改为fun=a