Pascal Как написать процедуру?

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