0

次の gforth のプログラムは、0 から 2 までの 10 個の乱数を出力します。

require random.fs
: main 10 0 do i cr . 3 random . loop ;
main

問題は、開始するたびに数字が同じになることです。つまり、time(0) シードは使用されませんでした。開始ごとに異なる乱数を取得するにはどうすればよいですか?

4

1 に答える 1