网友您好， 请在下方输入框内输入要搜索的题目：

题目内容 （请给出正确答案）

已知两个正弦量分别为i1=-4cos（100t+60°）A，i2=4cos（100t+30°）A，则i1和i2的相位差为（）。

  • A、i1超前i230°
  • B、i1滞后i230°
  • C、i1超前i2150°
  • D、i1滞后i2150°

参考答案

更多 “已知两个正弦量分别为i1=-4cos（100t+60°）A，i2=4cos（100t+30°）A，则i1和i2的相位差为（）。A、i1超前i230°B、i1滞后i230°C、i1超前i2150°D、i1滞后i2150°” 相关考题
考题 下面程序段的运行结果是【 】。Option Base 1Private Sub swap(a()As InteSer)For I=1 to 10\2t=a(i)a(i)=a(10-1+1)a(10-1+1)=tNext1End SubPrivate Sub Form_Click()Dim x(10)As IntegerFor I=1 to 10x(i)=I*2Next1Swap x()For1=1 to 10Print x (i)Next IEnd Sub
查看答案
考题 有一过程如下:Sub Sub1(m As Integer,total As Long)Dim i As Integertotal=1For i=1 To mtotal=total*iNextEnd Sub调用它的事件过程如下:Private Sub Command1_Click()Dim tot As Long,a As Integera=Val(InputBox("请输入数据"))Call Sub1(a,tot)Print totEnd Sub则输入数据5,运行结果为【 】。
查看答案
考题 下列程序的输出结果是______。Private Sub Command1_Click()Dim arr(1To 10)For i＝1 To 10arr(i)＝iNext iFor Each i In arr()arr(i)＝arr(i)*2+1Next iMsgBox arr(7)End Sub
查看答案
考题 有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)＝2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(i)＝5 a(2)＝6 a(3)＝7 a(4)＝8 subP a() For i＝1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为______。A． 2 4 6 8B．5 6 7 8C．10 12 14 6D．出错
查看答案
考题 有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subPa() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为( )A．2 4 6 8B．5 6 7 8C．10 12 14 16D．出错
查看答案
考题 阅读程序： Sub p( b () As Integer)For i =1To 4 b(i) = 2(iNext i End Sub Private Sub Command1_Click()Dim a (1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 call p (a) For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为。
查看答案
考题 下面程序段的运行结果是【 】。Option Base 1Private Sub Swap (a() As IntegFor I=1 to 10\2t=a(I)a(I)=a(10-I+1)a(10-I+1)=tNext IEnd SubPrivate Sub Form_Click()Dim x(10) As IntegerFor I=1 to 10x(I)=I*2Next ISwap x()For I=1 to 10Print x(I)Next IEnd Sub
查看答案
考题 在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写下列程序： Private Sub rune(L AS Labe1) Caption="1234" End Sub Private Sub Form. Load（ ） Labe11．Caption="ABCDE" Labe12．Caption=10 End Sub Private Sub Command1Click（ ） a=Va1(Label2．Caption) Call func(Label1) Label2．Caption a End Sub 程序运行后，单击命令按钮，则在两个标签中显示的内容分别为（ ）。A.ABCD和10B.1234和100C.ABCD和100D.1234和10
查看答案
考题 下面程序的输出结果是【 】。Private Sub Form_Click()i=0Do Until 0i=i+1if i＞10 then Exit DoLoopPrint iEnd Sub
查看答案
考题 以下程序的运行结果是( ) #define MAX 10 int a[MAX]，i; main() { printf("\n");sub1()；sub3(A) ,sub2()，sub3(A) ； } sub2() { int a[MAX]，i，max； max=5； for(i=0；i＜max；i++)a[i]＝i； } sub1() {for(i=0;i＜MAX；i++)a[i]＝i+i; } sub3(int a[]) { int i; for(i=0;i＜MAX，i++)printf("%d"，a[i])； printf("\n")； }A．0 2 4 6 8 10 12 14 16 18 0 1 2 3 4B．0 1 2 3 4 0 2 4 6 8 10 12 14 16 18C．0 1 2 3 4 5 6 7 8 9 0 1 2 3 4D．0 2 4 6 8 10 12 14 16 18 0 2 4 6 8 10 12 14 16 18
查看答案
考题 下面程序的执行结果是______。 #define MAX 10 nt a[MAX],i； main() { printf("\n")； sub1()；sub3(A) ； sub2()；sub3(A) ； } sub1() {for(i=0;i＜1MAX;i++) a[i]-i+i； } sub2() {int a[MAX],i,max； max=5； for(i=0;i＜max;i++) a[i]=i； } sub3(int a[]) { int i； for(i=0;i＜MAX;i++) printf("%d",a[i])； printf("\n")； }A．0 2 4 6 8 10 12 14 16 18 0 1 2 3 4B．0 1 2 3 4 0 2 4 6 8 10 12 14 16 18C．0 1 2 3 4 5 6 7 8 9 0 1 2 3 4D．0 2 4 6 8 10 12 14 16 18 0 2 4 6 8 10 12 14 16 18
查看答案
考题 在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序： Private Sub func(L As Label,ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是： ______。A．ABCD和10B．1234和100C．ABCD和100D．1234和10
查看答案
考题 请阅读程序： Sub subP(b（ ）As Integer) For i=1 To4 b(i)=2*i Next i End Sub Private Sub Commandl Click（ ） Dim a(1 To 4)As Integer a(1)=5:a(2)=6:a(3)=7:a(4)=8 subP a（ ） For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，则输出结果是（ ）。A.2 4 6 8B.5 6 7 8C.10 12 14 16D.出错
查看答案
考题 下面程序的输出结果是【 】。Private Sub Form_Click()i＝0Do Until 0i＝i＋1if i10 then Exit DoLoopPrint iEnd Sub
查看答案
考题 以下能够正确计算1+2+3+…+10的程序是A．Private Sub Command1_Click() Sum=0 ForI=1 To 10 Sum=Sum+I Next I Print Sum End SubB．Private Sub Command1_Click() Sum=0，I=1 Do While I＜=10 Sum=Sum+I I=I+1 Print Sum End SubC．Private Sub Command1_Click() Sum=0： I=1 Do Sum=Sum+I I=I+1 Loop While I＜10 Print Sum End SubD．Private Sub Command1_Click() Sum=0： I=1 Do Sum=Sum+I I=I+1 Loop Until I＜10 Print Sum End Sub
查看答案
考题 Private Sub Commandl Click（）Dim i As Integer, j As IntegerDim a （10,10）As IntegerFor i=1 To 3For j= i To 3a（i,j）=（i-1）*3+jPrint a （i,j）;Next jPrintNext iEnd Sub程序运行后，单击命令按钮，窗体上显示的是（ ）。
查看答案
考题 下列程序的输出结果是______。Private Sub Commandl_Click()Dim alt(1 To 10)Fori＝1 To 10arr(i) ＝INext iFor Each i In arr()arr(i) ＝arr(i) *2+1Next iMsgBox arr(7)End Sub
查看答案
考题 有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序，单击命令按钮，输出结果为______ 。A． 2 4 6 8B．5 2 2 2C．10 12 14 16D．出错
查看答案
考题 在窗体上画一个命令按钮，然后编写如下事件过程： Sub BTC(old Copy( ) As Integer，new Copy( ) As Integer) Dim i AS Integer For i=LBound(oldCopy( ))To UBound(oldCopy( )) newCopy(i)=oldCopy(i) Next i End Sub Private Sub Command1 _ Click( ) Dimm(10) As Integer，n(10)As Integer For i=1 To 10 m(i) =i*i Next i Call BTC(m，n) Print n(5) End Sub 程序运行后，单击命令按钮输出结果为A．0B．2C．10D．25
查看答案
考题 下列程序的输出结果是______。Private Sub Command1_Click()Dim arr(1 To 10)For i=l TO 10arr(i)=iNext iFor Each i In arr()art(i)=arr(i)*2+1Next iMsgBox arr(7)End Sub
查看答案
考题 下列程序的输出结果是( )。Private Sub Command1_Click()Dim arr(1 To 10)For i=1 To 10Next iFor Each i In arr()Next iEnd Sub
查看答案
考题 编写如下事件过程： Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n()As Integer) Dim i As Integer ReDim Preserve n(5) For i = 3 To 5 n(i)=n(i-1)*2 Next i End Sub 程序运行后，单击窗体，则窗体上显示的内容是A．6B．12C．24D．47
查看答案
考题 以下能够正确计算1+2+3+…+10的程序是A．Private sub Command1_Click( ) sum=0 For 1=1 To 10 Sum=sum+1， Next I Print Sum End SubB．Private sub Command1_Click( ) Sum=0,I=1 Do While l＜=10 Sum=Sum+1 I=I+1 Print Sum End SubC．Private Sub command1_click( ) Sum=0：I=1 Do Sum=Sum+1 I=I+1 Loop While I＜10 Print Sum End SubD．Private Sub command1_Click( ) Sum=0：I=1 Do Sum=Sum+1 l=I+1 Loop Until I＜10 Print Sum End Sub
查看答案
考题 以下能够正确计算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
查看答案
考题 class Super {  public int i = 0；  public Super（String text） {  i = 1； }  }  public class Sub extends Super {  public Sub（String text） {  i = 2；  }   public static void main（String args[]） {  Sub sub = new Sub（“Hello”）；  System.out.println（sub.i）；  }  }  What is the result？（）  A、 0B、 1C、 2D、 Compilation fails.
查看答案
考题 单选题class Super {  public int i = 0；  public Super（String text） {  i = 1； }  }  public class Sub extends Super {  public Sub（String text） {  i = 2；  }   public static void main（String args[]） {  Sub sub = new Sub（“Hello”）；  System.out.println（sub.i）；  }  }  What is the result？（）A  0B  1C  2D  Compilation fails.
查看答案
考题 单选题class super （   public int I = 0；   public super （string text） （   I = 1   ）   ）     public class sub extends super （   public sub （string text） （   i= 2   ）   public static void main （straing args） （  sub sub = new sub （“Hello”）；   system.out. PrintIn（sub.i）；  ）   ）   What is the result？（）A  Compilation will fail.B  Compilation will succeed and the program will print “0”C  Compilation will succeed and the program will print “1”D  Compilation will succeed and the program will print “2”
查看答案
热门标签
最新试卷