Permutasi Kombinasi

Posted: Sabtu, 02 April 2011 by Alfi Haryadi in
1


#include
#include
#include
long int fak (long int x);
void main()
{
int n,r, Prts,pilihan,p;
char ulang;
do
{
clrscr();
cout<<"Permutasi dan Kombinasi Program by FTIKOM B"<<endl<<endl;
cout<<"********************************************"<<endl<<endl;
cout<<"* Disusun OLeh :                           *"<<endl<<endl;
cout<<"* 1. Alfi Haryadi  (1015015077)            *"<<endl<<endl;
cout<<"********************************************"<<endl<<endl;

cout<<"PERHITUNGAN KOMBINASI DAN PERMUTASI"<<endl;
cout<<"1. KOMBINASI"<<endl;
cout<<"2. PERMUTASI"<<endl;
cout<<"3. EXIT"<<endl;
cout<<endl<<endl;
cout<<"Tolong Masukan Pilihan Anda : ";cin>>pilihan;
switch (pilihan)
{
case 1 :
    cout<<" Tolong Jangan Masukan Data 2 Lebih Besar Dari Data 1 'Kombinasi'(nCr)";
        cout<<endl;
    cout<<" Tolong Inputkn Data 1 : "; cin>>n;
        cout<<endl;
   cout<<" Tolong Inputkn Data 2 : "; cin>>r;
        cout<<endl;
if (n>r){
    Prts = fak(n)/(fak(n-r)*fak (r));
cout<<endl;
printf(" Kombinasinya adalah: %d",Prts);
cout<<endl; }
else if (n<r){
cout<<"Maaf data tak valid";}
cout<<endl ;
break;

case 2 :
    cout<<"Tolong Jangan Masukan Data 2 Lebih Besar Dari Data 1 'Permutasi'(nPr)";
        cout<<endl;
    cout<<" Tolong Inputkn Data 1 : "; cin>>n;
        cout<<endl;
    cout<<" Tolong Masukan Data 2 : "; cin>>r;
        cout<<endl;
if (n>r){
Prts = fak (n)/fak(n-r);
cout<<endl;

printf(" Permutasinya adalah: %d",Prts);
cout<<endl; }
else if (n<r){
cout<<"Maaf Data Anda Tidak Valid";}
cout<<endl ;
break;
case 3 :
cout<<"Yakin Ingin Keluar?¦"<<endl;
break;
default:
cout<<"Menu tidak tersedia"<<endl;
break;
}
cout<<"Kembali ke Menu Utama (y/n)?";cin>>ulang;
}while(ulang == 'y');
}

getch();
long int fak (long int n)
{
int f;
if (n<=1)
{
f=1;
}
else
{
f=n*fak(n-1);
}
return (f);
}

Dan Begini Hasilnya :



1 komentar:

  1. Unknown says:

    asik nih, bisa buat tugas kuliah hehe
    mampir sini ya http://gudasi.com
    mudah-mudahan bermanfaat :)


السلام عليكم Assalammualaikum بِسْــــــــــــــــــــــمِ اﷲِارَّحْمَنِ ارَّحِي Cinta itu adalah pembodohan, jangan percaya tentang cinta . . . Karena cinta hanya dapat merusak saraf