Question

Пользователь вводит два целых числа не равных нулю. Проверить, делится ли их сумма на 3 без

остатка. Вывести на экран сообщение об этом, а также остаток (если он есть) и частное (в любом

случае). помогите пж​

Answer 1

Напишу на Haskell

• main :: IO ()
• main = do
•  (d, m) <- (`divMod` 3) . sum <$> mapM (const (read <$> getLine :: IO Int)) [1..2]
•  when (m /= 0) $ putStrLn $ "Не делится без остатка на 3. Остаток: " ++ show m
•  putStrLn $ "Частное: " ++ show d