Предлагаю работу Решить задачу на Haskell

Верх Низ