Largest prime factor: Difference between revisions

Line 214:
@show first(last(factor(600851475143).pe))
</lang>{{out}}<pre>first(last((factor(600851475143)).pe)) = 6857</pre>
=={{header|Mathematica}} / {{header|Wolfram Language}}==
<lang Mathematica>Max[FactorInteger[600851475143][[All, 1]]]</lang>
 
{{out}}<pre>
6857
</pre>
 
=={{header|PARI/GP}}==
Anonymous user