Programlama Hocam’ın Youtube hesabında konu anlatımını gerçekleştirdiğimiz kodlama videosunun kaynağıdır. Yine Udemy üzerinden bu sayfayı ziyaret eden öğrenci arkadaşlarımıza kolayca kodlara ulaşabilmesi için oluşturduğumuz bir içeriktir. Konu anlatımı videsounu aşağıya ekledik. İyi seyirler ve iyi kodlamalar.

 Video Anlatımı

Uygulama Kodlarımız aşağıdaki gibidir;

TextWindow.WriteLine(“Kaç soruluk bir bilgi yarışması istersin?”)
tursayisi=TextWindow.Read()
dogruyanit=0
yanlisyanit=0
For i=1 To tursayisi
sayi1=Math.GetRandomNumber(20)
sayi2=Math.GetRandomNumber(20)
hesaplamayontemi=math.GetRandomNumber(4)
If hesaplamayontemi=1 Then
sonuc=sayi1+sayi2
TextWindow.WriteLine(“Lütfen şu sayıların toplamını bulunuz: ” + sayi1 +” + ” + sayi2)
EndIf
If hesaplamayontemi=2 Then
sonuc=sayi1-sayi2
TextWindow.WriteLine(“Lütfen şu sayıların toplamını bulunuz: ” + sayi1 +” – ” + sayi2)
EndIf
If hesaplamayontemi=3 Then
sonuc=sayi1*sayi2
TextWindow.WriteLine(“Lütfen şu sayıların toplamını bulunuz: ” + sayi1 +” * ” + sayi2)
EndIf
If hesaplamayontemi=4 Then
sonuc=sayi1/sayi2
TextWindow.WriteLine(“Lütfen şu sayıların toplamını bulunuz: ” + sayi1 +” / ” + sayi2)
EndIf

TextWindow.WriteLine(i +”. sorunun yanıtı nedir?”)
yanit=textwindow.Read()
If sonuc=yanit Then
dogruyanit=dogruyanit+1
Else
yanlisyanit=yanlisyanit+1
EndIf
EndFor
TextWindow.BackgroundColor=(“Green”)
TextWindow.WriteLine(“Doğru sayınız: “+dogruyanit)
TextWindow.BackgroundColor=(“Red”)
TextWindow.WriteLine(“Yanlış sayınız: “+yanlisyanit)
TextWindow.BackgroundColor=(“Black”)

Bir yanıt yazın

E-posta adresiniz yayınlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir