تبلیغات
پروژه های رایگان برنامه نویسی و آموزش زبان C++ و C# - عدد اول
 
برنامه بدون خطا رویاست Program is impossible without an error
پروژه های رایگان برنامه نویسی و آموزش زبان C++ و C#
صفحه نخست         تماس با مدیر         پست الکترونیک        RSS         ATOM
 
 
پنجشنبه 20 فروردین 1388 :: نویسنده : سجاد سلطانی

این سورس و یکی از دوستان در خواست کرده که در اینجا قرار می دهم . این سورس عدد اول را به خوبی تشخیص می دهد .

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

int prime(int);

main(){
 int num;
 char ans;


 while(1){
      clrscr();
  printf("\n enter a number :");
  scanf("%d",&num);
  if(prime(num))
   printf("\n Number %d is prime.",num);
  else
   printf("\n Number %d is not prime.",num);

  printf("\n\n Do you want to continue?(y/n):");
  ans=getche();
  if(ans!='y')
   break;
 }
 getch();
}
//******************************************************************************
int prime(int num){
 int i,tmp=1;
 for(i=2;(i<=num/2)&& tmp;i++)
  if(num%i==0)
   tmp=0;
 return tmp;
}





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


پنجشنبه 19 مهر 1397 07:17 قبل از ظهر

Awesome content. With thanks!
cheap 20mg levitra generic levitra levitra without a doctor prescription vardenafil cheap 20mg levitra buy levitra generic levitra 10 mg prezzo levitra 20mg buy levitra 10mg levitra without a doctor prescription
یکشنبه 8 مهر 1397 02:38 قبل از ظهر

Nicely put, With thanks.
can i take cialis and ecstasy how to purchase cialis on line the best choice cialis woman cialis 5 mg effetti collateral cialis canada on line brand cialis nl cialis rezeptfrei cialis venta a domicilio calis cialis mit grapefruitsaft
شنبه 31 شهریور 1397 04:58 بعد از ظهر

Beneficial knowledge. Regards.
trust pharmacy canada north west pharmacies canada buy vistagra usa canadian discount pharmacies in canada canadian discount pharmacies in canada canadian medications online canadian medications online canadian pharcharmy online24 best canadian pharmacy canadianpharmacyusa24h is it legal
چهارشنبه 28 شهریور 1397 06:36 بعد از ظهر

Fine advice. Appreciate it.
cialis generic buy generic cialis price cialis per pill cialis 05 achat cialis en suisse where cheapest cialis the best choice cialis woman cialis uk cialis dose 30mg generic cialis tadalafil
سه شنبه 27 شهریور 1397 03:26 بعد از ظهر

You expressed this really well.
acquisto online cialis purchase once a day cialis cialis 5 mg funziona cialis 50 mg soft tab cialis qualitat click now cialis from canada get cheap cialis cialis usa cost safe dosage for cialis tadalafil tablets
پنجشنبه 15 شهریور 1397 03:44 قبل از ظهر

With thanks, I like it!
does cialis cause gout cialis 5 mg effetti collateral brand cialis nl cialis et insomni cialis generico lilly cialis daily reviews female cialis no prescription generic cialis at walmart buying cialis in colombia tadalafil generic
سه شنبه 13 شهریور 1397 07:35 بعد از ظهر

Superb facts. Kudos.
canadian discount pharmacies in ocala fl canadian government approved pharmacies canada viagra canadian pharmacy king canada drug pharmacy canadian medications list canadian medications canada drugs cialis from canada cialis from canada
سه شنبه 13 شهریور 1397 03:59 قبل از ظهر

Regards. Numerous forum posts.

buy viagra no prescription uk buy generic viagra without prescription cheap online pharmacy no prescription where to buy viagra from how do i order viagra online buy viagra in malaysia cheap viagra uk buy viagra uk online where can i buy viagra online buy viagra online without prescription
دوشنبه 12 شهریور 1397 08:20 بعد از ظهر

You actually stated that wonderfully.
cialis prices in england look here cialis order on line link for you cialis price cost of cialis per pill cialis generico lilly cialis 20 mg effectiveness cialis side effects tesco price cialis cialis qualitat price cialis best
دوشنبه 12 شهریور 1397 01:52 قبل از ظهر

Position nicely considered!!
cialis authentique suisse buy cialis cheap 10 mg cuanto cuesta cialis yaho estudios de cialis genricos cialis cuantos mg hay cialis 10 doctissimo buy cialis cheap 10 mg cialis soft tabs for sale generic cialis review uk cialis generico en mexico
یکشنبه 11 شهریور 1397 12:46 بعد از ظهر

Appreciate it, Numerous info!

only best offers 100mg cialis brand cialis nl online prescriptions cialis cialis kaufen bankberweisung canadian discount cialis canadian drugs generic cialis click now buy cialis brand cialis flussig generic cialis 20mg tablets cialis generic availability
سه شنبه 23 مرداد 1397 03:19 قبل از ظهر

Regards. Quite a lot of info.

safe place to buy viagra online uk can u buy viagra online sildenafil tablets online viagra online buy viagra without a prescription buy real viagra online usa viagra buy uk buy viagra online no prescription how to get viagra prescription online purchase of viagra
پنجشنبه 20 اردیبهشت 1397 04:15 قبل از ظهر

You actually mentioned that really well!
cialis diario compra cialis uk next day cialis 20mg prix en pharmacie tadalafil cialis soft tabs for sale cialis side effects dangers cialis venta a domicilio low dose cialis blood pressure enter site natural cialis generic cialis at walmart
سه شنبه 4 اردیبهشت 1397 04:46 قبل از ظهر

With thanks! I enjoy it.
can you actually buy viagra online where to buy generic viagra buy real viagra online without prescription buy viagra online pharmacy viagra buy viagra online viagra prescription buy viagra online at viagra uk price how old do you have to be to buy viagra how to buy real viagra online
جمعه 17 فروردین 1397 08:25 بعد از ظهر

Kudos, Plenty of forum posts!

cialis 20 mg cost cialis 5 effetti collaterali cialis 5 mg scheda tecnica costo in farmacia cialis free cialis cialis for sale cialis coupons cialis online cialis 20 mg cost cialis 5mg billiger
یکشنبه 27 اسفند 1396 11:54 بعد از ظهر

Really loads of great advice!
cialis purchasing we choice free trial of cialis cialis pills cialis generico price cialis per pill cialis prezzo al pubblico cialis free trial buy cheap cialis in uk import cialis cialis 10 doctissimo
سه شنبه 7 آذر 1396 07:24 بعد از ظهر
سلام، من فکر می کنم که من دیدم شما از سایت من بازدید کرده اید، بنابراین من اینجا رفتم تا انتخاب کنم؟ من تلاش برای پیدا کردن مسائل برای افزایش
سایت من! من معتقد هستم که کافی است از تعدادی از شما استفاده کنم
ایده ها!!
سه شنبه 10 مرداد 1396 06:48 بعد از ظهر
This is really interesting, You are a very skilled blogger.
I have joined your rss feed and look forward to seeking more of your fantastic post.
Also, I've shared your website in my social networks!
شنبه 23 اردیبهشت 1396 05:49 قبل از ظهر
I know this web site gives quality dependent posts and other stuff,
is there any other site which provides these kinds of data in quality?
جمعه 1 اردیبهشت 1396 02:04 بعد از ظهر
I know this if off topic but I'm looking into starting my own blog and was curious what all is
required to get setup? I'm assuming having a blog like yours would cost a
pretty penny? I'm not very internet savvy so I'm
not 100% certain. Any suggestions or advice
would be greatly appreciated. Appreciate it
چهارشنبه 5 آبان 1389 04:01 قبل از ظهر
Merc damet Garm :X
سه شنبه 31 فروردین 1389 08:47 بعد از ظهر

ممنون...
بسیار مفید بود...
 
لبخندناراحتچشمک
نیشخندبغلسوال
قلبخجالتزبان
ماچتعجبعصبانی
عینکشیطانگریه
خندهقهقههخداحافظ
سبزقهرهورا
دستگلتفکر


درباره وبلاگ

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

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

مدیر وبلاگ : سجاد سلطانی
مطالب اخیر
نویسندگان
جستجو

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














free counters