home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / awk / awk320.zip / RAND.AWK < prev    next >
Text File  |  1990-02-08  |  140b  |  8 lines
  1. # generate random numbers
  2. # AKW p70
  3.  
  4. BEGIN { srand()
  5.         for (i = 1; i <= 200; i++)
  6.              print int(100 * rand())
  7.       }
  8.