某人编写了一个能够返回数组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