S% = TIME
      FOR I% = 1 TO 10000000
        WHILE FALSE
          A = PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI
          A += PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI
          A += PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI
        ENDWHILE
      NEXT
      F% = TIME
      PRINT "Time for WHILE was "; F%-S% " centiseconds"
      
      S% = TIME
      FOR I% = 1 TO 10000000
        IF FALSE THEN
          REPEAT
            A = PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI
            A += PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI
            A += PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI+PI
          UNTIL TRUE
        ENDIF
      NEXT
      F% = TIME
      PRINT "Time for IF/THEN plus REPEAT was "; F%-S% " centiseconds"