电流互感器的角误差,可用下式表示:Δfi%=()。其中K为电流互感器的额定变比,I1为一次绕组中的电流;I2为二次绕组中的电流。
第1题:
阅读程序: 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运行上面的程序,单击命令按钮,输出结果为。
第2题:
设有如下程序: Private Sub Form. Click( ) Dim s As Long,f As Long Dim n As Integer,i As Integer f=1 n=4 For i=1 To n f=f*i s=s+f Next i Print s End Sub 程序运行后,单击窗体,输出结果是( )。
A.32
B.33
C.34
D.35
第3题:
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序:
Pfivme Sub f(ByVal x As Integer)
x=x+4
End Sub
Pfivate Sub Commandl_Click()
i=3
Call f(i)
Ifi>4 Then i=i*2
MsgBOx I
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
第4题:
编写如下事件过程: Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i>= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后,单击窗体,则窗体上显示的内容是
A.rehcaet
B.tahreee
C.themee
D.eerthea
第5题:
下列程序运行后的输出结果是______。Private Sub f(k,s) s = 1 for j = 1 To k s=s*j Next jEnd SubPrivate Sub Command1_ Click () Sum = 0 for i = 1 To 3 Call f(i, s) Sum = Sum + s Next i Print Sum End Sub
A.0
B.3
C.6
D.9
第6题:
设有如下程序: Option Base 1 Private Sub Form. Click( ) Dim a(5)As String,i As Integer For i=1 To 5 a(i)=Chr(Asc("A")+i) Call f(a,i) Next i End Sub Sub f(ta( )As String,n As.Integer) Dim i As Integer For i=1 To n Print ta(i); Next i Print End Sub 对上述程序.以下叙述中正确的是( )。
A.程序有错,因为在过程f的定义中数组参数格式不正确
B.程序可正常运行,输出内容的第一行是一个字母“A”
C.程序可正常运行,输出内容的第一行是一个字母“B”
D.程序可正常运行,输出内容的第一行是数字65
第7题:
设有如下程序:
Private Sub Form. Click( )
Dim s As Long,f As Long
Dim n As Integer,i As Integer
f=1
n=4
For i=1 To n
f=f*i
s=s+f
Next i
Print s
End Sub
程序运行后,单击窗体,输出结果是( )。
A.32
B.33
C.34
D.35
第8题:
下列程序运行后的输出结果是______。
Private Sub f(k,s)
s=1
For j=1 To k
s=s*j
Next
End Sub
Private Sub Command1_Click()
Sum=0
For i=1 To 3
Call f(i,s)
Sum=Sum+s
Next
Print Sum
End Sub
第9题:
电流互感器的角误差,可用下式表示:Δfi%=()。其中K为电流互感器的额定变比,I1为一次绕组中的电流;I2为二次绕组中的电流。
第10题:
<p>U<sub>95</sub>=1%(v<sub>eff</sub>=9)</p>
<p>U<sub>r</sub>=1%(k=2)</p>
<p>u<sub>Cr</sub>=0.5%</p>
U=±0.5%(k=1)
第11题:
<p>U<sub>95rel</sub></p>
<p>U<sub>c</sub></p>
<p>u<sub>c</sub></p>
<p>U<sub>rel</sub></p>
第12题:
<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>
第13题:
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub f(ByVal x As Integer)
x=x+4
End Sub
Private Sub Command1_Click()
i=3
Call f(i)
If i>4 Then i=i*2
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
第14题:
下面程序的输出结果是【 】。
Private Sub Form_Click()
i=0
Do Until 0
i=i+1
if i>10 then Exit Do
Loop
Print i
End Sub
第15题:
设有如下程序: Private Sub search(a()As Variant,ByVal key As Variant,index%) Dim I% For I = Lbound(a)To Ubound(A)If key=a(I)Then index=I Exit Sub End If Next I index=-1 End Sub Private Sub Form_Load() Show Dim b()As Variant Dim n As Integer b=Array(21,64,92,15,72,38,45,72) Call search(b, 45, n) Print n End Sub 程序运行后,输出的结果是
A.2
B.6
C.10
D.12
第16题:
有如下程序: Private Sub Form_Click() E=1:F=1 For i=1 To 3 E=E+F:F=F+E Next Print E;F End Sub 该程序的输出结果是
A.6 6
B.5 8
C.13 21
D.34 55
第17题:
若有如下程序: float sub(int a,int b) { return(a*b); } main() {int i=1,j=2,k=3; printf("%4.0f\n",sub((int)sub(k+j,j),k+i)); } 则程序运行后的输出结果是( )。
A.40
B.32
C.16
D.编译出错
第18题:
编写如下事件过程: 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.6
B.12
C.24
D.47
第19题:
以下能够正确计算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
第20题:
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?()
第21题:
<p>U<sub>rel </sub> </p>
<p>u<sub>rel </sub> </p>
<p>U<sub>p </sub> </p>
<p>u<sub>ref</sub> </p>
第22题:
0
1
2
Compilation fails.
第23题:
Compilation will fail.
Compilation will succeed and the program will print “0”
Compilation will succeed and the program will print “1”
Compilation will succeed and the program will print “2”
第24题:
[(KI2~I1)/I1]100%;
(I2~I1)100%/I1;
I2~I1;
I2/I1。