Skip to content

Instantly share code, notes, and snippets.

@ldunn
Created September 20, 2010 05:26
Show Gist options
  • Select an option

  • Save ldunn/587465 to your computer and use it in GitHub Desktop.

Select an option

Save ldunn/587465 to your computer and use it in GitHub Desktop.
let euler4 =
let largestPalindrome = ref 0
for i in 100..999 do
for j in 100..999 do
if pairMakesPalindrome i j && i*j > !largestPalindrome then
largestPalindrome := i*j
!largestPalindrome
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment