把在2-29之外的数都映射到这个范围之内
-------------------------------------
那这1000个数可能就不再是正态分布了,如果一定要的话,简单映射如下:
const
minV:Integer =2;
maxV:Integer =92;
var
i:Integer;
x:Integer;
begin
for i:=1 to 1000do
begin
x :=Round(RandG(50,20));
if x>maxV then
x :=minV +x mod (maxV-minV)//大于最大值,简单求模映射,能够保证映射到minV~maxV
else
if x<minV then
begin
while x<maxVdo
Inc(x,maxV);
x :=minV +x mod (maxV-minV);
end;