Programlama | Programlama Dilleri | C Programlama Dili |C++

Anasayfa Programlama C++ Builder X'den Y'ye Kadar OlanSayıların Toplanması(Tek,Çift ve Hepsi)


X'den Y'ye Kadar OlanSayıların Toplanması(Tek,Çift ve Hepsi)

AÇIKLAMA

Bu program kullanıcıdan alınan iki sayının arasında bulunan tek sayıların,çift sayıların veya hepsinin toplamını bulan bir programdır.

Programın Tamamını Aşağıdaki Linkten İndirebilirsiniz

Linki Görebilmeniz İçin Üye Olmanız Gerekmektedir...

Üye Kayıt

Program Kodu:

  1. //---------------------------------------------------------------------------
  2.  
  3. #include <vcl.h>
  4. #pragma hdrstop
  5.  
  6. #include "Unit1.h"
  7. //---------------------------------------------------------------------------
  8. #pragma package(smart_init)
  9. #pragma resource "*.dfm"
  10. TForm1 *Form1;
  11. //---------------------------------------------------------------------------
  12. __fastcall TForm1::TForm1(TComponent* Owner)
  13.         : TForm(Owner)
  14. {
  15. }
  16. //---------------------------------------------------------------------------
  17.  
  18. void __fastcall TForm1::Button1Click(TObject *Sender)
  19. {
  20. int toplam=0;
  21. if((CheckBox1->Checked==false)&&(CheckBox2->Checked==false))
  22. {
  23.  for(int i=StrToInt(Edit1->Text)+1;i<StrToInt(Edit2->Text);i++)
  24.  toplam+=i;
  25. }
  26. if(CheckBox1->Checked==true)
  27. {
  28.  for(int i=StrToInt(Edit1->Text)+1;i<StrToInt(Edit2->Text);i++)
  29.  {
  30.  if(i%2!=0)
  31.  toplam+=i;
  32.  }
  33. }
  34. if(CheckBox2->Checked==true)
  35. {
  36.  for(int i=StrToInt(Edit1->Text)+1;i<StrToInt(Edit2->Text);i++)
  37.  {
  38.  if(i%2==0)
  39.  toplam+=i;
  40.  }
  41. }
  42. String bastir="Toplam Sonucu: "+IntToStr(toplam);
  43. Application->MessageBox(bastir.c_str(),"TOPLAM SONUCU",MB_ICONINFORMATION) ;
  44. }
  45. //---------------------------------------------------------------------------
  46.  

Yorumlar (0)
Sadece kayıtlı kullanıcılar yorum yazabilir!
Son Güncelleme ( Perşembe, 07 Nisan 2011 23:13 )