You are viewing a single comment's thread. Return to all comments →
what is wrong with this code .... this code is working fine on my Terminal ...
hugeGcd nListInt mListInt = gcd (product nListInt) (product mListInt) main :: IO () main = do n <- getLine nList <- getLine let nListInt = map read $ words nList :: [Int] m <- getLine mList <- getLine let mListInt = map read $ words mList :: [Int] putStrLn $ show (hugeGcd nListInt mListInt)
Huge GCD
You are viewing a single comment's thread. Return to all comments →
what is wrong with this code .... this code is working fine on my Terminal ...