この問題をHaskellで書くと、 main = print (foldl1' max (filter is_palindromic [ x * y | x <- [100..999], y <- [100..999] ])) Pythonで書くと、 print reduce(max, ifilter(is_palindromic, (x * y for x, y in product(xrange(100, 1000), xrange(100…