Largest prime factor: Difference between revisions
Content added Content deleted
(Added Wren) |
(add fermat) |
||
| Line 5: | Line 5: | ||
<br>What is the largest prime factor of the number 600851475143 ? |
<br>What is the largest prime factor of the number 600851475143 ? |
||
<br><br> |
<br><br> |
||
=={{header|Fermat}}== |
|||
<lang fermat>n:=600851475143; |
|||
j:=3; |
|||
while Isprime(n)<>1 do |
|||
if Divides(j, n) then n:=n/j fi; |
|||
j:=j+2; |
|||
od; |
|||
!!n;</lang> |
|||
{{out}}<pre>6857</pre> |
|||
=={{header|FreeBASIC}}== |
=={{header|FreeBASIC}}== |
||