氦原子的电子组态为n1pn2s,则可能的原子态()
第1题:
有如下程序: 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 * ##
第2题:
在窗体中添加一个命令按钮,编写如下程序: Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后,输出结果为
A.Sub:2 6 4 Main:2 6 4
B.Sub:2 6 4 Main:2 6 4
C.Sub:2 6 4 Main:1 2 3
D.Sub:2 6 4 Main:2 2 3
第3题:
以下程序段中Do...Loop 循环执行的次数为【 】。程序执行完毕后,n的值为【 】。
Private Sub Command1_Click()
n =5
Do
If n Mod 2= 0 Then
n =n \2
Else
n =n* 3 + 1
End If
Loop Until n=1
End Sub
第4题:
有如下事件过程: Private Sub Commaild1_Click( ) Dim i As Integer For i =1 To 2 DC Next i End Sub Sub DC( ) 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 * # 1 1 * #
B.1 1 * # 1 2 * #
C.1 1 * # 1 1 * ##
D.1 1 * # 1 2 * ##
第5题:
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub sub1(p,m,n) p=p + 1 : m = m + 1 : n =n + 1 Print p;m;n End Sub Private Sub Command1_Click() x=6 : y=4 : z=2 Call sub1(x,y+1,(z)) Print x;y;z End Sub 程序运行后,单击命令按钮,则窗体上第二行显示的内容是
A.7 6 3
B.7 4 2
C.6 4 2
D.4 6 3
第6题:
在窗体中添加一个命令按钮,编写如下程序:
Private Sub Sub1(p,m,n)
p=p+1:m=m+1:n=n+1
Print "sub1:";p;m;n
End Sub
Private Sub Command1_Click()
a1=1:b=2:c1=3
Call Sub1(a,b1+3,c1)
Print"Main:";a1;b1;c1
End Sub
程序运行后,输出结果为
A.Sub: 2 6 4 Main: 2 6 4
B.Sub: 2 6 4 Main: 2 6 4
C.Sub: 2 6 4 Main: 1 2 3
D.Sub: 2 6 4 Main: 2 2 3
第7题:
以下能够正确计算n!的程序是( )。
A.Private Sub Commandl_C1ick()
B.hiVate Sub Commandl_C1ick() n=5:x=1 n=5:x=1:i=1 DO DO X=x*1 X=X*1 i=i+1 i=i+1 Loop while i<n Loop While<n Print x Ptinte x End Sub End Sub
C.Private Sub Commandl_Click ()
D.Pdvate Sub Commandl C1ick() n=5:X=1:i=1 n=5=:x=1:i=1 DO DO X=X*1 X=X*1 i=i+1 i=i+1 Loop While i>n Print x Print x End Sub End Sub
第8题:
在窗体中添加一个命令按钮,编写如下程序: Private Sub Sub1(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub1:";p;m;n End Sub Private Sub Command1_Click() a1=1:b=2:c1=3 Call Sub1(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后,输出结果为
A.Sub: 2 6 4 Main: 2 6 4
B.Sub: 2 6 4 Main: 2 6 4
C.Sub: 2 6 4 Main: 1 2 3
D.Sub: 2 6 4 Main: 2 2 3
第9题:
<p>Re<sub>1</sub>=0.5Re<sub>2</sub></p>
<p>Re<sub>1</sub>=Re<sub>2</sub></p>
<p>Re<sub>1</sub>=1.5Re<sub>2</sub></p>
<p>Re<sub>1</sub>=2Re<sub>2</sub> </p>
第10题:
<p>I<sub>2</sub>=I<sub>3</sub></p>
<p>I<sub>2</sub>=4I<sub>3</sub></p>
<p>I<sub>2</sub>=2I<sub>3</sub></p>
<p>I<sub>3</sub>=4I<sub>2</sub></p>
第11题:
<p>U<sub>95</sub>= 1%,v<sub>eff</sub> =9 </p>
<p>U<sub>r</sub>= 1%,k=2 </p>
<p>u<sub>C</sub>=0. 5% </p>
<p>u<sub>C</sub>=±0 5%.k=1 </p>
第12题:
<p>M<sub>0</sub></p>
<p>M<sub>1</sub></p>
<p>M<sub>2</sub></p>
<p>M<sub>3</sub></p>
第13题:
若有如下程序: 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
第14题:
有如下一个Sub过程: Sub mlt(ParamArray numbers()) n=1 For Each x In numbers n=n*x Next x Print n End Sub 在一个事件过程中如下调用该Sub过程: Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a,b,c,d End Sub 该程序的运行结果为( )。
A.12
B.24
C.36
D.48
第15题:
以下程序的输出结果是( )。
include<stdio.h>
main()
fint x=0;
sub(&x,16,2);
printf("%d\n",x);
}
sub(int*a,int n,int k)
{if(k<=n) sub(a,n/2,2*k);
*a+=k;
}
第16题:
在窗体中添加一个命令按钮,编写如下程序: Private Sub Test(p,m,n) p=p+1:m=m+1:n=n+1 Print "Sub: ";p;m;n End Sub Private Sub Command1.Click() a1=1:b=2:c1=3 Call Test((a,b1+3,(c1)) Print "Main:";a1;b1;c1 End Sub 程序运行后,输出结果为
A.Sub: 2 6 4 Main: 2 6 4
B.Sub: 2 6 4 Main: 2 6 4
C.Sub: 2 6 4 Main: 1 2 3
D.Sub: 2 6 4 Main: 2 2 3
第17题:
有如下一个Sub过程: Sub mlt (ParamArray numbers()) n=1 For Each x In numbers n=n * x Next x Print n End Sub在一个事件过程中如下调用该Sub过程: Private Sub Coinmand1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a,b,c,d End Sub 则运行该程序,结果为______。
A.12
B.24
C.36
D.48
第18题:
若要在子过程Proc1调用后返回两个变量的结果,下列过程定义语句中有效的是( )。
A.Sub Proc1(n,m)
B.Sub Proc1(ByVal n,m)
C.Sub Proc1(n,ByVal m)
D.Sub Proc1(ByVal n,ByVal m)
第19题:
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer,y As Integer x = 41: y = 54 Call sub1(x,y) x = x + 1 Print x; y End Sub Private Sub sub1(n As Integer, ByVal m As Integer) n=n Mod 10 m=m\10 End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是
A.41 54
B.2 54
C.1 3
D.42 3
第20题:
过程通过参数传递将一个参数传递给子过程A,并返回一个结果,下列子过程定义中正确的是()
第21题:
K<sub>t</sub>+1=I<sub>t</sub>-(1-δ)K<sub>t</sub>
K<sub>t</sub>+1=It+(1-δ)K<sub>t</sub>
K<sub>t</sub>+1=I<sub>t</sub>+(1+δ)K<sub>t</sub>
K<sub>t</sub>+1=I<sub>t</sub>-(1+δ)K<sub>t</sub>
第22题:
由于n不确定不能给出确定的J值,不能决定原子态
为n1pn2s3D2,1,0和n1pn1s1D1
由于违背泡利原理只存单态不存在三重态
为n1pn2s3P2,1,0和n1pn2s1P1
第23题:
C<sub>P</sub>=1
C<sub>P</sub>=2/3
C<sub>Pk</sub>=1
C<sub>Pk</sub>=2/3
第24题:
CALL SUB(N,N)
CALL SUB(X,X)
CALL SUB(N+2,X)
CALL SUB(N,X+3)