3rabs.c

来自「c语言随即数的产生 单个随机数以及随即数序列的都有。」· C语言 代码 · 共 22 行

/*a,b为区间范围
 *r为随机种子
 *p为随机序列存储数组
 *n为随机数的个数
 */

  void rabs(a,b,r,p,n)
  int a,b,*r,n,p[];
  { int k,l,m,i;
    k=b-a+1; l=2;
    while (l<k) l=l+l;
    m=4*l; k=*r; i=0;
    while (i<=n-1)
      { k=k+k+k+k+k;
	k=k%m; l=k/4+a;
        if (l<=b) { p[i]=l; i=i+1;}
      }
    *r=k;
    return;
  }