微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题RANDOMIZE与随机数
栏目软件操作与技巧
作者云南省昆明市第十六中学高二(3)班张峥
发布1993-10-01
  要想使每次运行程序得到不同的随机数序,那么就要用RANDOMIZE来再激发随机数发生器。该语句以:RANDOMIZE(I)格式出现于程序中。其中I是随机数源,范围是-32768~+32767。如果省略I的值,则在执行RANDOMIZE之前要求回答:
  Random Number seed(-32768to32767)?
  回答的I值不同,则用RND所得的随机数序就不相同。这个I值也可以是程序中的变量或常量。
  下面给出的这段程序,只要不是同一小时,同一分钟,同一秒钟启动的该程序,RND得到的就是完全不同的随机数序。
  100 REMSUB-RND
  110 FOR N=1 TO 10
  120 A=TIME
  130 B=LEFT(A,2)
  140 C=RIGHT(LEFT(A,4),2)
  150 D=RIGHT(A,2)
  160 B=VAL(B):C=VAL(C);D=VAL(D)
  170 A=B+C+D:RAN DOMIZE(A)
  180 PRINT RND;:NEXT
  (云南省昆明市第十六中学高二(3)班张峥)