Лабораторная работа: Проверка гипотезы о нормальности закона распределения экспериментальных данных
case 10:
{
P[1] ++;//P1
P[0] ++;//P0
P[4] ++;//P10
} break;
case 11:
{
P[1] += 2;//P1
P[5] ++; //P11
} break;
}
}
P[2] /= InSequence.Length()/2;// P00/(длина входной последовательности разделённая на 2)
P[3] /= InSequence.Length()/2;// P01/(длина входной последовательности разделённая на 2)
P[4] /= InSequence.Length()/2;// P10/(длина входной последовательности разделённая на 2)
P[5] /= InSequence.Length()/2;// P11/(длина входной последовательности разделённая на 2)
P[0] /= InSequence.Length(); // P0/(длина входной последовательности)
P[1] /= InSequence.Length(); // P1/(длина входной последовательности)
}
//---------------------------------------------------------------------------
//генерирует случайное число с плавающей запятой в заданном диапазоне
double __fastcall TMainForm::Randouble(double min, double max)
{return (double)rand()/(double)RAND_MAX*(max-min)+min;
}
//---------------------------------------------------------------------------
//генерируем последовательность из случайных чисел
AnsiString GenSequence;
AnsiString __fastcall TMainForm::GenModel(double *P, int Count)