Anonymous user
Lah numbers: Difference between revisions
m
→{{header|Haskell}}
Line 490:
main = do
printf "Unsigned Lah numbers: L(n, k):\nn/k"
mapM_ (printf "%11d")
mapM_ printLah $ (,) <$>
printf "\nMaximum value from the L(100, *) row:\n%d\n"
(maximum $ lah 100 <$> ([0..100] :: [Integer]))
where zeroToTwelve = [0..12] :: [Word]</lang>
{{out}}
<pre>Unsigned Lah numbers: L(n, k):
| |||