τ_m是反映机电传动系统（）的物理量。

若要在子过程Procl调用后返回两个变量的结果，下列过程定义语句中有效的是( )。

A．Sub Proc1(n，m)

B．Sub Proc1(ByVal n，m)

C．Sub Proc1(n，BYVal m)

D．Sub Proc1(ByVal n，ByVal m)

以下程序的运行结果是

sub（int x,int y,int *z）

{*z=y-x;}

main（）

{ int a,b,c;

sub（10,5,&a）;

sub（7,a,&b）;

sub（a,b,&c）;

printf（"M,M,M＼n",a,b,c）;}

A．5,2,3

B．-5,-12,-7

C．-5,-12,-17

D．5,-2,-7

（ 33 ）若要在子过程 Procl 调用后返回两个变量的结果，下列过程定义语句中有效的是

A Sub Procl(n,m)

B Sub Procl(ByVal n,m)

C Sub Procl(n,ByVal m)

D Sub Procl(ByVal n,ByVal m)

若有如下程序： int sub(int m) { if(m==1||m==0) return 2; else return(sub(m-1)*sub(m-2));} main() { int n; scanf("%d",&n); printf("%d",sub(n)); } 如果从键盘输入4＜回车＞，则程序运行后的输出结果是( )。

A．8

B．16

C．24

D．32

下面过程运行后，变量N的值为( )。 PRIVATE SUB MAINSUB( ) DIM N AS INTEGER N=9 CALL GET. DATA(N) END SUB PRIVATE SUB GETDATA(BYREF M AS INTEGER) M=M*3+SC-N(-9) END SUB

A．25

B．26

C．27

D．28

若要在子过程Procl调用后返回两个变量的结果，下列过程定义语句中有效的是______。

A．Sub Procl(n, m)

B．Sub Procl(ByVal n, m)

C．Sub Procl(n, ByVal m)

D．Sub Procl(ByVal n, ByVal m)

运行以下程序后，输出结果为_____________。 Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub:";p;m;n End Function

：A. sub:2 6 4 main:1 2 3

B. sub:2 6 4 main:2 2 3

C. sub:2 6 4 main:2 6 4

D. sub:2 6 4 main:1 6 4

有一过程如下:

Sub Sub1(m As Integer,total As Long)

Dim i As Integer

total=1

For i=1 To m

total=total*i

Next

End Sub

调用它的事件过程如下:

Private Sub Command1_Click()

Dim tot As Long,a As Integer

a=Val(InputBox("请输入数据"))

Call Sub1(a,tot)

Print tot

End Sub

则输入数据5,运行结果为【 】。

有如下程序： Private Sub Commandl_Click( ) Dim i As Integer For i=1 To 2 DS Next i End Sub Sub DS( ) Dim x As Integer，m As String Static y，n X=X + 1 y=y + 1 m=m &"*”：n=n&"#" Print x，y，m，n End Sub 程序运行后，输出的结果是

A．1 1 * #

B．1 1 * #

C．1 1 * # 1 1 * # 1 2 * #

D．1 1 * # 1 1 * ## 1 2 * ##

下面程序的输出结果是( )。 #include"stdio.h" int sub(int m) { static a=4; a+=m; return a; } void main() { int i=2,j=1,k; k=sub(i); k=sub(j); printf("%d",k); }

A．6

B．7

C．8

D．9