请用编程解决问题

水木社区手机版

主题:请用编程解决问题
楼主|javame|2020-04-21 12:04:26|只看此ID
请用编程解决问题

有a,b,c,d,e,f一共6位足球运动员

拆成3个队员 === 3个队员的比赛。编程，
列出所有进行比赛组合的列表。
编程语言不限。
--
修改:javame FROM 101.88.255.*
FROM 101.88.255.*
1楼|Neals|2020-04-21 14:31:23|只看此ID
[code]
show1 xs = print $ zipWith (\x y->x++":"++y) xs (reverse xs)

show1 [x|x <- mapM (const "abcdef") [1..3], head x<head (tail x), head (tail x)<head (tail
(tail x))]
[/code]

【在 javame (javame) 的大作中提到: 】
: 请用编程解决问题
: 有a,b,c,d,e,f一共6位足球运动员
: 拆成3个队员 === 3个队员的比赛。编程，
: ...................
--
FROM 159.226.222.211
2楼|Neals|2020-04-21 14:33:13|只看此ID
我一直想问这个问题来的:

如何在论坛里排代码? 语法高亮啥的我都不追求了, 等款字体框起来就满足了
【在 Neals (一般) 的大作中提到: 】
: [code]
: show1 xs = print $ zipWith (\x y->x++":"++y) xs (reverse xs)
: show1 [x|x <- mapM (const "abcdef") [1..3], head x<head (tail x), head (tail x)<head (tail
: ...................
--
FROM 159.226.222.211
3楼|flw|2020-04-21 14:33:49|只看此ID
Term 可以

【在 Neals (一般) 的大作中提到: 】
: 我一直想问这个问题来的:
: 如何在论坛里排代码? 语法高亮啥的我都不追求了, 等款字体框起来就满足了
--
FROM 27.38.241.*
4楼|javame|2020-04-21 14:56:08|只看此ID
这是什么语言?

【在 Neals 的大作中提到: 】
: [code]
: show1 xs = print $ zipWith (\x y->x++":"++y) xs (reverse xs)
: show1 [x|x <- mapM (const "abcdef") [1..3], head x<head (tail x), head (tail x)<head (tail
: ...................
--
FROM 101.88.255.*
5楼|Neals|2020-04-21 15:55:31|只看此ID
Haskell
【在 javame 的大作中提到: 】
: 这是什么语言?
--
FROM 159.226.222.204
6楼|Neals|2020-04-21 15:56:59|只看此ID
我是希望别人能看到等宽字体, 自己这头好解决, 我用 tampermonkey 写了几行 javascript 自动替换字体了.
【在 flw 的大作中提到: 】
: Term 可以
:
--
FROM 159.226.222.204
7楼|flw|2020-04-21 15:57:34|只看此ID
用 Term 就行了。
歪脖党没人权。

【在 Neals (一般) 的大作中提到: 】
: 我是希望别人能看到等宽字体, 自己这头好解决, 我用 tampermonkey 写了几行 javascript 自动替换字体了.
--
修改:flw FROM 27.38.241.*
FROM 27.38.241.*
8楼|No1|2020-04-22 18:02:04|只看此ID
不讲究乱写的，Clojure：

user=> (doseq [r (for [i (range 2r100011 2r111001)
  #_=>                   :let [s (Integer/toString i 2)]
  #_=>                   :when (= 3 (count (filter #(= \1 %) s)))]
  #_=>               (filter some? (map #(when (= \1 %1) %2) s "abcdef")))]
  #_=>     (println r "vs" (seq (clojure.set/difference (set "abcdef") r))))
(a e f) vs (b c d)
(a d f) vs (b c e)
(a d e) vs (b c f)
(a c f) vs (b d e)
(a c e) vs (b d f)
(a c d) vs (b e f)
(a b f) vs (c d e)
(a b e) vs (c d f)
(a b d) vs (c e f)
(a b c) vs (d e f)

【在 javame (javame) 的大作中提到: 】
: 标  题: 请用编程解决问题
: 发信站: 水木社区 (Tue Apr 21 12:04:26 2020), 站内
:
: 请用编程解决问题
:
: 有a,b,c,d,e,f一共6位足球运动员
:
: 拆成3个队员 === 3个队员的比赛。编程，
: 列出所有进行比赛组合的列表。
: 编程语言不限。
: --
: ※ 修改:·javame 于 Apr 21 12:04:57 2020 修改本文·[FROM: 101.88.255.*]
: ※ 来源:·水木社区 http://m.newsmth.net·[FROM: 101.88.255.*]
--
修改:javame FROM 101.88.255.*
FROM 14.205.174.*
9楼|snoopyzhao|2020-04-22 20:02:13|只看此ID
【在 flw (帅五进九) 的大作中提到: 】
: 用 Term 就行了。
: 歪脖党没人权。

我之前的 FQTerm 用的就不是等宽字体
看到这个吓得我赶紧去弄了个等宽的字体来……
--
FROM 117.152.223.*