irand 関数は、1 以上で、32768 以下の正の整数を生成します。 SRAND (SEED)の組み込みサブルーチンは、乱数発生ルーチンのシード値を提供するのに使用されます。
結果タイプおよび属性
長さが 4 の整数
結果値
1 以上で 32768 以下の正の乱数
例
INTEGER(4) I1, irand CALL SRAND(I1) I1 = irand()