Курсовая работа: Разработка имитационной модели

X=X+ravnom(d1,d2);

return X;

}

float lognorm(float Ay, float By)

{

randomize();

float X,Y,a,b;

b=log(By/pow(Ay,2)+1);

a=log(Ay-0.5*b);

X=normal(a,b);

Y=exp(X);

return Y;

}

int puasson(float t)

{

randomize();

int n;

int R, R11;

do

{ R*=random(100)/100.0;

R11=R;

R*=random(100)/100.0;

n++; }

while(exp(-t)>=R11&&exp(-t)<R);

return (n-1);

}

float optmag(float &TTEK, int ZZ)

{

int Tzak,a=90,b=10;