Срочно!!!!!!! СРОЧНО!!!!!! Составьте программу построения изображения с использованием процедуры Flag

Большое вам спасибо! Вы очень помогли с информатикой!

uses Drawman;procedure flag (x,y: integer);begintopoint(x, y);pendown;onvector(0, 5);onvector(3, 0);onvector(-1, -1);onvector(1, -1);onvector(-3, 0);penupend;beginfield (15,7);flag (1,1);flag (7,1);flag (12,1);topoint (0,0)end.