Videomuzda gösterdiğim Small Basic komutu aşağıda yazıyor:
TextWindow.Write ("Öğrencinin İsmi: ")
öğrenci_adı=TextWindow.Read()
TextWindow.WriteLine ("Matematik")
TextWindow.Write ("1. Matematik Sınav Notu: ")
birinci_matematik_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Matematik Sınav Notu: ")
ikinci_matematik_sınav_notu=TextWindow.Read()
TextWindow.Write ("3. Matematik Sınav Notu: ")
üçüncü_matematik_sınav_notu=TextWindow.Read()
matematik_toplam_puan=(birinci_matematik_sınav_notu + ikinci_matematik_sınav_notu + üçüncü_matematik_sınav_notu)/3
TextWindow.WriteLine ("Türkçe")
TextWindow.Write ("1. Türkçe Sınav Notu: ")
birinci_türkçe_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Türkçe Sınav Notu: ")
ikinci_türkçe_sınav_notu=TextWindow.Read()
TextWindow.Write ("3. Türkçe Sınav Notu: ")
üçüncü_türkçe_sınav_notu=TextWindow.Read()
türkçe_toplam_puan=(birinci_türkçe_sınav_notu + ikinci_türkçe_sınav_notu + üçüncü_türkçe_sınav_notu)/3
TextWindow.WriteLine ("Fen")
TextWindow.Write ("1. Fen Sınav Notu: ")
birinci_fen_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Fen Sınav Notu: ")
ikinci_fen_sınav_notu=TextWindow.Read()
fen_toplam_puan=(birinci_fen_sınav_notu + ikinci_fen_sınav_notu)/2
TextWindow.WriteLine ("Sosyal")
TextWindow.Write ("1. Sosyal Sınav Notu: ")
birinci_sosyal_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Sosyal Sınav Notu: ")
ikinci_sosyal_sınav_notu=TextWindow.Read()
sosyal_toplam_puan=(birinci_sosyal_sınav_notu + ikinci_sosyal_sınav_notu)/2
TextWindow.WriteLine ("Yabancı Dil")
TextWindow.Write ("1. Yabancı Dil Sınav Notu: ")
birinci_yabancı_dil_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Yabancı Dil Sınav Notu: ")
ikinci_yabancı_dil_sınav_notu=TextWindow.Read()
yabancı_dil_toplam_puan=(birinci_yabancı_dil_sınav_notu + ikinci_yabancı_dil_sınav_notu)/2
TextWindow.WriteLine ("Din")
TextWindow.Write ("1. Din Sınav Notu: ")
birinci_din_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Din Sınav Notu: ")
ikinci_din_sınav_notu=TextWindow.Read()
din_toplam_puan=(birinci_din_sınav_notu + ikinci_din_sınav_notu)/2
karne_notu=(matematik_toplam_puan + türkçe_toplam_puan + fen_toplam_puan + sosyal_toplam_puan + yabancı_dil_toplam_puan + yabancı_dil_toplam_puan)/6
TextWindow.WriteLine (öğrenci_adı + " Toplam Karne Notun" + "=" + karne_notu)
Bu komutta istediğiniz değişiklikleri yapabilirsiniz. Ama Small Basic uygulamanız olmalı.
Small Basic Kurulum Sitesi: https://www.microsoft.com/en-US/download/details.aspx?id=46392
Gerekli işlemleri yaparak yukarıdaki siteden indirebilirsiniz.
Hiç yorum yok:
Yorum Gönder
Yorum için teşekkürler, yine bekleriz.