4 lines
184 B
Text
4 lines
184 B
Text
|
Grid@Table[{"primorial(10^" <> ToString[n] <> ") has ",
|
||
|
|
{timing,answer}=AbsoluteTiming[IntegerLength@primorial[10^n]];answer,
|
||
|
|
" digits in "<>ToString@timing<>" seconds"}, {n,6}]
|