Контрольная работа: Имитационное моделирование на основании предварительно установленных зависимостей
n=floor( minutes/2+0.5 );
x=RND_DIG(); // Примем случ. число
tau=0;
j=0;
a=exp( (lambda * (-1)) ); // Расчет нач. знач-я пар-ра а
S=0;
do
{
if( S>=x && x<S+a ) // Проверка х на пренадл-ть промежутку [S ; S+a)
break;
tau++;
j++;
S+=a;
a*=lambda/j;
}
while( tau<=n );
return current_time+tau; // Возвратим время до входа след-го клиента
}