作者suhorng ( )
看板Programming
标题Re: [问题] 1-9位数不重复印出来
时间Mon Nov 28 12:18:08 2016
Haskell 的例子 again
import Data.List
main = readLn >>= \n -> mapM_ putStrLn $ nub (map (nub . show) [1..(10^n-1)])
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 165.124.145.111
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Programming/M.1480306692.A.74A.html
1F：推 hanhan0912: ! 140.112.16.145 11/28 13:35
2F：推 JS1037: push! 61.228.45.94 11/28 23:10
3F：推 caasih: nub ! 58.114.194.222 11/29 01:13
4F：推 lc85301: 太神啦 140.112.4.192 11/29 17:26