Шанс "дропа" в %

[Zeraim]

Не знаю даже правильно ли назвал тему, если кто сталкивался с задачей так называемого дропа или шанса выпадения вещи по другому, или просто шанса происхождения некоторой ситуации, подскажите.

x := random(100)+1;
if x in [1..50] then reshka := true;

Можно ли это решение считать правильным для падения монетки решкой вверх? (какбы 50% шанс с(8 ) Или существуют другие способы? Теорию вероятностей я не знаю.

[SNUPY]

А мну нравиться вот так....:

x := random(99)+1;
if x mod 2=0 then reshka := true;

....только вот придеться мутить со случаим если вероятности не равны ^_^
Поэтому я за ваш вариант.

[Arigato]

А разве не проще так:

 reshka := (random (2) = 0);

[Toxa]

а если надо точно, то вероятность выпадения орла равна примерно 49,5%, а решки соответственно - 50,5%

[evg_m]

x=random(5)
rez:= x<2; // вер true = 2/5 false 3/5

[Zeraim]

Хмм посмотрел все варианты, не какой ощутимой разницы =\\ ниже 37 раз и выше 64, не у одного способа не прыгало, в среднем было где то 49-52 - это так, на вскидку 8)

[Arigato]

Я не понял задачи. Нужно сделать, что бы выпадения были не 50 на 50?
Тогда назовите точно, какой процент Вам требуется?

[Zeraim]

Ну задачи как таковой не было, меня интересовали способы, как можно сделать так называемый "шанс дропа" в онлайн играх.

[apromix]

Тогда делается так:

Randomize;
X := Random(10) + 1;
case X of
1: действие 1;
2..7: действие 2;
else действие 3;
end;

В зависимости от диапазона чисел разные действия будут выпадать то чаще, то реже. Вобщем все так же, как и выше, но советую отказаться от if'ов в пользу case

[Zeraim]

Ну кеис хорош если несколько действий, а если одно то проще ифом.