Perlコーディング初心者質問スレ Part 40
■ このスレッドは過去ログ倉庫に格納されています
$number = rand 7;
$number = $number == 7 ? $number - rand 7 : $number;
print $array[$number];
前回言いかけましたがこうしても結局今度は$array[0]が選ばれる可能性がちょっと増える
ので不公平ですよね。
公平に0-6を抽選することはできないのでしょうか?
■ このスレッドは過去ログ倉庫に格納されています