Показать сообщение отдельно
Старый 10.07.2007, 18:43
VladBD вне форума Посмотреть профиль Отправить личное сообщение для VladBD Найти все сообщения от VladBD
  № 6  
Ответить с цитированием
VladBD

Регистрация: Oct 2006
Сообщений: 32
Вот писал под пятняшки, вообще можно переделать под универсальную функцию

Код:
//создание массива случайных чисел	
  a1 = [1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16];
  a2 = [0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0];
  for (i=1; i<=a1.length; i++) {
	n=random(a1.length-i+1);
	a2[a1.length-i]=a1[n]-1;
	for (j=n; j<=a1.length-2; j++) {a1[j]=a1[j+1];}
  }