$fooに確率を設定します
$rに1〜100まで範囲でランダムで数字を代入します
foreachで$fooのキーと値を回していき、値がランダムの数字$rより低いか同じなら$キーを表示します


>>63のコードは確率のアルゴリズムでありますでしょうか？