网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
有两种不同的介质，第一介质的折射率为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
入射波平行极化波
热门标签
最新试卷
