全球主机交流论坛

标题: 求mjj大佬们,20cm吴彦祖们推荐个快排路子 [打印本页]

作者: 我是坏虫 时间: 2021-9-23 19:06
提示: 作者被禁止或删除内容自动屏蔽

作者: 我是坏虫 时间: 2021-9-23 19:24
提示: 作者被禁止或删除内容自动屏蔽

作者: last_host 时间: 2021-9-23 21:06
快排？quicksort？
```hs
quicksort :: (Ord a) => [a] -> [a]
quicksort [] = []
quicksort (x:xs) = quicksort [a | a <- xs, a <= x] ++ [x] ++ quicksort [a | a<-xs, a>x]
```
不谢。

欢迎光临全球主机交流论坛 (https://loc.193.gs/)