WindowsXPを使い続けるよ84at WIN
WindowsXPを使い続けるよ84 - 暇つぶし2ch833:名無し~3.EXE
17/12/26 02:37:15.42 oBf8p1JY.net
コンピュータでシミュレーションしてみればいいってことで
var loop, max_loop=1000, i, hit, boxA, boxB, boxes=[], countA=0, countB=0;
for(loop=0; loop<max_loop; loop++) {
//100個の箱を全て空にする
for (i=0;i<100;i++) boxes[i] = 0;
//100個の箱のどれか一つに当たりを入れる
boxes[Math.floor(Math.random()*100)] = true;
//100個の中から1個を選ぶ
boxA = Math.floor(Math.random()*100);
//残り99個の箱から当たり又は外れの1箱にまで絞り込む
boxB=0;
for(i=0;i<100;i++) {
if(i == boxA) continue;
if(boxes[i] == true) { boxB=i; break;}
boxB = i;
}
// Aの箱に当たりが入っている場合をカウント
if(boxes[boxA] == true) countA++;
// Bの箱に当たりが入っている場合をカウント
if(boxes[boxB] == true) countB++;
}
//結果
WScript.Echo(max_loop+"回試行 : A:100から選んだ1つの箱, B:残る99個の箱を整理した残りの1箱");
WScript.Echo("Aの箱に入っていた場合の数 ="+countA);
WScript.Echo("Bの箱に入っていた場合の数 ="+countB);
これを3回実行してみた(行数の関係で簡略表記)
A=8,B=992
A=10,B=990
A=7,B=993


次ページ
続きを表示
1を表示
最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch