Count in factors: Difference between revisions
Content added Content deleted
(→{{header|Haskell}}: replace) |
(→{{header|Haskell}}: add 2144..) |
||
Line 533: | Line 533: | ||
<lang haskell>*Main> :m +Data.List |
<lang haskell>*Main> :m +Data.List |
||
*Main Data.List> |
*Main Data.List> print "1" >> mapM_ (print . intercalate " * " . map show . factorize) [2..] |
||
"1" |
"1" |
||
"2" |
"2" |
||
Line 546: | Line 546: | ||
"11" |
"11" |
||
"2 * 2 * 3" |
"2 * 2 * 3" |
||
. . . |
|||
"13" |
|||
⚫ | |||
*Main Data.List> mapM_ (print . intercalate " * " . map show . factorize) [2144..] |
|||
⚫ | |||
"2 * 2 * 2 * 2" |
"2 * 2 * 2 * 2 * 2 * 67" |
||
"3 * 5 * 11 * 13" |
|||
"17" |
|||
"2 * |
"2 * 29 * 37" |
||
⚫ | |||
"2 * 2 * 3 * 179" |
|||
⚫ | |||
"2 * 5 * 5 * 43" |
|||
"3 * 3 * 239" |
|||
"2 * 2 * 2 * 269" |
|||
"2153" |
|||
"2 * 3 * 359" |
|||
. . .</lang> |
|||
=={{header|Icon}} and {{header|Unicon}}== |
=={{header|Icon}} and {{header|Unicon}}== |