[HTML]int a[15];
int i=0,k,dsp;
for(1,a[i]<15,a[++i]++);
for(15,i-6,i--)
{
dsp = Math.Rand(1,i) ;
for(t,k<i,k++) a[k-1]=a[k];
switch(i)
{
case 15 :stanc="ADL"; break;
case 14 :stanc="VES"; break;
case 13 :stanc="TSA"; break;
case 12 :stanc="CHI"; break;
case 11 :stanc="GAG"; break;
case 10 :stanc="BZP"; break;
case 9 : stanc="MIS"; break;
case 8 : stanc="ZVN"; break;
case 7 : stanc="GUD"; break;
}
stancdsp=stanc+dsp;
}[/HTML]
Попробуй так. Если не работает пиши в ЛС.
А смысл такой : мы "вычёркиваем" назначенных диспетчеров. На примере 6 человек, направляемых в 6 станций (подчеркавания - номера вычеркнутых):
1234
56
1
2346
5
1346
25
34
6 125
34
6125
4 36125
436125 - читаем наоборот и получаем перестановку 521634
И ещё: пусть в этой теме будет и ссылка на оригинальный мануал Aurana:
http://files.auran.com/TRS2006/manuals/ файл TRS2006-API.zip
Прошу обьединить сообщения