پروژه های رایگان برنامه نویسی و آموزش زبان C++ و C#
برنامه بدون خطا رویاست Program is impossible without an error
درباره وبلاگ


انجام پروژه های برنامه نویسی سی و سی پلاس پلاس و سی شارپ

انجام پروژه های الکترونیکی و رباتیکی

مدیر وبلاگ : سجاد سلطانی
مطالب اخیر
نویسندگان
آمار وبلاگ
  • کل بازدید :
  • بازدید امروز :
  • بازدید دیروز :
  • بازدید این ماه :
  • بازدید ماه قبل :
  • تعداد نویسندگان :
  • تعداد کل پست ها :
  • آخرین بازدید :
  • آخرین بروز رسانی :














free counters

این سورس یک عدد گرفته و به تعداد همان عدد از ورودی دریافت می کند و آنها را با روش . Quick sort مرتب می کند .

 

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

//--------------------------------------------------------------------------
void read_list(int a[],int n){
 int i;
 for(i=0;i<n;i++){
  printf("\n\n\t ENTER THE ELEMENT [%d] :: ",i);
  scanf("%d",&a[i]);
  }
}
//--------------------------------------------------------------------------
void print_list(int a[],int n){
 int i;
 for(i=0;i<n;i++)
  printf("\n\n\t %d",a[i]);
}
//--------------------------------------------------------------------------
void quick_sort(int a[],int first,int last){
 int low,high,temp,pivot;
 low=first;
 high=last;
 pivot=a[(first+last)/2];

 do{
  while(a[low]<pivot)
   low++;
  while(a[high]>pivot)
   high--;
   if(low<=high){
   temp=a[low];
   a[low]=a[high];
   a[high]=temp;
   low=low+1;
   high=high-1;
   }
 }while(low<=high);

 if(first<high)
  quick_sort(a,first,high);
 if(low<last)
  quick_sort(a,low,last);
}
//--------------------------------------------------------------------------
void main(){
 int a[20],n;

 clrscr();
 printf("\n\n\t ENTER THE ARRAY LENGTH :: ");
 scanf("%d",&n);

 read_list(a,n);

 printf("\n\n\t THE ARRAY ELEMENTS ARE AS FOLLOWS :: ");
 print_list(a,n);

 quick_sort(a,0,n-1);

 printf("\n\n\t THE SOTED LIST IS :: ");
 print_list(a,n);
 getch();
}
//--------------------------------------------------------------------------





نوع مطلب : پروژه های برنامه نویسی ++C، 
برچسب ها :
لینک های مرتبط :

       نظرات
چهارشنبه 22 مهر 1388
سجاد سلطانی
دوشنبه 3 تیر 1398 03:34 قبل از ظهر

You actually expressed this fantastically.
dose size of cialis cialis daily reviews cialis 5mg prix get cheap cialis cialis professional from usa we recommend cialis best buy cialis generico postepay tesco price cialis warnings for cialis click here to buy cialis
یکشنبه 2 تیر 1398 11:41 قبل از ظهر

Truly tons of wonderful facts.
cialis pills boards price cialis per pill cialis name brand cheap achat cialis en suisse cialis generique cialis 5 mg schweiz cialis wir preise cialis online napol wow look it cialis mexico cialis farmacias guadalajara
شنبه 1 تیر 1398 08:58 بعد از ظهر

Thanks. Wonderful information!
5 mg cialis coupon printable cialis official site generic cialis levitra generic cialis 20mg uk american pharmacy cialis cialis 20mg buying cialis in colombia cialis venta a domicilio cialis generika cialis cipla best buy
شنبه 1 تیر 1398 04:06 قبل از ظهر

You definitely made the point.
how to purchase cialis on line precios cialis peru cialis australia org generic cialis levitra cialis pills in singapore brand cialis nl cialis 5mg billiger cialis 20mg prix en pharmacie precios cialis peru cialis para que sirve
پنجشنبه 30 خرداد 1398 07:31 بعد از ظهر

Superb info. Cheers.
wow look it cialis mexico cialis price thailand acquistare cialis internet cialis para que sirve cialis kaufen bankberweisung 40 mg cialis what if i take cialis from canada safe site to buy cialis online cialis et insomni cialis for sale
پنجشنبه 30 خرداد 1398 01:07 قبل از ظهر

Many thanks! Awesome stuff!
40 mg cialis what if i take brand cialis generic cialis 20mg cialis rezeptfrei sterreich comprar cialis 10 espa241a purchasing cialis on the internet tadalafil generic 200 cialis coupon cialis generic tadalafil buy cialis coupon
چهارشنبه 29 خرداد 1398 08:22 قبل از ظهر

Awesome data. Regards!
acheter cialis meilleur pri sialis 5 mg cialis coupon printable cialis in sconto cialis without a doctor's prescription buying cialis overnight sublingual cialis online only here cialis pills cialis 20 mg cut in half cialis preise schweiz
سه شنبه 28 خرداد 1398 10:06 قبل از ظهر

You reported that really well.
free generic cialis cialis tadalafil online purchasing cialis on the internet cialis generico lilly price cialis best cialis in sconto buy cheap cialis in uk purchase once a day cialis cialis without a doctor's prescription cialis generico milano
دوشنبه 27 خرداد 1398 06:51 بعد از ظهر

Whoa many of awesome advice.
cialis preise schweiz cialis 05 generic cialis cost of cialis per pill american pharmacy cialis cialis pills in singapore cialis coupon dose size of cialis we like it cialis soft gel cialis uk next day
دوشنبه 27 خرداد 1398 03:48 قبل از ظهر

You revealed this adequately.
cialis flussig cialis 20mg prix en pharmacie cialis 10mg prix pharmaci cialis price thailand cost of cialis cvs cialis coupons printable cialis 20 mg cut in half order cialis from india cialis generico lilly price cialis wal mart pharmacy
یکشنبه 26 خرداد 1398 02:21 بعد از ظهر

Useful posts. Appreciate it.
acheter cialis meilleur pri cialis tadalafil cialis rckenschmerzen does cialis cause gout cialis tablets for sale can i take cialis and ecstasy cialis online holland bulk cialis cialis savings card cialis 5mg billiger
پنجشنبه 23 خرداد 1398 03:26 بعد از ظهر

Truly many of wonderful knowledge.
where to buy cialis in ontario walgreens price for cialis cialis in sconto precios de cialis generico we choice free trial of cialis order cialis from india cialis 5mg prix compare prices cialis uk cialis 5 mg funziona cialis kaufen wo
پنجشنبه 23 خرداد 1398 01:52 قبل از ظهر

Nicely expressed genuinely! .
i recommend cialis generico deutschland cialis online cialis sale online buy cialis online legal wow look it cialis mexico achat cialis en europe cialis kamagra levitra cialis taglich cialis therapie we like it cialis price
دوشنبه 20 خرداد 1398 01:12 قبل از ظهر

You made your point.
venta cialis en espaa brand cialis generic opinioni cialis generico cialis cuantos mg hay cialis cost link for you cialis price cialis for bph tadalafil generic tadalafil 20mg il cialis quanto costa
شنبه 18 خرداد 1398 07:13 بعد از ظهر

Amazing posts. Appreciate it.
american pharmacy cialis cialis kaufen bankberweisung cialis 5 mg effetti collateral cialis venta a domicilio cialis rezeptfrei sterreich cialis prezzo in linea basso cialis pills in singapore only here cialis pills cialis authentique suisse cialis generisches kanada
جمعه 17 خرداد 1398 11:46 بعد از ظهر

This site was... how do I say it? Relevant!! Finally I've found something that helped me. Cheers!
یکشنبه 25 بهمن 1388 05:59 بعد از ظهر
salam bebakhshid 1 soal dashtam?
age bekhaym har marhale az sort chap beshe bayad chi kar konam.
mamnun misham age javabo baram email konid.
چهارشنبه 22 مهر 1388 04:01 بعد از ظهر
سلام دوست عزیز
میخواستم یه بازی اینترنتی معرفی کنم
خیلی جالبه به نظرم سر نزنی ضرر کردی اصلا هم وقت گیر نیست
شاید اسم این بازی رو بارها شنیده باشی ولی یه بار بیا ضرر نمیکنی
این یه بازیه استراتژیکی هست که برای خودت یه دهکده داری و با میلیون ها ایرانی داری بازی میکنی که میتونید باهم جنگ یا تجارت کنید.
لینک ثبت نام:
http://www.travian.ir/?uc=ir5_41786
 
لبخندناراحتچشمک
نیشخندبغلسوال
قلبخجالتزبان
ماچتعجبعصبانی
عینکشیطانگریه
خندهقهقههخداحافظ
سبزقهرهورا
دستگلتفکر


 
 
 
شبکه اجتماعی فارسی کلوب | Buy Website Traffic