設定亂數種子數

3.RANDOMIZE 後面的參數X若省略，則將出現"Random number seed(-32768 to 326767)?" 用來要求使用者輸入種子數(SEED)後再繼續執行程式。

4.利用TIME$所擷取的時間 ... 格　　式 RANDOMIZE 定　　義 設定亂數種子數 說　　明 １.指定一個整數給亂數產生器，用以產生不同組的亂數，故將參數X稱為種子數(SEED)，不同的種子數即產生不同組的亂數。

２.參數X應介於－32768與32767之間的整數。

３.RANDOMIZE後面的參數X若省略，則將出現 　　"Randomnumberseed(-32768to326767)?"     用來要求使用者輸入種子數(SEED)後再繼續執行程式。

４.利用TIME$所擷取的時間來當」種子數」。

　TIME$函數之型式為： HH：MM：SS  (時：分：秒) 但TIME$所取得的時間為字串資料，必需將之轉換為數值資料，才可當」種子數」。

(1)只取」秒」當種子數之轉換：      VAL(RIGHT$(TIME$,2)) (2)擷取」分」與」秒」當種子數之轉換：      VAL(MID$(TIME$,4,2)+RIGHT$(TIME$,2)) 範例一 使用RANDOMIZE，而未加種子數。

5  RANDOMIZE 10FORI=1TO3 20PRINTRND 30NEXTI 結　　果 RUN Randomnumberseed(-32768to32767)?3  ← 輸入種子數３  .867132  .9183607  .690639 OK RUN Randomnumberseed(-32768to32767)?100 ← 輸入種子數100  .5718592  .815898  9.746001E-03 OK RUN Randomnumberseed(-32768to32767)?3  ← 輸入種子數３  .867132  .9183607  .690639 OK (再輸入種子數３，所得結果與前次輸入３時相同。

) 範例二 使用RANDOMIZE，後面加上種子數。

5  RANDOMIZE(3) 10FORI=1TO3 20PRINTRND 30NEXTI 結　　果 RUN  .867132  .9183607  .690639 OK RUN  .867132  .9183607  .690639 OK