過去ログ

まるケン
おはようございます。
昨夜は、昼間のVer3で使ったプログラムをいじって、珍しく上位入賞!
(6位に入るなんて、何年ぶりかなぁ、、、)
でも、悔しいので今朝、算数で解きなおしました。

#28736
> 10*7*6*5 + 10 *2*6 =2220
うぅむ、さっぱりわからん、、、
私のは、芸の無い数え上げです。

4カード: 10通り× 2通り=  20通り。
3カード: 50通り× 4通り= 200通り。
2ペア : 25通り× 8通り= 200通り。
1ペア :100通り×12通り=1200通り。
バラ  ; 25通り×24通り= 600通り。
計2220通り。

夕べのプログラムはこんな感じ。

require 'perm'

n = 0

perm((0..9).to_a, 4) do |a|
 next if((a[0] - a[1]) == 1)
 next if((a[1] - a[0]) == 1)
 next if((a[1] - a[2]) == 1)
 next if((a[2] - a[1]) == 1)
 next if((a[2] - a[3]) == 1)
 next if((a[3] - a[2]) == 1)
 next if((a[0] - a[1]) == 9)
 next if((a[1] - a[0]) == 9)
 next if((a[1] - a[2]) == 9)
 next if((a[2] - a[1]) == 9)
 next if((a[2] - a[3]) == 9)
 next if((a[3] - a[2]) == 9)
 n += 1
end

p n

'perm'は別ファイルの、順列を吐き出すイテレータです。
   11月23日(木) 6:43:36   MAIL:take4310@mobile.email.ne.jp HomePage:まるケンの部屋  28741

過去問題一覧へ戻る