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

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

有下列函数过程:Function funl(ByVal x As Integer, ByVal y As Integer) Do While y 0 Reminder=x Mody x=y y=reminder Loop Funl=xEnnd Function在下列按钮单击事件中调用该函数,则该程序的运行结果是 Privatr Sub Commandl_Click() Dim a As IntegerDim b As Integer a=100 b=25 x=funl(a,b) Print x End Sub

A.0

B.25

C.50

D.100


参考答案

更多 “ 有下列函数过程:Function funl(ByVal x As Integer, ByVal y As Integer) Do While y 0 Reminder=x Mody x=y y=reminder Loop Funl=xEnnd Function在下列按钮单击事件中调用该函数,则该程序的运行结果是 Privatr Sub Commandl_Click() Dim a As IntegerDim b As Integer a=100 b=25 x=funl(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

考题 若m,x,y,均为Integer型变量,则执行下面语句后m值是()m=1:X=2:Y=3m=IIf(X>Y,X+Y,X-Y)() A.-1B.0C.1D.2

考题 下列语句中,错误的是(x,y,a,b假设已经定义好)A.while(x=y)5;B.do x++ while(x==10);C.while(0);D.do 2;while(a==b);

考题 下列语句中,句法错误的是(不考虑语义)( )A.while(x=y)5 ;B.do x++ while(x==10) ;C.while(0);D.do 2;while(a==b);

考题 main( ){ int x=31,y=2,s=0;do{ s-=x*y;x+=2;y-=3;} while( x%3==0);printf(“x=%d\ty=%d\ts=%d\n”,x,y,s);}

考题 下列代码段执行后,x的值为()。 int x = 0,y = 10; do{ x +=2; y -=3; }while(y > 0);A.12B.10C.8D.6

考题 4、下列代码段执行后,x的值为()。 int x = 0,y = 10; do{ x +=2; y -=3; }while(y > 0);A.12B.10C.8D.6

考题 下列循环语句中有语法错误的是 。A.while(x=y) 5;B.while(0);C.do 2 while(x= =b);D.do x++; while(x= =10);

考题 24、下列循环语句中有语法错误的是 。A.while(x=y) 5;B.while(0);C.do 2 while(x= =b);D.do x++; while(x= =10);

考题 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