Нужна Помощь в Pascal; Срочно⁠⁠

Ребята , Прошу вас сделать вот такой рисунок на Pascal; Пожалуйста !