一台他励直流电动机的额定数据为PN=30KW,U1N=220V,nN=700r/min,IN=150A,试求其理想空载运行转速、额定转矩及固有机械特性方程式
第1题:
设程序中有如下数组定义和过程调用语句: Dim a(10)As Integer … Call D(a) 如下过程定义巾,正确的是( )。
A.Private Sub p(a As Integer)
B.Private Sub p(a( )As Integer)
C.Private Sub p(a(10)As Integer)
D.Private Sub p(a(n)As Integer)
第2题:
下面过程运行后,变量N的值为( )。 PRIVATE SUB MAINSUB( ) DIM N AS INTEGER N=9 CALL GET. DATA(N) END SUB PRIVATE SUB GETDATA(BYREF M AS INTEGER) M=M*3+SC-N(-9) END SUB
A.25
B.26
C.27
D.28
第3题:
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5: p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )
A.4
B.6
C.8
D.10
第4题:
单击一次命令按钮之后,下列程序代码的执行结果为 private Sub Command1_Click() S=P(1) +P(1)+P(2)+P(3)+P(4) Print S: End Sub Public Function P(N As Integer) Static Sum For I=1 To n Sum=Sum+I Next 1 P=Sum End Function
A.20
B.35
C.115
D.135
第5题:
要想在过程调用中返回两个结果,下面的过程定义语句合法的是
A.Sub Submit(ByVal n,ByVal m)
B.Sub Submit(n,ByVal m)
C.Sub Submit(n,m)
D.Sub Submit(ByVal n,m)
第6题:
在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果为( )。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i,"*") Print x Next i End Sub Private Sub Command1_Click() p1(3) End Sub
A.*** ** *
B.* ** ***
C.* * *
D.******
第7题:
当发生Form_Click事件时,下列程序的输出结果是( )。 Private m As Integer,n As Integer Private Sub Form_Click() Dim k As Integer,p As Integer k=6:p=60 Call sub1(k,p) Print m,n,m,k,p Call sub1(k,p) Print m,n,k,p End Sub Private Sub Form_Load() m=7 n=70 End Sub Public Sub sub1(x As Integer,ByVal y As Integer) Dim m As Integer n=n+5 m=n+x+y x=x+y y=x+y End Sub
A.7 75 66 60 7 80 126 60
B.7 75 66 60 7 75 126 60
C.7 75 66 60 7 80 66 60
D.7 75 66 60 7 75 66 60
第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题:
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click()
Dim x As Integer,y As Integer
x=12:y=32
Call p(x,y)
MsgBox x*y
End Sub
Public Sub p(n As Integer,By Val m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为【 】。
第10题:
第11题:
u<sub>0.49</sub>>0
u<sub>0.3</sub><u<sub>0.4 </sub>
u<sub>0.5</sub>=0
u<sub>0.23</sub>=-u<sub>0.77 </sub>
u<sub>0.5</sub>=-u<sub>0.5</sub>
第12题:
CALL SUB(N,N)
CALL SUB(X,X)
CALL SUB(N+2,X)
CALL SUB(N,X+3)
第13题:
答案:励磁电流=220/91=2.42a
额定电流=75+2.42=77.42a
输入功率P1=220×77.42=17032.4w≈17kw
电枢铜损=75²×0.26=1462.5w
励磁绕组铜损=2.42²×91=533w
输出功率P2=17032.4-1462.5-533-600-1989=12447.9w≈12.5kw
额定转矩=9550×P2÷nN=9550×12.5÷1000=119.4Nm
额定效率=P2÷P1=12.5÷17=0.74=74%
第14题:
有以下程序:
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<回车>,程序的输出结果是【 】。
第15题:
在窗体中添加一个命令按钮,编写如下程序: 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
第16题:
设程序中有如下数组定义和过程调用语句:
Dim a(10) as integer
……
Call p(a)
如下过程定义中,正确的是
A)Private Sub p(a as integer)
B)Private Sub p(a() as integer)
C)Private Sub p(a(10) as integer)
D)Private Sub p(a(n) as integer)
第17题:
在窗体中添加一个命令按钮,编写如下程序: 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
第18题:
在窗体上画一个名称为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
第19题:
下列程序的执行结果为 Private Sub Comrnandl_Click( ) Dim p As Integer, q As Integer p=12:q=20 Call Value(p, q) Print p; q End Sub Private Sub Value(ByVal m As Integer, ByVal n As Integer) m=m * 2: n=n - 5 Print m; n End Sub
A.20 12 20 15
B.12 20 12 25
C.24 15 12 20
D.24 12 12 15
第20题:
在窗体中添加一个命令按钮,编写如下程序: 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
第21题:
CALL SUB(N,N)
CALL SUB(X,X)
CALL SUB(N,X*X)
CALL SUB(11,X)
第22题:
<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>
第23题: