Skip to content

Instantly share code, notes, and snippets.

@stepankuzmin
Created January 26, 2012 11:02
Show Gist options
  • Save stepankuzmin/1682247 to your computer and use it in GitHub Desktop.
Save stepankuzmin/1682247 to your computer and use it in GitHub Desktop.
Project Euler. Problem 4.
lists:max([Z || Z <- [X*Y || X <- lists:seq(1, 999), Y <- lists:seq(1, 999)], lists:reverse(erlang:integer_to_list(Z)) == erlang:integer_to_list(Z)]).
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment