传热系数K与热阻R关系是()。(Ri:内表面换热阻 Re:外表面换热阻)A、K=1/RB、K=1/(R+Ri)C、K=1/(R+Re)D、1/(R+Ri+Re)
传热系数K与热阻R关系是()。(Ri:内表面换热阻 Re:外表面换热阻)
- A、K=1/R
- B、K=1/(R+Ri)
- C、K=1/(R+Re)
- D、1/(R+Ri+Re)
相关考题:
以下程序用来输出20个在开区间(10,87)上的随机整数数R,每行输出4个整数。请完成空白处.Private Sub Commandl. Click( )For I=1 To 10R = Int (Rnd * 76 + 11)Print R;If【 】Then PrintNext IEnd Sub
当执行以下过程时,在名为lblResult的标签框内将显示______。Private Sub Command1_ Click() Dim I, R R = 0 for I = 1 To 5 step 1 R= R+ I Next I lblResult. Caption = Str$(R)End SubA.字符串15B.整数15C.字符串5D.整数5
下面程序的输出结果是( )。 #include"stdio.h" int sub(int m) { static a=4; a+=m; return a; } void main() { int i=2,j=1,k; k=sub(i); k=sub(j); printf("%d",k); }A.6B.7C.8D.9
在窗体中添加一个标签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 SubB.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 SubC.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 SubD.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
执行下面的程序,消息框的输出结果是 【 】。Option BaselPrivate Sub Commandl Click()Dim a(10),P(3)As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3P(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iMsgBox kEnd sub
【程序说明】 计算下列算式的值。a,Ai为正整数,从键盘输入。其小∑Ai=1+2…+ Ai,Ai!=1 *2*3*Ai(i=1,2… a)。【程序】SET TAIK OFFCLEARINPUT“M=”TO MSTORE 0 TO S1,S2FOR I=1 TO M(8)DO SUB1DO SUB2ENDFOR? ” 所求算式的值为:“+ALLTRIM(STR(S1/S2,15,3))SET TALK ONPROCEDURE SUB1(9)FOR R=1 TO AK=K+RENDFOR(10)RETURNPROCEDURE SUB2(11)FOR P=1 TO AT=T*PENDFOR(12)RETURN(8)A.INPUT“A=”TO AB.INPUT“I=”TO IC.INPUT“R=”TO STR(R)D.INPUT“K=”TOK
在窗体上画一个名称为CoilTlilandl的命令按钮,然后编写如下事件过程: Private Sub command1 Click() Dim m As Integer, i As Integer, x(3)As Integer For i=0 To 3:x(i)=i:Next i For i = 1 To 2: Call sub1(x,i):Next i For i = 0 To 3: Print x(i);: Next i End Sub Private Sub sub1(a()As Integer,k As Integer) Dim i As Integer Do a(k)=a(k)+a(k+1) j = j + 1 Loop While j < 2 End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.0 3 7 5B.0 1 2 3C.3 2 4 5D.0 5 8 3
以下程序用来输出20个在开区间(10,87)上的随机整数R,每行输出4个整数。请完成空白处。Private Sub Command1 Click()For I=1 To 10R=Int(Rnd*76+11)Print R;If【 】Then PrintNext IEnd Sub
若有如下程序: 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.40B.32C.16D.编译出错
当执行以下过程时,在名为1blResult的标签框内将显示______。 Private Sub cmdlt_ click() Dim I,R R=0 For I=1 To 5 Step 1 R=R+I Next i 1blResult.Caption=Str$(R) End SubA. 字符串15B.整数15C.字符串5D.整数5
先在 窗体上添加一个命令按纽,然后编写如下程序: Function fun(ByVal nm As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num Mod 10) num=num\10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox(“请输入一个数”) n=CLng(n) r=fun(n) Print r End Sub 则在程序运行后,单击命令按纽,在对话框中输入“100”,输出结果是______。A. 0B.100C.200D.300
阅读下列程序: Private Sub Command1_Click() Dim i As Integer, k As Integer k=2 For i=1 To 3 Print H(k); Next i End Sub Function H(j As Integer) Static b a=0 a=a+r b=b+1 H=a*b+j End Function 单击命令按钮,执行程序,输出结果是( )。A.2 3 4B.3 4 5C.5 6 7D.3 5 6
下列程序运行后的输出结果是______。Private Sub f(k,s)s=1For j=1 To ks=s*jNextEnd SubPrivate Sub Command1_Click()Sum=0For i=1 To 3Call f(i,s)Sum=Sum+sNextPrint SumEnd Sub
单选题假设X与y之间的相关系数为r1,y与x之间的相关系数为r2,则r1和r2之间的关系为()Arsub1/sub>rsub2/subBrsub1/sub=rsub2/subCrsub1/sub<rsub2/subD二者无关
单选题已知某线声源长度为l0,在线声源垂直平分线上距线声源r0和r的分别为Lp(r0)和Lp(r),根据《环境影响评价技术导则声环境》,按公式Lp(r)=Lp(r0)-15lg(r/r0)近似计算该线声源的噪声影响时,应满足的条件是()。AprIsub0/sub且rsub0/subIsub0/sub /pBprIsub0/sub/3且rsub0/subIsub0/sub/3 /pCpIsub0/sub/3rspanI/spansub0/sub且Isub0/sub/3rsub0/subr0Isub0/sub /r0/pDp无条件限制 /p
单选题传热系数K与传热阻R0的关系是()。(d:厚度⊿t:表面温差)AK=R0/dBK=d/R0CK=⊿t/R0DK=1/R0