##### P.R.O.G.R.A.M.L.A.M.A. .D.E.R.S.L.E.R.İ ##### (9. sayfa)

1)	Başla 
  2)	Sayısal; di1, di2, ka1, r , üç1,üç2,üç3, diküç, taban, dialan, diçevre, kaalan, kaçevre, daalan, daçevre, üçalan, üççevre 
  3)	metin;s, s2 
  4)	Yaz; “Alan yada çevre hesaplamasına hoş geldiniz, Dikdörtgen için d ye, Daire için da ye, Kare için k ye, Üçgen için ü ye basınız”  
  5)	oku; s 
  6)	yaz; “alan için a ya,çevre için ç ye basınız” 
  7)	oku; s2 
  8)	eğer (s=”d”) ise 
  9)		yaz; “uzun kenarı yazınız” 
  10)		oku; di1 
  11)		yaz; “kısa kenarı yazınız” 
  12)		oku;di2 
  13)		dialan= di1*di2 
  14)		diçevre= (di1+di2)*2 
  15)		eğer (s2=”a”) ise  
  16)		yaz; “girdiğiniz bilgilere göre dikdörtgenin alanı=” &dialan 
  17)		eğer (s2=”ç”) ise 
  18)		yaz; “girdiğiniz bilgilere göre dikdörgenin çevresi=” &diçevre 
  19)	                eğer bitti 
  20)		eğer bitti 
  21)	eğer (s=”da”) ise 
  22)		yaz; “r yi giriniz” 
  23)		oku; r 
  24)		daalan= 3,14159265*r*r	 
  25)		daçevre= 2*r* 3,14159265 
  26)		eğer= (s2=”a”) ise	 
  27)		yaz; “girdiğiniz bilgiye göre dairenin alanı=” &daalan 
  28)		eğer (s2=”ç”) ise 
  29)		yaz; “girdiğiniz bilgiye göre dairenin çevresi=” &daçevre 
  30)		eğer bitti 
  31)		eğer bitti 
  32)	eğer (s=”k”) ise 
  33)		yaz; “karenin bir köşesini giriniz” 
  34)		oku; ka1 
  35)		kaçevre=kaalan= 4*ka1 
  36)		yaz; “girdiğiniz bilgiye göre karenin çevresi ve alanı=” &kaçevre 
  37)	eğer (s=”ü”) ise 
  38)		eğer (s2=”ç”) ise 
  38)		yaz; “üçgenin birinci kenarını giriniz” 
  40)		oku: üç1 
  41)		yaz; “üçgenin ikinci kenarını giriniz” 
  42)		oku: üç2 
  43)		yaz; “üçgenin üçüncü kenarını giriniz” 
  44)		oku: üç3 
  45)		üççevre= üç1+üç2+üç3 
  46)		yaz; “girdiğiniz bilgilere göre üçgenin çevresi=” &üççevre		 
  47)		eğer (s2=”a”) ise 
  48)		yaz; “üçgenin bir tabanını giriniz” 
  49)		oku; taban 
  50)		yaz; “girdiğiniz tabanın yüksekliğini yazınız” 
  51)		oku; diküç		 
  52)		üçalan= (taban*diküç)/2 
  53)		yaz= “girdiğiniz bilgilere göre üçgenin alanı=” &üçalan 
  54)		eğer bitti 
  55)		eğer bitti 
  56)	eğer bitti	 
  57)	eğer bitti	 
  58)	eğer bitti	 
  59) 	eğer bitti 
  60)	bitir

Aaaayrıcaaa :
Derslerde biraz ileri gittim ve videolu ders indirdim oradan çektiğim kopyalar() ile bir hesap makinesi hazırladım sunmak istiorm :

#include <cstdlib> 
  #include <iostream> 
  #include <math.h> 
  using namespace std; 
   
  int main(int argc, char *argv[]) 
  { 
       
          cout<<"                       **************************************************"<<endl; 
          cout<<"                       *                                                *"<<endl; 
          cout<<"                       *              Hesap Makinesi 1.0                *"<<endl; 
          cout<<"                       *                                                *"<<endl; 
          cout<<"                       *             Hazirlayan:Ismail Kaya             *"<<endl; 
          cout<<"                       *                                                *"<<endl; 
          cout<<"                       *    hangi islemi yapacaksaniz o simgeyi girin.  *"<<endl; 
          cout<<"                       *           top:+    cik:-   carp:*   bol:/      *"<<endl; 
          cout<<"                       *                                                *"<<endl; 
          cout<<"                       *  Onemli Not:Sadece 4 islem icin hazirlanmistir.*"<<endl; 
          cout<<"                       **************************************************"<<endl; 
           
          float sayi1,sayi2,sonuc; 
          char islem; 
          goto baslik1; 
           
          islembasi1: 
                     cout<<"adam gibi gir olum :"; goto devam1; 
          baslik1: 
          cout<<"1.Sayiyi Giriniz :"; 
          devam1: 
          cin>>sayi1; 
          if( (sayi1 > 10000000 || sayi1 <-10000000)) goto islembasi1; 
           
          cout<<"Islemi Giriniz :"; 
          cin>>islem; 
           
          goto baslik2; 
           
          islembasi2: 
                     cout<<"adam gibi gir dedik :"; goto devam2; 
          baslik2: 
          cout<<"2.Sayiyi Giriniz :"; 
          devam2: 
          cin>>sayi2; 
          if( (sayi2 > 10000000 || sayi2 < -10000000) ) goto islembasi2; 
           
          switch (islem) 
          {               
                        case '+': 
                             sonuc = (sayi1+sayi2); 
                             cout<<"Toplama Sonucu :"<<sonuc<<endl;   break; 
                        case '-': 
                             sonuc = (sayi1-sayi2); 
                             cout<<"Cikarma Sonucu :"<<sonuc<<endl;   break; 
                        case '*': 
                             sonuc = (sayi1*sayi2); 
                             cout<<"Carpma Sonucu :"<<sonuc<<endl;     break; 
                        case '/': 
                             sonuc = (sayi1/sayi2); 
                             cout<<"Bolme Sonucu :"<<sonuc<<endl;       break; 
          }               
      system("PAUSE"); 
      return EXIT_SUCCESS; 
  }

 
  1)	Başla 
  2)	Metin; a, s 
  3)	Yaz; “Lütfen Adınızı Giriniz” 
  4)	Oku; a 
  5)	Yaz; “Lütfen Soyadınızı Giriniz” 
  6)	Oku; s 
  7)	Yaz; “Merhaba ”,&a,” soyadının”,&b,”olduğunu bilmiyordum.” 
  8)	Bitir 
  

 
  1)	Başla 
  2)	Sayısal; a, s 
  3)	Yaz; “Elemanın Günlük yevmiyesini giriniz:” 
  4)	Oku; s 
  5)	a=s*30 
  6)	Yaz; “Elemanın Aylık maaşı=”,&a,”’dır.” 
  7)	Bitir 
  

 
  1)	Başla 
  2)	Sayısal; b, i, s 
  3)	Yaz; “Tabanı Giriniz :” 
  4)	Oku; b 
  5)	Yaz; “Kuvveti giriniz :” 
  6)	Oku; i 
  7)	s=b^i 
  8)	Yaz; &b,” sayısının”,&i,”. Kuvveti”,&s,” sayısına eşittir.” 
  9)	Bitir 
  

 
  1)	Başla 
  2)	Sayısal; a, b, c, x, y, z, dort, qort, sort 
  3)	Metin; k, l, f 
  4)	Yaz; “Birinci yazılıyı giriniz :” 
  5)	Oku; a 
  6)	Yaz; “İkinci yazılıyı giriniz :” 
  7)	Oku; b 
  8)	Yaz; “Üçüncü Yazılıyı giriniz :” 
  9)	Oku; c 
  10)	Yaz; “Sözlü Notu kullanacak mısınız? (e/h)” 
  11)	Oku; k  
  12)	dort=(a+b+c)/3 
  13)	Eğer (k=”e”) ise 
  14)	Yaz; “Birinci Sözlü Notunu Giriniz :” 
  15)	Oku; x 
  16)	Yaz; “İkinci Sözlü Notunu Giriniz :” 
  17)	Oku; y 
  18)	Yaz; “Üçüncü Sözlü Notunu Giriniz :” 
  19)	Oku; z  
  20)	qort=(x+y+z)/3  
  21)	sort=(qort+dort)/2 
  22)	Eğer (sort>=50) ise  
  23)	Yaz; “Öğrenci”,&sort,” not ortalaması ile sınıfı geçmiştir.” 
  24)	Eğer (sort>100) ise 
  25)	Yaz; “Böyle bir hesaplama olamaz başa dönmek istiyor musunuz? (e/h)” 
  26)	Oku; l 
  27)	Eğer (l=”e”) ise 
  28)	Git (7) 
  29)	Değilse 
  30)	Git (54) 
  31)	Eğer Bitti 
  32)	Değilse 
  33)	Yaz; “Öğrenci”,&sort,” not ortalaması ile sınıfta kalmıştır.” 
  34)	Eğer Bitti 
  35)	Eğer Bitti 
  36)	Eğer (k=”h”) ise 
  37)	Eğer (dort>=50) ise  
  38)	Yaz; “Öğrenci”,&dort,” not ortalaması ile sınıfı geçmiştir.” 
  39)	Eğer (dort>100) ise 
  40)	Yaz; “Böyle bir hesaplama olamaz başa dönmek istiyor musunuz? (e/h)” 
  41)	Oku; f 
  42)	Eğer (f=”e”) ise 
  43)	Git (7) 
  44)	Değilse 
  45)	Git (54) 
  46)	Eğer Bitti 
  47)	Değilse  
  48)	Yaz; “Öğrenci”,&dort,” not ortalaması ile sınıfta kalmıştır.” 
  49)	Eğer Bitti 
  50)	Değilse 
  51)	Yaz; “Yanlış bir seçim” 
  52)	Git (13) 
  53)	Eğer Bitti 
  54)	Bitir