3 lines
184 B
Text
3 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}]
|