网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
有两种不同的介质,第一介质的折射率为n1,第二介质的折射率为n2;当一束自然光从第一介质入射到第二介质时,起偏振角为i0;当自然光从第二介质入射到第一介质时,起偏振角为i。如果i0>i,则光密介质是()
- A、第一介质
- B、第二介质
- C、不能确定
- D、两种介质的折射率相同
参考答案
更多 “有两种不同的介质,第一介质的折射率为n1,第二介质的折射率为n2;当一束自然光从第一介质入射到第二介质时,起偏振角为i0;当自然光从第二介质入射到第一介质时,起偏振角为i。如果i0>i,则光密介质是()A、第一介质B、第二介质C、不能确定D、两种介质的折射率相同” 相关考题
考题
有以下程序: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回车,程序的输出结果是。
考题
若要在子过程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)
考题
运行以下程序后,输出结果为_____________。 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 3B. sub:2 6 4 main:2 2 3C. sub:2 6 4 main:2 6 4D. sub:2 6 4 main:1 6 4
考题
下列过程说明合法的是( )
A、Sub S1(ByVal n!())B、Sub S1(n!) as IntegerC、 Function S1%(S1%)D、 Function S1(ByVal n!)
考题
有如下事件过程: 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=2B.m=2,n=1 m=4,n=1C.m=1,n=2 m=1,n=4D.m=1,n=2 m=2,n=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;}
考题
有以下程序: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<回车>,程序的输出结果是【 】。
考题
有如下程序: 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 * ##
考题
若有如下程序: 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.8B.16C.24D.32
考题
在窗体中添加一个命令按钮,编写如下程序: 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 4B.Sub:2 6 4 Main:2 6 4C.Sub:2 6 4 Main:1 2 3D.Sub:2 6 4 Main:2 2 3
考题
有如下一个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.12B.24C.36D.48
考题
以下程序段中Do...Loop 循环执行的次数为【 】。程序执行完毕后,n的值为【 】。Private Sub Command1_Click()n =5DoIf n Mod 2= 0 Thenn =n \2Elsen =n* 3 + 1End IfLoop Until n=1End Sub
考题
有如下事件过程: 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 * ##
考题
在窗体中添加一个命令按钮,编写如下程序: 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 4B.Sub: 2 6 4 Main: 2 6 4C.Sub: 2 6 4 Main: 1 2 3D.Sub: 2 6 4 Main: 2 2 3
考题
有如下一个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.12B.24C.36D.48
考题
在窗体中添加一个命令按钮,编写如下程序:Private Sub Sub1(p,m,n)p=p+1:m=m+1:n=n+1Print "sub1:";p;m;nEnd SubPrivate Sub Command1_Click()a1=1:b=2:c1=3Call Sub1(a,b1+3,c1)Print"Main:";a1;b1;c1End Sub程序运行后,输出结果为A.Sub: 2 6 4 Main: 2 6 4B.Sub: 2 6 4 Main: 2 6 4C.Sub: 2 6 4 Main: 1 2 3D.Sub: 2 6 4 Main: 2 2 3
考题
若要在子过程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)
考题
以下能够正确计算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 SubC.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
考题
在窗体上画一个名称为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 54B.2 54C.1 3D.42 3
考题
在窗体中添加一个命令按钮,编写如下程序: 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 4B.Sub: 2 6 4 Main: 2 6 4C.Sub: 2 6 4 Main: 1 2 3D.Sub: 2 6 4 Main: 2 2 3
考题
过程通过参数传递将一个参数传递给子过程A,并返回一个结果,下列子过程定义中正确的是()A、Sub A(m+1,n+2)B、Sub A(ByValm!,ByValn!)C、Sub A(ByValm!,n+2)D、Sub A(ByValm!,n!)
考题
单选题永续盘存法公式为()A
Ksubt/sub+1=Isubt/sub-(1-δ)Ksubt/subB
Ksubt/sub+1=It+(1-δ)Ksubt/subC
Ksubt/sub+1=Isubt/sub+(1+δ)Ksubt/subD
Ksubt/sub+1=Isubt/sub-(1+δ)Ksubt/sub
考题
单选题关于折射率,下述说法中正确的是()。A
根据n=sini/sinr可知,介质的折射率与入射角的正弦成正比B
根据n=sini/sinr可知.介质的折射率可能为任何正数C
根据n=c/υ可知,介质的折射率与介质中的光速成反比D
以上说法都不对
考题
单选题给定子例行程序如下 SUBROUTINE SUB(K,A) B=K+2 A=A+B END 下列调用语句中正确的是()A
CALL SUB(N,N)B
CALL SUB(X,X)C
CALL SUB(N+2,X)D
CALL SUB(N,X+3)
考题
单选题平面波以某不为零的角度θ由介质1(折射率为n1)入射到介质2(折射率为n2)表面上,()是反射波为零的必要条件。A
n1>n2B
n1<n2C
入射波垂直极化波D
入射波平行极化波
热门标签
最新试卷