Question

Пользователь вводит 4 числа, надо найти сумму минимального и максимального из них
min(a1,a2,a3,a4)
max(a,1,a2,a3,a4)

Answer 1

Напишу ответ на Haskell.

• main :: IO ()
• main = do
•  ks <- mapM (const (read <$> getLine :: IO Int)) [1..4]
•  print $ minimum ks + maximum ks