графический модуль (относительные координаты) в Free pascal

[skiffok]

Народ, помогите пожалуйста выполнить работу.
задание:

Составьте процедуру, выводящую представленную фигуру по заданным:
• координатам центра фигуры;
• размеру минимальной единицы фигуры;
• цвету линии.
Выведите на экран несколько таких фигур разного размера и цвета.


А в конечном итоге должно получиться что-то вроде

Я в программе "дуб-дубом", но мне подсказали что делается по принципу:
переменные-
a - размер
c - цвет
x,y - положение.
Еще написали что
line(a,a,3a,3a)
circle(2a,a,a,c)
circle(3a,2a,a,c) и тд...
Народ выручайте, срочно надо...