Question

Составить программу для нахождения 1 наименьшего из 4 чисел, после чего умножить его на 2

Answer 1

Приведу пример на Haskell

• main :: IO ()
• main = do
•  a <- read $ getLine :: IO Int
•  b <- read $ getLine :: IO Int
•  c <- read $ getLine :: IO Int
•  d <- read $ getLine :: IO Int
•  print $ 2 * minimum [a, b, c, d]