Реферат: Выработка рекомендаций по защите оператора ЭВМ от воздействия СДЯВ

V = Form1->ComboBox3->ItemIndex + 1;

}

void setk3()

{

k3 = store[Form1->ComboBox4->ItemIndex];

}

void setk4()

{

k4 = place[Form1->ComboBox4->ItemIndex];

}

// Функция вычисления параметров зоны заражения, время подхода зараженного

// воздуха и время поражающего действия СДЯВ

void setZone()

{

float h,w,s,t1,t2;

G = Form1->Edit2->Text.ToInt();

h = k2*k3*k4*34.2*pow(pow(G/(D*V), 2), 1/3.0);

setLabel(h, Form1->Height, " м");

w = k1*h;

setLabel(w, Form1->Width, " м");

s = 0.5*h*w;

setLabel(s, Form1->Square, " м2");

L = Form1->Edit1->Text.ToInt();

t1 = L/(k6*V);

setLabel(t1, Form1->timeA, " c");

t2 = (ti*k5);

setLabel(t2, Form1->timeB, " час");

}

// Контроль ввода количеста СДЯВ и расстояния до объекта экономики