Программирование в Delphi Урок 7-1. Самостоятельная задача

Здравствуйте, уважаемые программисты! Предлагаем испытать свои силы в решении самостоятельной практический задачи! Будем ждать Ваши решения и вопросы под видео! Также можно просто написать: "решено" или "все очень трудно, нужна помощь".