генерация выборки

[Ivan111]

Привет всем=) Не получается полностью реализовать программу, помогите кто понимает

Необходимо осущиствить генерацию выборки (хi, i=1,n)
n задает пользователь с экрана
1. с равномерным законом
2. с нормальным законом
3. с показательным

Вид закона распределения выбирает пользователь

Рассчитать х =1/n ∑ xi (i степень, над х крышка)
р=1/n-1∑(хi=x)2 (i степень, 2 степень)

Построить график оценки функции распределения
Построить оценку плотности вероятности с помощью гистограммного метода

Вот программный код первой части (что-то примерно вроде так)
#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "Math.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "CSPIN"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::SpeedButton1Click(TObject *Sender)
{
int n;
Series1->Clear();
Series2->Clear();
Series3->Clear();

//Series1->AddXY(0,1);
//Series1->AddXY(1,2);
//Series1->AddXY(3,1);
randomize;
n=CSpinEdit1->Value;
for (int i=0;i<n;i++)
{
if (RadioGroup1->ItemIndex==0) Series2->AddXY((random(100)*0.01),0);
if (RadioGroup1->ItemIndex==1) Series2->AddXY(((random(100)*0.01)+(random( 100)*0.01)+(random(100)*0.01)+(rand om(100)*0.01)+(random(100)*0.01))/5,0);
if (RadioGroup1->ItemIndex==2) Series2->AddXY(sqrt(random(100)*0.01),0);
}

//Series3->AddXY(4,5);
//Series3->AddXY(4.5,7);
//Series3->AddXY(5,8);
//Series3->AddXY(6,4);
}