8 lines
269 B
Haskell
8 lines
269 B
Haskell
import System.IO (readFile)
|
|
import System.Environment (getArgs)
|
|
|
|
main :: IO ()
|
|
main = do [_, _, file] <- getArgs
|
|
(_:numbers) <- map (read :: String -> Int) . lines <$> readFile file
|
|
putStrLn $ show (minimum numbers) ++ " " ++ show (maximum numbers)
|