Show the (decimal) value of a number of 1s appended with a 3, then squared: Difference between revisions

m
→‎{{header|Haskell}}: Perhaps <$> sometimes raises the signal/noise ratio ? (fewer brackets etc)
(Added Quackery.)
m (→‎{{header|Haskell}}: Perhaps <$> sometimes raises the signal/noise ratio ? (fewer brackets etc))
Line 327:
onesPlusThree :: [Integer]
onesPlusThree =
map ((3 +) . (10 *)) $
<$> iterate ((1 +) . (10 *)) 0
 
format :: Integer -> String
Line 334:
 
main :: IO ()
main =
main = putStr $ unlines $ take 8 $ map format onesPlusThree</lang>
(putStr . unlines . take 8) $
 
main = putStr $ unlinesformat <$ take 8 $ map format> onesPlusThree</lang>
{{out}}
 
9,655

edits