更多"有如下函数: Function fun(a As Integer, "的相关试题:
[单项选择]有如下函数:
Function fun(a As Integer,n As Integer) As Integer
Dim m As Integer
While a>=n
a=a-n
m=m+1
Wend
fun=m
End Function
该函数的返回值是( )
A. a乘以n的乘积
B. a加n的和
C. a减n的差
D. a除以n的商(不含小数部分)
[单项选择]有如下函数过程:
Function Fun(ByVal x As Integer,ByVal y As Integer)As Integer
Do While y<>0
reminder=x Mod y
x=y
y=reminder
Loop
Fun=x
End Function
以下调用函数的事件过程,该程序的运行结果是( )。
Private Sub Command7_Click( )
Dim a As Integer,b As Integer
a=100:b=25
x=Fun(a,B)
Print X
End Sub
A. 0
B. 25
C. 50
D. 100
[单项选择]有如下函数过程:
Function fun1(By Val x As Integer,By Val y As Integer)As Integer
Do While y<>0
reminder=x Mod y
x=y
y=reminder
Loop
fun1=x
End Function
在下列按钮单击事件中调用该函数,则该程序的运行结果是( )。
Private Sub Command1_CliCk( )
Dim a As Integer
Dim b As Integer
a=100
b=25
x=fun1(a,b)
Print x
End Sub
A. 0
B. 25
C. 50
D. 100
[单项选择]有如下一个函数过程:
Function Fun(a As Integer)
Stcitic C
b=0:b=b+1:c=c+1
Fu n=a+b+c
End Function
在窗体上添加一个命令按钮,事件过程如下:
Private Sub Command1_Click( )
Dim a As Integer
a=2
For i=1 To 3
Print Fun(A):
Next
End Sub
运行该程序,单击命令按钮,输出结果是( )。
A. 4 4 4
B. 4 5 6
C. 6 7 8
D. 4 7 9
[单项选择]设有以下函数过程:
Function fun(a As Integer,b As Integer)
Dim c As Integer
If a<b Then
c=a:a=b:b=c
End If
c=0
Do
c=c+a
Loop Until c Mod b=0
fun=c
End Function
若调用函数fun时的实际参数都是自然数,则函数返回的是______。
A. a、b的最大公约数
B. a、b的最小公倍数
C. a除以b的余数
D. a除以b的商的整数部分
[单项选择]设有以下函数过程
Private Function Fun(a( )As Integer,b As String) As Integer
End Function
若已有变量声明:
Dim x(8)As Integer,n As Integer,m As String
则下面正确的过程调用语句是______。
A. x(0)=Fun(x,"m")B) n=Fun(n,m)
B. Call Fun x, "m"D) n=Fun(x(8) ,m)
[单项选择]
设有以下函数过程
Private Function Fun(a()As Integer,b As String)AsInteger
End Function
若已有变量声明:
Dim x(5)as Integer,n As Integer,ch As String
则下面正确的过程调用语句是()。
A. x(0)=Fun(x, "ch")
B. n=Fun(n, ch)
C. Call Fun x, "ch"
D. n=Fun(x(5), c
[单项选择]有如下函数过程:
Function 1j(x As Integer)As Long
Dim S As Long
Dim i As Integer
s=0
For i=1 To X
s=s+i
Next i
1j=s
End Fundion
在窗体上添加一个命令按钮,名为Command1,编写事件过程调用该函数,输出结果为( )。
Private Sub Command1_Click( )
Dim i As Integer
For i=1 To 5
sum=sum+1j(i)
Next i
Print sum
End Sub
A. 25
B. 35
C. 45
D. 55
[单项选择]已知递归函数fun的定义如下:
int fun(int n)
if(n<=1)return 1;//递归结束情况
else return n*fun(n-2);//递归
则函数调用语句fun(5)的返回值是( )。
A. 5
B. 12
C. 15
D. 30
[单项选择]已知递归函数fun的定义如下:
int fun(int n)
if(n<=1)return1;//递归结束情况
else return n*fun(n-2);//递归
则函数调用语句fun(5)的返回值是( )。
A. 5
B. 12
C. 15
D. 30
[单项选择]阅读程序:
Function Fun(a As Integer)
Static C
b=0:b=b+2:c=c+2
F=a*b*c
End Function
Private Sub Command1_Click( )
Dim a As Integer
a=2
For i=1 To 2
Print Fun(
A. ;
B. 9 18
C. 10 20
D. 7 14
[单项选择]阅读程序:
Function Fun(a As Integer)
Static C
b=0:b=b+2:c=c+2
Fun=a*b*c
End Function
Private Sub Command1_Click( )
Dim a As Integer
a=2
For i=1 To 2
Print Fun(A):
Next
End Sub
运行上面的程序,单击命令按钮,输出结果为( )。
A. 8 16
B. 9 18
C. 10 20
D. 7 14
[单项选择]设有如下函数:
fun(floatx)
x*=x++;
printf("%d/n",x);
return(x);
则函数的类型是______。
A. float
B. void
C. int
D. 无法确定
[单项选择]程序中对fun 函数有如下说明
void *fun( );
此说明的含义是
A. fun 函数无返回值
B. fun 函数的返回值可以是任意的数据类型
C. fun 函数的返回值是无值型的指针类型
D. 指针fun 指向一个函数,该函数无返回值