还是有人为因素

不公平，这随机数有一定的规律，猜透了，就中大奖了
——来自三星Galaxy SIII(卓然天成 为你而生)

我认为是公平的，至少现在是（有人找到规律了吗？）

有规律的。多运行几次，出现相同的结果。

是有规律

Randomize 是随机性的。

做个几百亿亿亿亿亿亿亿亿次就有重复了。

这个程序就很能说明问题了
附上源码：
{$APPTYPE GUI}
Uses Graph, WinCrt ;
Var
i, j, c : integer ;
gd, gm : integer ;
Begin
gd := D8bit ;
gm := m640x480 ;
initgraph( gd, gm, '' );
For i := 0 to 640 do
For j := 0 to 480 do
Begin
randomize;
c := random( 255 ) + 1 ;
PutPixel( i, j, c );
End;
readkey;
End.

度娘来是要吞我源码，干脆发图好了