We use cookies to ensure you have the best browsing experience on our website. Please read our cookie policy for more information about how we use cookies.
filterLessThan :: Int -> [Int] -> [Int]
filterLessThan _ [] = []
filterLessThan n (x:xs)
| x < n = x : filterLessThan n xs
| otherwise = filterLessThan n xs
main :: IO ()
main = do
n <- readLn :: IO Int
inputdata <- getContents
let
numbers = map read (lines inputdata) :: [Int]
putStrLn . unlines $ (map show . filterLessThan n) numbers
Thanks for sharing this valuable JavaScript filter; otherwise, I often encounter bugs and find myself having to visit OSCracks platforms that offer solutions to programming errors.
Cookie support is required to access HackerRank
Seems like cookies are disabled on this browser, please enable them to open this website
Filter Array
You are viewing a single comment's thread. Return to all comments →
filterLessThan :: Int -> [Int] -> [Int] filterLessThan _ [] = [] filterLessThan n (x:xs) | x < n = x : filterLessThan n xs | otherwise = filterLessThan n xs
main :: IO () main = do n <- readLn :: IO Int inputdata <- getContents let numbers = map read (lines inputdata) :: [Int] putStrLn . unlines $ (map show . filterLessThan n) numbers
Thanks for sharing this valuable JavaScript filter; otherwise, I often encounter bugs and find myself having to visit OSCracks platforms that offer solutions to programming errors.