两个电阻,R1为“16V、1W”,R2为“16V、1/2W”,如果并联在16V的电路中,消耗功率大的电阻是(),如果串联接入16V的电路中,消耗功率大的是(),其中R1实际消耗的功率为()W,R2实际消耗的功率为()W。
第1题:
【程序说明】 计算下列算式的值。a,Ai为正整数,从键盘输入。其小∑Ai=1+2…+ Ai,Ai!=1 *2*3*Ai(i=1,2… a)。
【程序】
SET TAIK OFF
CLEAR
INPUT“M=”TO M
STORE 0 TO S1,S2
FOR I=1 TO M
(8)
DO SUB1
DO SUB2
ENDFOR
? ” 所求算式的值为:“+ALLTRIM(STR(S1/S2,15,3))
SET TALK ON
PROCEDURE SUB1
(9)
FOR R=1 TO A
K=K+R
ENDFOR
(10)
RETURN
PROCEDURE SUB2
(11)
FOR P=1 TO A
T=T*P
ENDFOR
(12)
RETURN
(8)
A.INPUT“A=”TO A
B.INPUT“I=”TO I
C.INPUT“R=”TO STR(R)
D.INPUT“K=”TOK
第2题:
A.su
B.suroot
C.su-root
D.su-c"root"
第3题:
以下程序用来输出20个在开区间(10,87)上的随机整数数R,每行输出4个整数。请完成空白处.
Private Sub Commandl. Click( )
For I=1 To 10
R = Int (Rnd * 76 + 11)
Print R;
If【 】Then Print
Next I
End Sub
第4题:
下列哪条指令把寄存器R1、R2的值相加后存到R0中.()
第5题:
R1和 R2为两个串联电阻,已知 R1=4R2,若R1上消耗的功率为 1W,则 R2上消耗的功率为()。
第6题:
以下程序用来输出20个在开区间(10,87)上的随机整数R,每行输出4个整数。请完成空白处。
Private Sub Command1 Click()
For I=1 To 10
R=Int(Rnd*76+11)
Print R;
If【 】Then Print
Next I
End Sub
第7题:
R1和R2为两个串联电阻,已知R1=5R2,若R1上消耗的功率为 1W,则R2上消耗的功率为()W 。
A.5
B.20
C.0.2
D.400
第8题:
在窗体中添加一个标签LblResult和一个命令按钮Command1,然后编写程序。程序的功能是单击命令按钮,计算1+2+3+4+5的值,并把结果转化为字符串显示在标签内,能够实现上述功能的程序段是, ( )
A.Private Sub Command1_Click() Dim I,R As Integer For I=1 To 5 Step 1 R=R+I Next LblResult. Name=Str$ (R) End Sub
B.Private Sub Command1_ClickO Dim I,R As Integer For I=1 To 5 Step 1 R=R+I Next LblResult. Caption= Str$ (R) End Sub
C.Private Sub Command1_Click() Dim I,R As Integer Do While I<5 R=R+I I=I+1 Loop LblResult. Caption=Str$ (R) End Sub
D.Private Sub Command1_Click() Dim I,R As Integer Do R=R+I I=I+1 Loop While I<5 LblResult. Caption=Str$ (R) End Sub
第9题:
R1和R2为两个串联电阻,已知R1=4R2,若R2上消耗的功率为1W,则R上消耗的功率为()W。
A5;
B20;
C0.25;
D400。
第10题:
R1和R2为串联两电阻,已知R1=5R2,若R1上消耗功率为1W,则R2上消耗功率为()。