推 hanhan0912: ! 140.112.16.145 11/28 13:35
推 JS1037: push! 61.228.45.94 11/28 23:10
推 caasih: nub ! 58.114.194.222 11/29 01:13
推 lc85301: 太神啦 140.112.4.192 11/29 17:26
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://www.ptt.cc/bbs/Programming/M.1480306692.A.74A.html