09/12/15 16:20:20
50人のクラス(男子35人)から5人の委員をランダムに選ぶ。このとき選ばれた委員の中に男3人、女2人が入る確率をBASICで求めよ。
すいません、さっぱりわからないので教えてください。
435:デフォルトの名無しさん
09/12/16 13:43:37
>>431
疑問なんだがなぜ今FORTHなんだ?
436:デフォルトの名無しさん
09/12/27 21:43:34
>>434
まず、数学で問題をときます。
次にPC8801を起動してディスクを入れてリセットします。
BASICが起動したらautoと打ってリターン。
あとはBASICでプログラムを入力し
F5を押します
437:デフォルトの名無しさん
10/01/04 17:10:24
>>434
Dim n(5)
Randmize(Left$(Time$,2))
For i=0 To 10000
m=0
f=0
For j=1 To 5
n(j) = Int(Rnd()*50)+1
If n(j) > 36 Then f=f+1 Else m=m+1
Next j
If m=3 And f=2 Then c=c+1
Print c*100/i
Next
438:デフォルトの名無しさん
10/01/05 09:38:21
普通に公式使って解けばいいじゃん