Filename: prob4.hs
--A palindromic number reads the same both ways. The largest palindrome made from the product of two 2-digit numbers is 9009 = 91 99. -- --Find the largest palindrome made from the product of two 3-digit numbers. module Prob4 where isPalindrome x = x == (read (reverse (show x))::Integer) answer = maximum(filter isPalindrome ([x*y | x <- [100..999], y <- [100..999]]))
syntax highlighted by Code2HTML, v. 0.9.1
No comments:
Post a Comment