Моделювання однофазної системи

double p = (int)GetTickCount();

//генератор нормально розподілених випадкових чисел

double Rand(double p0)

{

double t, x, q;

x = a * p0;

t = x / m;

q = (int)t;

p = x - q * m;

t = p / m

return t;

}

// генератор випадкових чисел, розподілених по експоненційному закону

double Exponent(UINT lambda)

{

double r;

r = Rand(p);

return ( (-1 / lambda) * log(r) );

}

//return -1000 ... +1000

int Generator()

{

double d1;

int res;

static bool b = TRUE;

d1 = Exponent(900000);

res = (int)d1;

if(res<0) res *= -1;

while(res>1000)

{