В системе программирования Pascal ABC составьте программы создания следующих изображений с использованием двух процедур.
Мне надо нарисовать вишню и рисунок б).
Пожалуйста!!!

Рыбы:program More;uses Drawman;procedure Fish;begin  PenDown;  onvector(1, 1);  onvector(3, -1);  onvector(1, 1);  onvector(0, -2);  onvector(-1, 1);  onvector(-3, -1);  onvector(-1, 1);  PenUp;end;procedure Il;begin  PenDown;  onvector(-1, 3);  onvector(1, 3);  onvector(0, -3);  onvector(1, 1);  onvector(-1, -4);  PenUp;end;begin  Field(15, 15);  ToPoint(7, 11);Fish;  ToPoint(1, 9);Fish;  ToPoint(8, 8);Fish;  ToPoint(2, 0);Il;  ToPoint(5, 0);Il;  ToPoint(9, 0);Il;  ToPoint(12, 0);Il;  ToPoint(0, 0);end.Вишня:program Vishnya;uses Drawman;procedure Leaf;begin  PenDown;  onvector(2, 0);  onvector(2, -2);  onvector(-2,0);  onvector(-2,2);end;procedure Berry;begin  PenDown;  onvector(1,-1);  onvector(0,-1);  onvector(-1,-1);  onvector(-1,0);  onvector(-1, 1);  onvector(0, 1);  onvector(1,1);  onvector(1,0);end;beginField(15, 15);ToPoint (2, 12); Leaf;  PenUp;ToPoint (6, 10); Leaf;onvector(-3,-6); Berry;  PenUp;onvector(3,6);   PenDown;onvector(0,-6);  onvector(1,0); Berry;  PenUp;  ToPoint(0, 0);end.