Реферат Сточно-динамічні фекальні насоси типу ЦД

Тема: Курсовые обзорные

writeln ('shirina lopasti na vyxode b2 =', b2: 6:4); ('popravo4nyj koef skorosti na vxode k1 =', k11: 6:4); ('popravo4nyj koef skorosti na vyxode k2 =', k12: 6:4);. + + Builder 6:

// --------------------------------------------- ------------------------------

# include

# pragma hdrstop

# include

# include "MainFekalki2006.h"

# include "About.h"

// --------------------------------------------- ------------------------------

# pragma package (smart_init)

# pragma resource

int bt1 = 25, det = 3, skr = 150, fp = 3;

String k; ok (float s, int > Cx% 5) | | ((cx% 10! = 0) && (cx% 5 == 0)))

{dx + = 1;}; (s <0) {j = -1;} else {j = 1;}; = j * dx/pow (10, i) + j * abs (s);

}

// --------------------------------------------- ------------------------------

__fastcall TForm1 :: TForm1 (TComponent * Owner)

: TForm (Owner)

{

}

// --------------------------------------------- ------------------------------ __fastcall TForm1 :: Button1Click (TObject * Sender)

| | H <= 0 | | n <= 0) {goto exit;};

// Розрахунок характеристик = Q/3600; = M_PI * n/30; (ns = 3.65 * n * sqrt (Q/3600)/pow (H, 3.0/4.0), fp) ;//Коеф. швидкохідний. -> Cells [0] [0] = "Коефіцієнт швидкохідності"; -> Cells [1] [0] = k;

ok (d1p = 4500 * pow (Q/(n * 3600), 1.0/3.0), fp);

Grid1-> Cells [0] [1] = "Наведений діаметр, мм";

КПД "; -> Cells [1] [3] = k; (kpd = kpdm * kpdo * kpdg, fp); -> Cells [0] [4] =" Повний кВт "; -> Cells [1] [5] = k; (m = 97500 * nm/n, fp); -> Cells [0] [6] =" Крутний момент, кг * см "; - > Cells [1] [6] = k; (d0 = 10 * pow (m/(0.2 * skr), 1.0/3.0), fp);

Grid1-> Cells [0] [7] = "Діаметр валу насоса, мм";

Grid1-> Cells [1] [7] = k; (dvt = 1.25 * d0, fp); -> Cells [0] [8] = "Діаметр втулки,

Grid1-> Cells [0] [9] = "Діаметр робочого колеса, мм";

Grid1-> Cells [1] [9] = k; (skr1 = 4 * q11/(M_PI * (pow (d10/1000, 2)-pow (dvt/1000, 2))), fp) ;

Grid1-> Cells [0] [10] = "Швидкість входу в робоче колесо, м/с";

Grid1-> Cells [1] [10] = k; (r1 = 0.8 * d10/2, fp);

Grid1-> Cells [0] [11] = "Радіус на вході в робоче колесо, мм";

Grid1-> Cells [1] [11] = k; m1 = c0; (b1 = 1000 * q11/(2 * M_PI * (r1/1000) * c1m1), fp);

Grid1-> Cells [0] [12] = "Ширина лопаті на вході, мм";

Grid1-> Cells [1] [12] = k; = k1 * c1m1;

ok (u1 = w0 * r1/1000, fp); -> Cells [0] [13] = "Окружна швидкість на вході, м/с";

Grid1-> Cells [1] [13] = k; (bt10 = 180 * (atan (cm1/u1))/M_PI, fp);