ramdomize

VB 中的用法，用 Randomize 語句初始化隨機數生成器。由於忽略了數值參數， 所以 Randomize 用 Timer 函式的返回值作為新的隨機數種子值。

基本介紹

• 外文名：ramdomize
• 用 法：void randomize
• 功 能：初始化隨機數發生器
• VC中的用法：隨機數生成器

基本信息

初始化隨機函式發生器:randomize

C語言　函式名:randomize

功 能:初始化隨機數發生器

用 法:void randomize(void);

程式例:

#include<stdlib.h>intmain(void){inti;randomize();printf("Tenrandomnumbersfrom0to99\n\n");for(i=0;i<10;i++)printf("%d\n",rand()%100);return0;}

註：可以在TC2.0中運行通過，在VC6.0不能運行。

VC中的用法

VC中使用srand()來初始化為隨機數生成器。代碼實例：

#include<stdio.h>#include<stdlib.h>#include<time.h>#defineN10main(){inti;srand(time(0));/*設定種子,並生成偽隨機序列*/for(i=0;i<N;++i)printf("%d\n",rand()%100);/*得到[0,99]偽隨機數*/system("pause");}

VB 中的用法

Randomize 語句示例

DimMyValueRandomize'對隨機數生成器做初始化的動作。MyValue=Int((6*Rnd)+1)'生成1到7之間(不包括7)的隨機數值。

Delphi 中的用法

以下事例將隨機產生0到100的數字，如果不使用Randomize函式，得到的結果將有規律性。

procedureTForm1.btn1Click(Sender:TObject);beginrandomize;ShowMessage(IntToStr(Random(100)));end;

pascal中的用法

pascal中如果不使用randomize，就是上一次的結果。並且，pascal中的隨機數語句是從0開始的，以X-1結束。因此如果隨即產生0~100間的數要用random(101)來。

下面一個產生0~100的隨機數的程式：

vara:integer;beginrandomize;a:=random(101);writeln(a);readln;end.