Предыдущая страница реферата | 2  3  4  5  6  7  8  9  10  11  12 | Следующая страница реферата

float velocity[6] = {1, 0.7, 0.55, 0.43, 0.37, 0.32};

// Таблица рассчета k3 в зависимости от вида хранилища

float store[2] = {1, 2/3.0};

// Таблица рассчета k4 в зависимости от вида местности

float place[2] = {1, 1/3.0};

// Таблица рассчета времени испарения СДЯВ в зависимости от типа СДЯВ и вида

// хранилища

float timeOF[4][2] = {{1.3, 22},{1.2, 20},{1.3, 20},{1.4, 23}};

// Таблица: токсические свойства СДЯВ

float prop[4][2] = {{0.2, 360},{0.01, 60},{0.05, 10},{0.4, 50}};

//Функция конструтор

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

//Функция вывода рассчетных значений

void setLabel(float what, TLabel *a, char *b)

{

int i,l;

AnsiString bff;

bff = FormatFloat("0.00", what);

i = a->Caption.Pos(": ");

l = a->Caption.Length() - i;

a->Caption = a->Caption.Delete(i+2, l);

a->Caption = a->Caption + bff + b;

}

// Функции пересчета коэффициентов и значений

void setTI()

{

ti = timeOF[Form1->ComboBox1->ItemIndex][Form1->ComboBox4->ItemIndex];

}

void setD()

{

D = prop[Form1->ComboBox1->ItemIndex][0]*prop[Form1->ComboBox1->ItemIndex][1];

D = D*60/100000.0;

}

void setk1k2k6()

{

k1 = atm[0][Form1->ComboBox2->ItemIndex];

k2 = atm[1][Form1->ComboBox2->ItemIndex];

k6 = atm[2][Form1->ComboBox2->ItemIndex];

}

void setk5V()

{

k5 = velocity[Form1->ComboBox3->ItemIndex];

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

}

void setk3()

{

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

Рекомендуем скачать другие рефераты по теме: решебник класс по математике, реферат рк.



Предыдущая страница реферата | 2  3  4  5  6  7  8  9  10  11  12 | Следующая страница реферата

Поделитесь этой записью или добавьте в закладки