Problem 4
http://projecteuler.net/index.php?section=problems&id=4
--Haskell, 20090101 main = print $ maximum [x*y | x<-[100..999], y<-[100..999], x>=y, show (x*y)==(reverse.show) (x*y)]
http://projecteuler.net/index.php?section=problems&id=4
--Haskell, 20090101 main = print $ maximum [x*y | x<-[100..999], y<-[100..999], x>=y, show (x*y)==(reverse.show) (x*y)]