随机数

随机数

C语言

　　函数名:randomize

　　功 能:初始化随机数发生器

　　用 法:void randomize(void);

　　程序例:

　　#include <stdlib.h>

　　int main(void)

　　{

　　int i;

　　randomize();

　　printf("Ten random numbers from 0 to 99\n\n");

　　for(i=0; i<10; i++)

　　printf("%d\n", rand() % 100);

　　return 0;

　　}

　　注：可以在TC2.0中运行通过，在VC6.0不能运行。

VC中的用法

　　VC中使用srand()来初始化为随机数生成器。代码实例：

　　#include <stdio.h>

　　#include <stdlib.h>

　　#include <time.h>

　　#define N 10

　　main()

　　{

　　int i;

　　srand(time(0)); /*设置种子,并生成伪随机序列*/

　　for(i=0;i<N;++i)

　　printf("%d\n",rand()%100);/*得到[0,99]伪随机数*/

　　system("pause");

　　}

VB 中的用法

　　Randomize 语句示例

　　本示例用 Randomize 语句初始化随机数生成器。由于忽略了数值参数， 所以 Randomize 用 Timer 函数的返回值作为新的随机数种子值。

　　Dim MyValue

　　Randomize ' 对随机数生成器做初始化的动作。

　　MyValue = Int((6 * Rnd) + 1) ' 生成 1 到 7 之间(不包括7)的随机整数。

Delphi 中的用法

　　以下事例将随机产生0到100的数字，如果不使用Randomize函数，得到的结果将有规律性。

　　procedure TForm1.btn1Click(Sender: TObject);

　　begin

　　randomize;

　　ShowMessage(IntToStr(Random(100)));

　　end;

http://baike.baidu.com/view/1081216.htm