网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

有如下函数过程: Function Fun (By Val x As Ingeger, 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 Command1_Click() Dim a As Integer Dim b As Integer a=100:b=25 x=Fun(a,b)Print x End Sub

A.0

B.25

C.50

D.100


参考答案

更多 “ 有如下函数过程: Function Fun (By Val x As Ingeger, 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 Command1_Click() Dim a As Integer Dim b As Integer a=100:b=25 x=Fun(a,b)Print x End SubA.0B.25C.50D.100 ” 相关考题
考题 program exam(output); var x,y,x:integer; proedure silly(x:integer;vary:integer); begin x:=5;y:=6;z:=3; writeln(x,y,z) end; begin x:=1;y:=2;z:=3; silly(x,y); writeln(x,y,z) end. 以上程序运行结果为(). A567 563B567 567C567 167D567 163

考题 有下列函数定义: int fun(double a,double b) {return a*b;} 若下列选项中所用变量都已经正确定义并赋值,错误的函数调用是( )。A.if(fun(x,y)){……}B.z=fun(fun(x,y),fun(x,y));C.z=fun(fun(X,y)x,y);D.fun(x,y);

考题 假设已定义Integer变量x、y,则以下赋值语句正确的是( )。 A.x+1=yB.x:=yC.y=x+yD.1=x

考题 有下列函数定义: int fun(double a,double B) {return a*b;} 若下列选项中所用变量都已正确定义并赋值,错误的函数调用是( )。A.if(fun(x,y)){……}B.z=fun(fun(x,y),fun(x,y));C.z=fun(fun(x,y)x,y);D.fun(x,y);

考题 有下列函数定义:int fun(double a,double B){return a*b;}若下列选项中所用变量都已正确定义并赋值,错误的函数调用是( )。A.if(fun(x,y)){……}B.z=fun(fun(x,y),fun(x,y));C.z=fun(fun(x,y)x,y);D.fun(x,y);

考题 有下列函数定义: int fun(double a,double b) {return a*b;} 若下列选项中所用变量都已正确定义并赋值,错误的函数调用是( )。A.if(fun(x,y)){……}B.z=fun(fun(x,y),fun(x,y));C.z=fun(fun(x,y)x,y);D.fun(x,y);

考题 若有函数fun(x,y),并且已经使函数指针变量p指向函数fun,则使用p调用函数fun的正确方法是( )。A.(*p)fun(x,y);B.*pfun(x,y);C.(*p)(x,y)D.*p(x,y)

考题 有以下函数定义: int fun(double a,doubleB){return a*b;} 若以下选项中所用变量都已正确定义并赋值,错误的函数调用是( )。A.if(fun(x,y)){……}B.z=fun(fun(x,y),fun(x,y));C.z=fun(fun(x,y)x,y);D.fun(x,y);

考题 有下列函数定义:int fun(double a,double b) {return a*b;} 若下列选项中所用变量都己正确定义并赋值,错误的函数调用是( )。A.if(fun(x,y)){……}B.z=fun(fun(x,y),fun(x,y));C.z=fun(fun(x,y)x,y);D.fun(x,y);

考题 11、下面哪些定义是类型正确的?A.f :: (Integer, Integer) - Float f (x,y) = x / yB.f :: (Integer, Integer) - Float f (x,y) = (fromInteger x) / (fromInteger y)C.f :: (Integer, Integer) - Float f (x,y) = 3*x + yD.f :: (Integer, Integer) - Integer f (x, y) = 3*x + y