Program Kombinasi dan permutasi,bahsa C ,(turbo C.

/*nama file:while.1.C
  Pembuat  : ngegembleng PC ,
  Tgl pembuat :  9 desember 2013
  Deskripsi : program while Permutasi Dan kombinasi . */

#include "stdio.h"
#include "conio.h"

long int factorial (int x);
void main()
{
int n,r,x,i,pil,faktorial_N,faktorial_R,nr,faktorial_nr;
long int kombinasi,permutasi;
clrscr();
printf("(bil1)Masukkan nilai n: ");
scanf("%d", &n);
printf("(bil2)masukkan nilai r : ");
scanf("%d",&r);
nr=n-r;

{ x=1; // inisialisasi
for ( i=n; i>=1 ;i-- )
x=x*i;
faktorial_N=x;
printf("\n faktorial bilangan n = %d",faktorial_N); }
{x=1; // inisialisasi
for ( i=r; i>=1 ;i-- )
x=x*i;
faktorial_R=x;
printf("\n faktorial bilangan r = %d",faktorial_R); }
{x=1; // inisialisasi
for ( i=nr; i>=1 ;i-- )
x=x*i;
faktorial_nr=x;
printf("\n faktorial bilangan nr = %d",faktorial_nr); }


kombinasi=faktorial_N/((faktorial_R)*(faktorial_nr));
permutasi=faktorial_N/faktorial_nr;

printf("\nBanyaknya kombinasi yang mungkin adalah %d ", kombinasi);

printf("\nBanyaknya Permutasi yang mungkin adalah %d ", permutasi);
getch ();
}