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)班张峥)