プログラミングのお題スレ Part10at TECHプログラミングのお題スレ Part10 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト662:デフォルトの名無しさん 18/04/08 19:12:49.68 aVOeIiR5.net こんな依頼者相手にコードを提供するのがおかしい 663:デフォルトの名無しさん 18/04/08 19:14:36.93 wX43tNlZ.net 最初はフラットなので、見分けるの大変なんですよ。 664:デフォルトの名無しさん 18/04/08 19:16:13.27 wX43tNlZ.net >>645のことは考えてないですよ？611とやらに怒ってます。 やった� 665:ｱと無駄でした。ヒント与えなければよかった。 666:デフォルトの名無しさん 18/04/08 20:46:20.65 sgyAjV8F.net お題 ビンゴゲームでリーチ数が最大の盤面をすべて列挙せよ 667:デフォルトの名無しさん 18/04/08 21:26:48.16 wX43tNlZ.net そうですか。頑張ってください。 668:デフォルトの名無しさん 18/04/08 21:53:53.31 ZTQwWTkx.net >>648 Ruby ただしπ/2回転させた解は省略 出力はi行目に穴の空いていないマスの列数(0～4)を表示 [*1..4].combination(2).flat_map{|i,j| [*1..4].combination(2).map{|k,l| a = [4, 0, 1, 3, 2] a[i], a[j] = a[j], a[i] a[k], a[l] = a[l], a[k] next if (1..4).any?{|i| a[i] == 4 - i} || a[2] + a[3] > 4 || a[1] + a[4] > 4 a } }.uniq.compact #=> [[4, 0, 1, 3, 2], [4, 2, 0, 3, 1], [4, 1, 3, 0, 2], [4, 1, 0, 2, 3]] 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch