Предлагаю работу решить задачи в pascal

Верх Низ