エクセルの確率計算式を教えてください

質問

確率に関してなんですが
21～40の紙が入った箱があります。その中から1枚を取り出しもとに戻します。
これを3回繰り返し3回の合計が100以上になる確率はどのくらいかというのをエクセルで求めたいです。

よろしくお願いします。

回答No.2

hallo-2007 · ベストアンサー

一応、マクロ案です。
Sub Macro1()
For i = 21 To 40
For j = 21 To 40
For k = 21 To 40
Range("B1").Value = Range("B1").Value + 1
If i + j + k = 100 Then Range("A1").Value = Range("A1").Value + 1
Next k
Next j
Next i
End Sub
B1セルに全て組み合わせの数と、A1セルに合計が100になる組み合わせの数が出ます。

お礼

どうもありがとうございました。
100以上なので=を>=にしてやりました。

回答No.3

某HN クロメート(Chromate)（@CoalTar）

う～～～ん 良くわからんから総当り(^^;
=SUMPRODUCT(
((MOD(INT((ROW(A1:A8000)-1)/20^2),20)+21
+MOD(INT((ROW(A1:A8000)-1)/20^1),20)+21
+MOD(INT((ROW(A1:A8000)-1)/20^0),20)+21)>=100)*1)/20^3
でいいのかな
確率統計論の専門家ではないので参考まで

お礼

ありがとうございました。

回答No.1

kgrjy

いくとおりでもやりようがありますが、しらみつぶしとして。

21-40の組み合わせ、８０００行を生成してください。（やりかたはエクセルのキモなので書きません、自力でがんばってください）
その隣の列に、判定式を書きます。
=if(a1+b1+c1>=100,1,0)
８０００行分、コピー貼り付け。
この列のトータルが求める確率の分子となります。

お礼

どうもありがとうございましたm(_ _)m