none
Quiz Program using Small Basic RRS feed

  • General discussion

  • TextWindow.WriteLine("Welcome to the Quiz Contest")
    TextWindow.WriteLine("what is domain of life ?")
    Answer=TextWindow.Read()
    If(Answer="Biosphere" Or Answer="biosphere" Or Answer="BIOSPHERE"  )Then
      TextWindow.WriteLine("Your answer is right")
      TextWindow.WriteLine("you win 1,00,000 rs")
      TextWindow.WriteLine("we are going to next question of 2,00,000 RS")
      TextWindow.WriteLine("how many continents are in world")
      Answer2=TextWindow.Read()
    Else
      TextWindow.WriteLine("Your Answer is wrong.corect answer is Biosphere")
      Goto end
    EndIf 


    If(Answer2="7" Or Answer2="VII" )Then
      TextWindow.WriteLine("congratulatons you win 2,00,000 RS")
      TextWindow.WriteLine("WE are going to next qustion of 4,00,000 RS")
      TextWindow.WriteLine(" Which company of mobile is ranked 1st")
      Answer3=TextWindow.Read()
    Else  
      TextWindow.WriteLine("Your Answer is wrong.corect answer is 7")
      Goto end
    EndIf

    If(Answer3="Apple" Or Answer3="apple" )Then
      TextWindow.WriteLine("Congratulation you win 4,00,000 RS")
      TextWindow.WriteLine("next question is for 8,00,000 RS")
      TextWindow.WriteLine("what is world's highest mountain peak?")
      Answer4=TextWindow.Read()  
    Else
      TextWindow.WriteLine("your answer is wrong.corect answer is Apple Sumsung & Huawei")
      Goto end
    EndIf
      
    If (Answer4="Mount Everest"Or Answer4="mount everest" Or Answer4="Mt Everest" )Then
     TextWindow.WriteLine("Congratulation you win 8,00,000 RS")  
    Else
    TextWindow.WriteLine("Your answer is wrong.corect answer is mount everest")
    Goto end
    EndIf

    end: 
      TextWindow.WriteLine("game over")
      


      
      
    Monday, February 18, 2019 1:46 PM