Skip to content

Embed URL

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Project Euler - Problem 9
result = truncate
$ product
$ head
$ filter (\ns -> sum ns == 1000)
$ map (\[x,y,xy'] -> [x,y,sqrt(xy')])
[[x, y, x^2 + y^2] |
x <- [1..995],
y <- [(x + 1)..996]]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.