randomize

randomize是一種函式，功能是初始化隨機數發生器。

基本介紹

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

翻譯

randomize

中文翻譯：隨機

C語言

基本信息

函式名:randomize

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

用 法:void randomize(void);

程式例

#include<stdlib.h>void main(){int i;randomize();printf("Ten random numbers from 0 to 99\n\n");for(i=0;i<10;i++)printf("%d\n",rand()%100);}

註：可以在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 語句示例

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

Dim MyValue

Randomize ' 對隨機數生成器做初始化的動作。

MyValue = Int(6 *Rnd+1) ' 生成 1 到 6 之間(包括6）的隨機整數。

Delphi

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

procedure TForm1.btn1Click(Sender: TObject);

begin

randomize;

ShowMessage(IntToStr(Random(100)));

end;

pascal

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

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

var a:integer;

begin

randomize;

a:=random(101);

writeln(a);

readln;

end.

FBIde

同上，在FBIde里，如果沒有RANDOMIZE，隨機出來的結果跟開始一樣

下面是產生20個0~100之間的整數的語句(要用到一維數組）：

FOR I=1 TO 20

A(I)=INT(RND*101)

NEXT I