Probleme de combinaison en C

Array[0] = 1;
Array[1] = 2;
Array[2] = 3;

for( char i=0  ;  i++  ;  i==n )
{
      for( char j=0 ; j++ ; j==n )
     {
            if( j!=i)
            {
                  for( char k=0 ; k++ ; k==n)
                 {
                        if( (k!=j) && (k!=i) )
                        {
                                    cout >> Array[i];
                                    cout >> Array[j];                       
                                    cout >> Array[k];
                        }
                  }
             }
         }
}

scanf( "%d", &NB_VAL );
scanf( "%d", &(array[i]) ); ou scanf( "%d", array+i ) ;

array[++index] = ++num; 

#include <stdio.h>
short **ar;
int nb_val,nb_ar;
short** permutation(int*,int);
int fact(int);
int main()
    {
    scanf("%d",&nb_val);
    nb_ar=fact(nb_val);
    ar=new short*[nb_ar];
    int val[nb_val];
    for(short i=0;i<nb_val;i++)
        scanf("%d",(val+nb_val));
    ar=permutation(val,nb_val);
    }
int fact (int n){if(n==0)return 1;else return n*fact(n-1);}
void insert(short**,short**,int,int,int,int);
short** permutation(int* val,int nb_val)
    {
    short **arn,**ar;
    if(nb_val==2) {arn[0][0]=arn[1][1]=val[0];arn[0][1]=arn[1][0]=val[1];return arn;}
    int val0=val[0];int *valn;
    for(int i=0;i<nb_val-1;i++)valn[i]=val[i+1];
    arn=permutation(valn,nb_val-1);
    int k=0;
    for(int i=0;i<fact(nb_val-1);i++)
        {
        insert(ar,arn,val0,i,k,nb_val);
        k++;
        }
    return ar;
    }
void insert(short**ar,short**arn,int val0,int i,int k,int nb)
    {
    for(int j=0;j<nb-1;j++)
        {
        if(j<i)
        ar[k][j]=arn[i][j];
        if(j==i)
        ar[k][j]=val0;
        if(j>i)
        ar[k][j+1]=arn[i][j];
        }
    }
    

[lamitest@localhost my_perl_script]$ perl factoriel.pl
Entrez un nombre entier, 2 par défaut: 170
170! = 1 * 2 * 3 * ..... * 168 * 169 * 170 = 7.25741561530799e+306.
[lamitest@localhost my_perl_script]$ perl factoriel.pl
Entrez un nombre entier, 2 par défaut: 171
171! = 1 * 2 * 3 * ......* 168 * 169 * 170 * 171 = inf.
[lamitest@localhost my_perl_script]$

#! /usr/bin/perl -w
use strict;
my @nb;
$"="-"; # variable spéciale Perl - quoi mettre entre les éléments d'un tableau 
	# quand le tableau est interpolé. Par défaut c'est espace
# On saisi le nombre N, par défaut 3

print "Donnez le nombre de chiffres, nombres, caractères, mots, que vous voulez permuter [3 par défaut] : ";
chomp(my $nombre=<STDIN>);
$nombre ||= 3;

my $compteur=1;
while ($compteur <= $nombre){
        print "Entrez l'élément $compteur : ";
        chomp(my $nb=<STDIN>);
        push @nb,$nb; # stocker les nombres dans un tableau
        $compteur++;
}

sub factorial{# calculer le nombre des possibilités - peut être exclus du script
	my $factorial=1;
	foreach(1..$_[0]){ $factorial *= $_ }
	return $factorial;
}

print "Le nombre des combinaisons possible : ",factorial($nombre),"\n";

# c'est ici la fonction qui calcule les combinaisons
# la partie qui calcule le nombre des combinaisons on n'a pas besoin

sub permutation {
	my @chaine   = @{ $_[0] };
	my @permuter = @{ $_[1] };
	
	unless (@chaine) {
		print "@permuter\n";
	}else{
		my (@chaine_, @permuter_, $i);
		foreach $i (0..$#chaine){
                	@chaine_   = @chaine;
                	@permuter_ = @permuter		   ;
			unshift (@permuter_, splice(@chaine_,$i,1));
			permutation ( [@chaine_], [@permuter_])    ;
		}
	}
}

permutation ([@nb], []);

[lamitest@localhost my_perl_script]$ perl permutation.pl
Donnez le nombre de chiffres, nombres, caractères, mots, que vous voules permuter [3 par défaut] :
Entrez le nombre 1 : 1
Entrez le nombre 2 : 2
Entrez le nombre 3 : 3
Le nombre des combinaisons possible : 6
3-2-1
2-3-1
3-1-2
1-3-2
2-1-3
1-2-3
[lamitest@localhost my_perl_script]$

[lamitest@localhost my_perl_script]$ perl permutation.pl
Donnez le nombre de chiffres, nombres, caractères, mots, que vous voules permuter [3 par défaut] :
Entrez le nombre 1 : 11
Entrez le nombre 2 : 12
Entrez le nombre 3 : 13
Le nombre des combinaisons possible : 6
13-12-11
12-13-11
13-11-12
11-13-12
12-11-13
11-12-13
[lamitest@localhost my_perl_script]$

[lamitest@localhost my_perl_script]$ perl permutation.pl
Donnez le nombre de chiffres, nombres, caractères, mots, que vous voules permuter [3 par défaut] :
Entrez le nombre 1 : a
Entrez le nombre 2 : b
Entrez le nombre 3 : c
Le nombre des combinaisons possible : 6
c-b-a
b-c-a
c-a-b
a-c-b
b-a-c
a-b-c
[lamitest@localhost my_perl_script]$

[lamitest@localhost my_perl_script]$ perl permutation.pl
Donnez le nombre de chiffres, nombres, caractères, mots, que vous voules permuter [3 par défaut] :
Entrez le nombre 1 : lamia86
Entrez le nombre 2 : Char Snipeur
Entrez le nombre 3 : lami20j
Le nombre des combinaisons possible : 6
lami20j-Char Snipeur-lamia86
Char Snipeur-lami20j-lamia86
lami20j-lamia86-Char Snipeur
lamia86-lami20j-Char Snipeur
Char Snipeur-lamia86-lami20j
lamia86-Char Snipeur-lami20j
[lamitest@localhost my_perl_script]$

#include <stdio.h>
#include <stdlib.h>

void permutation( int* e, int nb, int rang ) ;

int main( int argc, char** argv )
    {
    int     nb      ;   /* Le nombre d'entier à permuter */
    int *   entree  ;   /* Le tableau qui contiendra les nombres */
    int     i       ;

    printf( "Nb d'entier : " ) ; fflush(stdin) ;
    fflush( stdout ) ; scanf( "%d", &nb ) ;

    entree = malloc( nb * sizeof( int ) ) ;
    if ( !entree )
        {
        perror( "malloc:" ) ;
        return 1 ;
        }
    for( i=0; i<nb; i++ )
        {
        printf( "Entier %d : ", i+1 ) ; fflush(stdin) ;
        fflush( stdout ) ; scanf( "%d", entree+i ) ;
        }

    permutation( entree, nb, 0 ) ;

    free( entree ) ;
    return 0 ;
    }

void permutation( int* e, int nb, int rang )
    {
    int i, j ;
    if ( rang == nb-1 ) /* Le zone à permutter ne contient qu'un élément */
        {
        char* sep = "" ;
        for( i=0; i<nb; i++ )
            {
            printf( "%s%d", sep, e[i] ) ;
            sep = ", " ;
            }
        printf( "\n" ) ;
        }
    else
        for( i=rang; i<nb; i++ )
            {
            int  prem  ;
            permutation( e, nb, rang+1 ) ;

            /* on fait tourner les éléments de la zone à permutter */
            prem = e[rang] ;
            for( j=rang+1; j<nb; j++ ) e[j-1] = e[j] ;
            e[nb-1] = prem ;
            }
    }