Главная страница


ru.algorithms

 
 - RU.ALGORITHMS ----------------------------------------------------------------
 From : Vladimir Vassilevsky                 2:5020/175.2   28 Dec 2002  23:35:20
 To : Igor Kasyanchuk
 Subject : масив чисел
 -------------------------------------------------------------------------------- 
 
 Hi Igor,
 
 Fri Dec 27 2002 16:23, Igor Kasyanchuk wrote to All:
  
  IK> Как в масив  А(10) можно закинуть 10 разных чисел от 0 до 9 чтобы
  IK> числа в масиве на ПОВТОРЯЛИСЬ  .
  
 /*
 (c)VLV
 */
 
 #include <stdio.h>
 
 unsigned int Factorial(unsigned int n)
 {
 unsigned int i,f = 1;
 
 for(i = 2; i <= n; i++) f *= i;
 
 return f;
 }
 
 //-----------------------------------------------
 // Generate combination i from n! combinations
 // 
 //
 void GetCombination(unsigned int *c, unsigned int n, unsigned int i)
 {
 unsigned int j,k,l,m;
 
 for(k = 0; k < n; k++) c[k] = n;
 
 m = 0;
 j = Factorial(n);
 for(k = n; k >= 1; k--)
  {
  j /= k;
  l = i/j;
  i -= l*j;
  l++;
  do {
     do { 
        if(++m == n) m = 0; 
        } while(c[m] != n);    
     } while(--l);
  c[m] = k-1; 
  }
 }
 
 #define N 10
 
 void main(void)
 {
 unsigned int i,j,Nfact;
 unsigned int c[N];
 
 Nfact = Factorial(N);
 
 for(i=0;i<Nfact;i++)
  {
  GetCombination(c, N, i);
  printf("\n");
  for(j=0;j<N;j++) printf(" %u",c[j]); 
  }
 printf("\n");
 }
 
  
 
 "Hе лыком единым шит человек"
 
 --- ifmail v.2.15dev5
  * Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 масив чисел   Igor Kasyanchuk   27 Dec 2002 17:23:00 
 масив чисел   Vladimir Vassilevsky   28 Dec 2002 23:35:20 
 Re: масив чисел   Oleg Khovayko   29 Dec 2002 21:16:29 
 Re: масив чисел   Sergey Andrianov   30 Dec 2002 23:52:36 
 масив чисел   Igor Kasyanchuk   31 Dec 2002 20:56:00 
 масив чисел   Evgenij Masherov   01 Jan 2003 14:01:27 
 масив чисел   Sam   01 Jan 2003 19:01:20 
 Re: масив чисел   Eugene Kilachkoff   01 Jan 2003 22:14:24 
 масив чисел   Evgenij Masherov   02 Jan 2003 00:13:58 
 масив чисел   Sam   03 Jan 2003 00:35:31 
 масив чисел   Evgenij Masherov   03 Jan 2003 03:12:13 
 масив чисел   Sam   03 Jan 2003 14:33:28 
 масив чисел   Igor Kasyanchuk   03 Jan 2003 23:50:00 
 масив чисел   Sam   06 Jan 2003 00:02:09 
 масив чисел   Igor Kasyanchuk   01 Jan 2003 21:07:00 
 масив чисел   Evgenij Masherov   02 Jan 2003 10:22:47 
 масив чисел   Sam   03 Jan 2003 00:41:27 
 Re: масив чисел   Eugene Kilachkoff   03 Jan 2003 01:03:01 
 масив чисел   Sam   03 Jan 2003 14:29:25 
 масив чисел   Evgenij Masherov   03 Jan 2003 03:14:59 
 Re: масив чисел   Oleg Khovayko   03 Jan 2003 03:39:51 
 Re: масив чисел   Evgenij Masherov   03 Jan 2003 03:58:20 
 Re: масив чисел   Sergej Tarasov   03 Jan 2003 04:29:11 
 Re: масив чисел   Evgenij Masherov   03 Jan 2003 04:59:16 
 Re: масив чисел   Sergej Tarasov   03 Jan 2003 05:24:40 
 Re: масив чисел   Oleg I. Khovayko   03 Jan 2003 18:03:07 
 Re: масив чисел   Evgenij Masherov   03 Jan 2003 22:57:30 
 масив чисел   Max Alekseyev   29 Jan 2003 18:49:50 
 масив чисел   Evgenij Masherov   30 Jan 2003 11:02:18 
 масив чисел   Max Alekseyev   30 Jan 2003 02:03:18 
 масив чисел   Nickita A Startcev   05 Jan 2003 22:26:44 
 масив чисел   Evgenij Masherov   06 Jan 2003 20:16:24 
 Re: масив чисел   Anatoly Saveliev   08 Jan 2003 08:32:30 
 масив чисел   Oleg Polubasoff   06 Jan 2003 22:12:54 
 Re: масив чисел   Oleg I. Khovayko   08 Jan 2003 00:33:51 
 масив чисел   Max Alekseyev   29 Jan 2003 18:45:26 
 Re: масив чисел   Sergey Andrianov   04 Jan 2003 00:13:42 
 масив чисел   Alexey Burdin   04 Jan 2003 19:45:36 
 масив чисел   Igor Kasyanchuk   04 Jan 2003 21:16:00 
 масив чисел   Ianos Gnatiuc   05 Jan 2003 09:53:22 
 масив чисел   Nickita A Startcev   05 Jan 2003 22:15:12 
 Re: масив чисел   Sergey Andrianov   04 Jan 2003 00:11:36 
 Re: масив чисел   Andrew Starsh   01 Jan 2003 11:50:53 
Архивное /ru.algorithms/3300837f3e01.html, оценка 1 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional