Problem 8
http://projecteuler.net/index.php?section=problems&id=8
--Haskell (Input data from STDIN), 20090101 import List (tails) import Char (digitToInt) main = getLine >>= print . maximum . map (product . map digitToInt . take 5) . tails
http://projecteuler.net/index.php?section=problems&id=8
--Haskell (Input data from STDIN), 20090101 import List (tails) import Char (digitToInt) main = getLine >>= print . maximum . map (product . map digitToInt . take 5) . tails