personalmente para lograr nros "mas aletorios" realizo lo siguiente:
Código Delphi
[-]
Randomize;
X = Random(Random(Dimension))+1;
Siendo Dimensión algún valor demasiado grande.
Espero que pueda serte útil.
Personalmente, esto de cambiar la distribución no se si se pueda... y me enteresa ya que tengo un simulador de tragamonedas que necesita ser más "real"