化学工程
相似问题和答案
第1题：
有以下程序：int sub(int n) { return(n/10+n%10); }void main(){ int x,y; scanf("%d",&x); y=sub(sub(sub(x))); printf("%d\n",y);}若运行时输入：4321<回车>，程序的输出结果是。
n/10是求n的去掉个位数上的数字之外的部分，而n%10是求个位数字，所以函数的功能是将去掉个位外的数和个位相加的结果返回。第一次432+1=433,43+3=46,4+6=10.
第2题：
若要在子过程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)
解析：过程定义时，如果形式参数被说明为传值(ByVal项)，则过程调用只是相应位置实参的值“单向”传递给形参处理，而被调用过程内部对形参的任何操作引起的形参值的变化均不会反馈、影响实参的值。由于这个过程中，数值的传递只有单向性，故称为“传值调用”的“单向”作用形式。反之，如果形式参数被说明为地址(ByRef)，则过程调用是将相应位置实参的地址传给形参处理，而被调用过程内部对形参的任何操作引起形参值的变化又会反而影响实参的值。在这个过程中，数值的传递具有双向性，故称为“传址调用”的“双向”作用形式。ByRef是VBA的缺省选项。本题中要求在子过程Procl调用后返回两个变量的结果，因此采用的是“传址调用”，故为Sub Procl(n, m)。
第3题：
（ 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)
第4题：
以下程序的输出结果是【 】。
main()
{ int x=0；
sub(&x，8，1)；
printf(“%d\n”，x)；
}
sub(int *a，int n，int k)
{ if(k＜＝n)sub(a，n/2，2*k)；
*a+=k；
}
7 解析：在主函数中定义了一个变量x并赋初值0，然后执行函数调用语句，该语句的执行过程为sub(&x,8,1)调用sub(&a,4,2)，sub(&a,4,2)调用sub(&a,2,4)，sub(&a,2, 4)中由于24，所以if后面括号里的判断为假，递归结束，执行其后的*a+=k;语句此时 x=x+k=0+4=4，回退到上一层调用函数sub(&x,4,2)中，执行后面的语句，x=x+k= 4+2=6，再回推到最上一层调用函数sub(&x,8,1)执行后面的语句，x=x+k=6+1=7，所以最后输出7。
第5题：
运行以下程序后，输出结果为_____________。 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
第6题：
若要在子过程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)
解析： 本题考查的是VBA过程调用、参数传递。过程定义时，如果形式参数被说明为传值(ByVal项)，则过程调用只是相应位置实参的值“单向”传递给形参处理，而被调用过程内部对形参的任何操作引起的形参值的变化均不会反馈、影响实参的值。由于这个过程，数值的传递只有单向性，故称为“传值调用”的“单向”作用形式。反之，如果形式参数被说明为地址(ByRef)，则过程调用是将相应位置实参的地址传给形参处理，而被调用过程内部对形参的任何操作引起形参值的变化又会反而影响实参的值。在这个过程中，数值的传递具有双向性，故称为“传址调用”的“双向”作用形式。ByRef是VBA的省略选项。本题中要求在子过程Proc1调用后返回两个变量的结果，因此采用的是“传址调用”，故为Sub Proc1(n，m)。
第7题：
下列程序用来计算1+2+…n,当和大于100时停止计算,请填空。
Private Sub Form_Click()
Dim n as integer,s as integer,I as integer,k as integer
s=0
k=0
n=inputbox(″请输入n的值)
For i=1 to 100
k=k+1
s=s+I
【 】
Next i
Print s
End Sub
if s>100 then exit for 解析：依题意,用变量S来记录1到n的累加和,当累加和S大于100时停止计算,故加入退出循环条件"if s>100 then exit for"
第8题：
1+ + + +…….n 最大的n。请填空
Private Sub Command1__Click（）
Dim s ,m,n AS Integer
m=Val（InputBox（“请输入一个大于100的整数”））
n=_______
s=0
Do While s N=n+1
S=s+n*n
Loop
Print “满足不等式的最大n是_______
End Sub
0 N-1
第9题：
有如下事件过程： Private Sub Command1_Click( ) Dim m AS Integer，n AS Integer m=2：n=1 Print "m="；m；"n="；n Call TOD(m，n) Print "m="；m；"n="；n End Sub Sub TOD(x，y) x=x^2 y=y^3 End Sub 程序运行后，输出的结果为
A．m=2，n=1 m=1，n=2
B．m=2，n=1 m=4，n=1
C．m=1，n=2 m=1，n=4
D．m=1，n=2 m=2，n=4
解析：本题考查的是函数调用和输出语句。定义了一个函数，函数的功能是：将实参传给形参，按址传送，将改变实参的数值，语句x=x^2的作用是将x的平方值赋给x，为4；语句y=y^3的作用是将y的三次方值传给y，为1；然后返回主调过程，输出变化前后的值。
第10题：
有以下程序：
int sub(int n) { return(n/10+n%10); }
main()
{ int x, y;
scanf("% d", &x);
y=sub(sub(sub(x)));
printf("% d\n", y);
}
若运行时输入：1234＜回车＞，程序的输出结果是【 】。
10 解析：y=sub(sub(sub(x)))=sub(sub(127))=sub(19)=10。