Простая задача, Графика Опции

[Almaz]

Вообщем задача состоит в следующем по условию дано:
uses graph;
var
grDriver:integer;
grMode:integer;
ErrCode:integer;
res:integer;
begin
grDriver:=detect;
Initgraph(grDriver, grMode,'С:tp\bgi');
ErrCode:=Graphresult;
if ErrCode=grOk then
begin
{основные действия}
end;
CloseGraph;
end.

Необходимо нарисовать пятиконечную звезду-такая как была у красной армии-что-тотипо такого
там заданы грудусы-можно делать и не по градусам а по координатам.Буду очень признателе если поможете-так как я в паскале не оч и с графикой никогда в нем на работал(((Зареннее благодарю