Largest proper divisor of n: Difference between revisions
→{{header|Haskell}}: Applied HLint and Ormolu, tidied.
Not a robot (talk | contribs) (Add Cowgol) |
(→{{header|Haskell}}: Applied HLint and Ormolu, tidied.) |
||
Line 207:
lpd :: Int -> Int
lpd 1 = 1
lpd n = head
main :: IO ()
main =
(putStr . unlines . map concat . chunksOf 10) $
▲ map lpd [1..100]</lang>
{{out}}
<pre> 1 1 1 2 1 3 1 4 3 5
| |||