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

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)

{

res = (int)res / 2;

}

if(b) res *= -1;

b = !b;