7 lines
115 B
Haskell
7 lines
115 B
Haskell
import Numeric (showOct)
|
|
|
|
main :: IO ()
|
|
main =
|
|
mapM_
|
|
(putStrLn . flip showOct "")
|
|
[1 .. maxBound :: Int]
|