Special factorials: Difference between revisions

Content added Content deleted
(→‎{{header|Factor}}: speed up digit counting)
Line 75: Line 75:


"Number of digits in $5:" print
"Number of digits in $5:" print
5 $ number>string length . nl
5 $ log10 >integer 1 + . nl


{ 1 2 6 24 120 720 5040 40320 362880 3628800 119 }
{ 1 2 6 24 120 720 5040 40320 362880 3628800 119 }