%MATH QUIZ PROGRAM
%Make music play in background instead of just as you start running program
Music.Play ("2<e>gb>e<bg<e>gb>e<bg<e>gb>e<bg<e>gb>e<b>b1b2b4be1e2b>2c<8b>4c<b2ab4ag2e1e")

Music.Play ("2<ab>1c>4cecec2c<c1d4>e4aef+<bb2>1e>2gb>1e2<<<<<e>gb>e<bg<e>gb>e<bg<e>gb>e<bg<e>gb>e<bg")

Music.Play ("<1e>4eb>e1g2<d>4f+d<2ac4>ec<2g<1e>4eb>e1g2<d>4f+d<2ac4>ec<2g<1e>4eb>e1g2<d>4f+d<2ac4>ec<1g2df+g>1d+")

Music.Play ("2<<e>gb>e<bg<e>gb>e<bg<e>gb>e<bg")


put"If you fail a question you need to redo the last answer. "
put"What is 5x11? "
var num:real
const numans:=55
loop
   get num
   if num=55 
   then put"Good job "
   loop
      put"What is the Square root of 64? "..
      var sqrt64:real
      get sqrt64
      if sqrt64=8
      then put"WOW great work! "
      loop
         put"What is 2x43 to the power of 2? "
         var ques1:real
         get ques1
         if ques1=3698
         then put"Awesxome work, the final question is next "
         loop
            put"This is the final question. 2(35x2)**2/4 ? "
            var ques2:real
            get ques2
            if ques2=2450
            then put"CONGRATULATIONS you beat the test :D "
            loop
               put"You have beat the test good job :) "
               end loop
            else
            put"What matters is that you tried "
            exit
            end if
            end loop
         else
         put"You came pretty close "
         exit
         end if
         end loop
      else
      put"Nice try ;) "
      exit
      end if
      end loop
   else
   put"FAILURE"
   exit
   end if
end loop