IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Girilen sayını kaprekar olup olmadığını araştıran program.
Kod:
#include<stdio.h>

#include<conio.h>

/* Kaprekar Sayılar */

main(){

    int sayi,sakla, sayac=0, i, kucuk=-1, buyuk, minisayac;

    int dizi[4];;

    printf("Gireceginiz sayinin kaprekar sayi olup olmadigi kontrol edilecektir.\n\n");

    do{

        printf("Dort basamakli sayi giriniz: ");

        scanf("%d",&sayi);

    }while(sayi>10000 || sayi<999);
 

    do{

        sayac++;

        if(sayac>7)break;

        if(kucuk!=-1)sayi=buyuk-kucuk;

        // basamaklarina ayir

        dizi[0]=sayi/1000;

        dizi[1]=(sayi-dizi[0]*1000)/100;

        dizi[2]=(sayi%100)/10;

        dizi[3]=sayi%10;

        //sayi buyukten kucuge sýralanýr

        do{

            minisayac=0;

            for(i=0;i<=2;i++){

                if(dizi[i]>dizi[i+1]){

                    sakla=dizi[i];

                    dizi[i]=dizi[i+1];

                    dizi[i+1]=sakla;

                    minisayac++;

                    }

            }

        }while(minisayac!=0);

        buyuk=dizi[0]+dizi[1]*10+dizi[2]*100+dizi[3]*1000;

        // sayi kucukten buyuge siralanir

        do{

            minisayac=0;

            for(i=0;i<=2;i++){

                if(dizi[i]<dizi[i+1]){

                    sakla=dizi[i];

                    dizi[i]=dizi[i+1];

                    dizi[i+1]=sakla;

                    minisayac++;

                    }

            }

        }while(minisayac!=0);

        kucuk=dizi[0]+dizi[1]*10+dizi[2]*100+dizi[3]*1000;

        // islemlerin dogrulugunu test etmek icin printf fonksiyonu konuldu

        printf("Asama %d: %d-%d=%d\n",sayac,buyuk,kucuk,buyuk-kucuk);
 

    }while(buyuk-kucuk!=6174);
 

    if(sayac>7) printf("\ngirdiginiz sayi, kaprekar sayi degildir.");

    if(buyuk-kucuk==6174) printf("\n%d. dereceden kaprekar sayidir.",sayac);
 

getch();

}