blob: 83bc3498c10ca4c74ca6f97d6ba72778f9d2923d (
plain) (
tree)
|
|
n = 600851475143
(for x <- 2..trunc(:math.sqrt(n / 2)), rem(n, x) == 0, do: x)
|> Enum.reduce_while(n, fn x, acc ->
if acc == x, do: {:halt, x}, else: {:cont, acc / x}
end)
|> trunc
|> IO.puts
|