expipiplus1 · October 21, 2016 09:53
diff --git a/A.hs b/A.hs
 import           Control.Monad (replicateM)

 -- | Read an integer, n, on one line and read n values on subsequent lines
 readCount :: Read a => IO [a]
 readCount = do
  n <- readLn
  replicateM n readLn

 main = do
  ints <- readCount
  print (sum ints)
	import Control.Monad (replicateM)

	-- \| Read an integer, n, on one line and read n values on subsequent lines
	readCount :: Read a => IO [a]
	readCount = do
	n <- readLn
	replicateM n readLn

	main = do
	ints <- readCount
	print (sum ints)