d=0
y=0
oku:
If d>99 Then
    TextWindow.ForegroundColor="yellow"
    TextWindow.WriteLine("toplamayı öğrenmişsiniz tebriklerrr!!!")
    TextWindow.ForegroundColor="gray"
    Program.End()
EndIf
a=Math.GetRandomNumber(2000)
b=Math.GetRandomNumber(2000)
e:
TextWindow.Write(a)
TextWindow.Write("+")
TextWindow.Write(b)
TextWindow.Write("=")
c=TextWindow.ReadNumber()
If c=a+b Then
  TextWindow.ForegroundColor="green"
   d=d+1
   TextWindow.Write("doğru cevap sayısı: ")
   TextWindow.WriteLine (d)
 TextWindow.ForegroundColor="gray"
  Goto oku
Else
  TextWindow.ForegroundColor="red"
  y=y+1
  TextWindow.Write(" yanlış sayısı:  ")
  TextWindow.WriteLine (y) 
TextWindow.WriteLine  ("tekrar deneyin")
  TextWindow.ForegroundColor="gray"
  Goto e
  EndIf