化学工程
相似问题和答案
第1题：
运行以下程序后，输出结果为_____________。 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
第2题：
有如下事件过程： 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；然后返回主调过程，输出变化前后的值。
第3题：
关于磺胺类抗菌药物叙述错误的是
A、对氨基苯磺酰胺为必需结构，芳氨基上的取代基对抑菌活性有较大的影响
B、磺酰胺基上N-单取代化合物多可使抑菌作用增强，而以杂环取代时抑菌作用较优
C、N，N-双取代化合物活性增强
D、磺胺类药物当pKa值在6.5～7.0时，抑菌作用最强
E、磺胺类药物作用的靶点是细菌的二氢蝶酸合成酶(DHFAS)
第4题：
以下能够正确计算n!的程序是
A．Private Sub Command1 Click() n=5：x=1 Do x=x * I I=I + 1 Loop While I ＜ n Print x End Sub
B．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X*I I=I + 1 Loop While I ＜n Print x End Sub
C．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X * I I=I + 1 Loop While I＜=n Print X End Sub
D．Private Sub Command1_Click() n=5：X=1：I=1 Do x=x * I I=I + 1 Loop While I＞n Print X End Sub
解析：n!=1×2×3×…×(n-1)×n，由于是累乘，因此x和i的初值都必须为1；其次就是循环执行条件的确定，由于使用的是While型循环，表示在满足条件时执行循环体中的代码，这里满足执行循环的条件应该是i=n。
第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 * ##
解析：当i=1时，调用函数过程DS，由于y，n为静态变量值保存，执行x=x+1；y=y+1后x=1，y=1执行m=m&"*"：n=n&"#"后，m="*"，n="#"；当I=2时同上，只是y=2，n="##"。输出结果如选项D)所示。
第6题：
A、Sub S1(ByVal n!())
B、Sub S1(n!) as Integer
C、 Function S1%(S1%)
D、 Function S1(ByVal n!)
第7题：
以下程序的输出结果是【 】。
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。
第8题：
若要在子过程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)。
第9题：
若有如下程序： 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
解析：本题的sub()函数是一个递归函数，当参数m为1或0时返回2，否则返回sub(m-1)*sub(m-2)。所以sub(4)递推下来就是sub(4)=sub(3)*sub(2)=sub(2)*sub(1)*sub(1)*sub(0)=sub(1)*sub(0)*2*2*2=25(上标)=32。所以正确答案是D。
第10题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() a = 2 For i=1 To 3 Call funl(i，A)Next i x = i + 2 Print x；a End Sub Private Sub fun1(n，m) m=m + n * 2 n = n + m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．1 5
B．4 5
C．8 4
D．3 4
解析：在本题中，由于两个形参都没有指明用哪种方式进行参数传送，按VisualBasic规定，在默认的情况下，变量的数据传送按传址方式进行。当第一次调用fun1过程时，循环变量i将1传给形参n，变量a将2传给形参m。经计算后，变量m和n值分别为4和5。返回被调过程后，变量i和a的值分别为5和4。经过“Nexti”语句后，循环变量i加了步长得6，大于终值3，退出循环，所以变量x=6+2=8。值得注意的是：在函数的调用过程中，不要使用循环变量作为实参，否则会产生意想不到的结果。