rastgele olmayan seçim

[ElectroNick]

s.a.

20 değer içinden seçim yaptırmam gerekiyor random komutuyla iş basit fakat yaptırmam gereken seçimde 0-5 aralığında değerlerin çıkma olasılığının diğerlerinden yüksek olması gerekiyor.

nasıl bir yol izleyebilirim?

[t-hex]

Random fonksiyonunu, Exponential Distribution'a göre düzenlemen lazım.

Kod: Tümünü seç

Result := -Log10(Random);

[ElectroNick]

Kod: Tümünü seç

for i:=1 to 20 do a[i]:=random(20);

yukarıdaki kodda ki a[1], a[2], a[3]... vs dizi elemanlarının daha çok 1-5 aralığında değer almasını istiyorum.diğer 5-19 arası sonuçların daha az çıkması için verdiğiniz kodu nasıl kullanabilirim?

[aseka]

--

[ElectroNick]

evet aradığım buydu teşekkürler..