CLS

FOR i = 1 TO 20

   n = RND * 1000                ' generate random numbers 0 -- 999.9(9)
   PRINT "random number:"; n
   SOUND n + 40, 1

NEXT i