Задание достаточно интересное и нестандартное. Под какую именно версию Pascal вам нужно решение?
Дело в том, что работа с графикой в разных версиях отличается, и то, что программа заработает в BP, не гарантирует, что она же без проблем запустится в FreePascal-е и уж, тем более, в PascalABC.