Program Generate Permutasi

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

using namespace std;

int hasil;
//fungsi faktorial :
int faktorial (int nilai)
{
hasil = nilai;
while(nilai>1)
{
hasil = hasil*(nilai-1);
nilai = nilai-1;
}
return hasil;
}
main()
{
int p,nq,max,x,i,j,n,k,r,s,tr,no ;
int a[100];
div_t xx;

for (i=0;i<100;i++)
{
a[i] =0;
}
//Tampilkan pembuka
printf("\n PROGRAM GENERATE PERMUTASI\n\n");

//input nilai n(jumlah data <maksimal 100>)
printf("Masukan nilai n : ");
scanf("%d",&n);
//input data ke dalam array
for(i=1;i<=n;i++) //ulangi untuk semua data hingga data ke-n
{
printf("Masukan nilai himpunan a[%d] : ",i);
scanf("%d",&a[i]);
}

//input nilai r
printf("nilai r : ");
scanf("%d",&tr);

//hitung nilai permutasi
p=faktorial(n);
nq=faktorial(n-tr);
if(nq==0)nq=1;
max=p/nq;

printf("nilai permutasi : %d\n\nTekan Enter untuk melihat hasil generate permutasi...\n",max);

getche();//fungsi membaca karakter keyboard
no=1;//variabel untuk menampilkan nomor

//men-generate permutasi dengan
//algoritma generate next-permutation

//genere sabanyak nilai permutasi
for(x=1;x<=max;x++)
{
printf("%3d. ",no);
for(i=1;i<=tr;i++)
printf("%d",a[i]);
printf("\n",a[i]);
no++;

j=n-1;
while(a[j] > a[j+1])
j=j-1 ; //j adalah subcript terbesar dengan aj<aj+1
k=n;
while(a[j] > a[k])
k=k-1 ; //ak adalah integer terkecil dan lebih besar dari aj

//tukar aj dan ak
i=a[k];
a[k]=a[j];
a[j]=i;

r=n;
s=j+1;
while (r>s)
{
//tukar ar dan as
i=a[r];
a[r]=a[s];
a[s]=i;

r=r-1;
s=s+1;
}
}

system("PAUSE");
return EXIT_SUCCESS;
}

Cinta untuk yang jatuh cintaaaa

Hallo cinta, dengarlah kisahku malam ini. Sungguh indah jika aq dan qm saling mencintai, hanya wajahmu dan bahagia, saat aq mendengar indah suara lembutmu dan mencium bau aroma tubuhmu. Cinta membuatku bahagia jika aq tepat memilih, seakan akan duniaku bergelora, membakar jiwa, membuatku berubah menjadi pujangga yg tidak berhenti merangkai kata cinta. Cinta bagiku adalah satu kata, tapi berjuta makna, memang banyak manusia di dunia tapi mungkin hanya kamu yang aku pilih, harapanku dalam do'a. Agar hatiku 'slalu dekat dihatimu, jadikan aku jodohmu dalam ikatan suci agama dan dalam catatan resmi negara. Mencinta sampai tutup usia. Bersyukur aq bisa merasakan lucunya jatuh cinta, Big thanks to Allah for love give to us :))))