Brilliant numbers: Difference between revisions
m
→{{header|Haskell}}
Line 458:
let brilliants = filter isBrilliant [1 ..]
indexedBrilliants = zip [1 ..] brilliants
putStrLn $
table " " $
chunksOf 10 $ show <$> take 100 brilliants
putStrLn "(index, brilliant)"
Line 472 ⟶ 471:
$ zip indexedBrilliants (tail indexedBrilliants)
------------------------- DISPLAY ------------------------▼
▲----------------------- DISPLAY ------------------------
table :: String -> [[String]] -> String
| |||