[過去ﾛｸﾞ] プログラミングのお題スレ Part21 (1002ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

209(5): デフォルトの名無しさん [sage] 2022/11/23(水) 16:05:13.46 ID:U6TEG1mT(1) AAS
正六角形の各頂点に椅子がある
各椅子に P, Q, R, S, T, U と順不同でラベルを付けるとき
P と Q が向かい合わない組み合わせは何通りあるか
ラベルの重複は無し

---

213: デフォルトの名無しさん [sage] 2022/11/23(水) 19:56:22.68 ID:OkrKt+ei(2/2) AAS
>>209
Haskell
外部ﾘﾝｸ:ideone.com

import Data.List
import Data.Maybe

xs = [ x | x <- permutations [ 'P' .. 'U' ],
let i e es = fromJust $ elemIndex e es ,
mod ( ( i 'P' x ) - ( i 'Q' x ) ) 6 == 3 ]

main = print $ length xs

---

214(1): デフォルトの名無しさん [sage] 2022/11/23(水) 23:31:10.31 ID:q2LNEKVG(1) AAS
>>209
何を区別するとかしないとか書かないと
数学やプログラミング以外の範疇でもめることになる

---

215: デフォルトの名無しさん [sage] 2022/11/24(木) 10:58:50.49 ID:+WLoo/sn(1) AAS
>>209
4 * 4! = 96

---

217: デフォルトの名無しさん [sage] 2022/11/24(木) 18:43:02.54 ID:OYbHbN8A(1) AAS
>>209
6 * 4 * 4! = 576

---

218: デフォルトの名無しさん [sage] 2022/11/24(木) 18:48:51.57 ID:m+x+kPsJ(1) AAS
>>209
6! - 6*4! = 576

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.044s