好几年前，做得一个蒸汽流量计算公式，供你参考：

Q  :=  CY_Q*SQRT((CY_P/CY_P0)*(P+PB)/(P_S+PB)*(T_1+273.0)/(T+273.0))*3600.0;

 CY_Q  : REAL:=0.25 ;      //流量量程  900/3600

 CY_P0 : REAL:=118.53;   //差压量程

 PB     : REAL:=0.1;         //标准气压

 P_S    : REAL:=0.6;         //补偿压力量程

 CY_P  : REAL;                //差压信号

    P    : REAL;                //补偿压力

     T    : REAL;               //补偿温度

     T_1   : REAL;             //工作温度

     Q    : REAL;              //瞬时流量