请写出风机单位风量耗功率Ws的计算公式，并且给出各符号的含义以及它们的单位。

题目

请写出风机单位风量耗功率W_s的计算公式，并且给出各符号的含义以及它们的单位。

参考答案和解析

正确答案: 对风机的功率及风机风量进行测试。风量一般采用皮托管并配以测压仪器（一般用微压计）或采用毕托管、压力传感器、数据采集仪、PC电脑来测定。功率采用电力质量分析仪进行测试。
风机的单位风量耗功率（W_s）应按下式计算：
W_s=N/G_A（式2-11）
式中：W_s——单位风量耗功率[W/（m³/h）]；
N—风机输入功率（kW）；
G_A—风量（m³/h）。

如果没有搜索结果或未解决您的问题，请直接联系老师获取答案。

相似问题和答案

第1题：

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后。单击命令按钮，则窗体上显示的内容是______。

A．5

B．120

C．153

D．160

正确答案：C
解析：由于参数y、w是ByRef的参数，称为“引用”，所以在过程Subl中改变的值是带回到调用的地方的，因此Sum结果是5次Subl计算结果的和，即sum=(1+2+6+24+120)=153。本题答案为153。

第2题：

下列程序用来计算1+2+…n,当和大于100时停止计算,请填空。

Private Sub Form_Click()

Dim n as integer,s as integer,I as integer,k as integer

s=0

k=0

n=inputbox(″请输入n的值)

For i=1 to 100

k=k+1

s=s+I

【】

Next i

Print s

End Sub

正确答案：if s>100 then exit for
if s>100 then exit for 解析：依题意,用变量S来记录1到n的累加和,当累加和S大于100时停止计算,故加入退出循环条件"if s>100 then exit for"

第3题：

1+ + + +…….n 最大的n。请填空

Private Sub Command1__Click（）

Dim s ,m,n AS Integer

m=Val（InputBox（“请输入一个大于100的整数”））

n=_______

s=0

Do While s N=n+1

S=s+n*n

Loop

Print “满足不等式的最大n是_______

End Sub

正确答案：

0　N-1

第4题：

写出程序运行的结果

Public class Base

Public virtual string Hello() {return “Base”;}

Public class Sub:Base

Public override string Hello() {return “Sub”;}

1. Base b = new Base(); b.Hello;

2. Sub s = new Sub(); s.Hello;

3. Base b = new Sub (); b.Hello;

4. Sub s = new Base(); s.Hello;

正确答案：

第5题：

下面程序的功能是从键盘输入—个大于100的整数m，计算并输出满足不等式

1+22+32+42+…+n2＜m

的最大的n。请填空。

Private Sub Command1_Click()

Dim s,m,n As Integer

m=Val(InputBox("请输入一个大于100的整数"))

n=【】

s=0

Do While s＜m

n=n+1

s=s+n*n

Loop

Print "满足不等式的最大n是";【】

End Sub

正确答案：0 n-1
0 , n-1 解析：Do While…Loop是先判断条件表达式的值是否为True，如果为True，则执行循环体，如果为False，则执行Loop后面的语句。由循环体可知该题的第1空应该填0。当循环条件不满足时跳出循环，此时的n是满足不等式1+22+32+42+…+n2＞=m的最小的n，所以该题的第2空应该填n-1。

第6题：

在窗体上画一个命令按钮，然后写出如下事件过程：

Private Sub Command1_Click（）

s=1

s=（s + 1） ^ （s + 2）

Number=Number + 1

Loop Until s >=6

Print Number, s

End Sub

程序运行后，输出的结果是（）。

A．23

B．318

C．18

D．1020

正确答案：C

第7题：

阅读如下程序, a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( )。

A、Sub plus(sum, a , b ): sum = a + b: End Sub

B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub

C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub

D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub

参考答案：B

第8题：

下面的程序的作用是利用随机函数产生10个100~300（不包含300）之间的随机整数，打印其中7的倍数的数，并求它们的总和，请填空。

Sub TOF（）

Randomize

Dim s As Double

Dim a（10） As Integer

For i=0 To 9

【10】

For i=0 To 9

If 【11】 Then

Print a（i）

s=s + a（i）

【12】

Next i

Print "S="; s

End Sub

正确答案：
正确答案: 1.(a(i) = Int(Rnd * 200 + 100)) 2.(a(i) Mod 7 = 0) 3.(End If)

第9题：

编写如下事件过程： 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

正确答案：A
解析：可以看出，Sub1(ByValx1AsString，y1AsString)的作用是将参数x1的字符逆序处理，然后赋给y1，而y1是传址引用的，可以直接返回处理结果。

第10题：

下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch：Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=s&Mid(ch，k，1) Next k ch=s End Sub A．ABCDEF B．FEDCBA C．A D．F

正确答案：C

请写出风机单位风量耗功率W<sub>s</sub>的计算公式，并

题目

参考答案和解析

相似问题和答案

更多相关问题

相关内容