Дуги и фигуры из них - Pascal ABC

Формулировка задачи:

Ребят, привет. Вызвался помочь сестре со школьной задачей. И не справился) Проходят геометрические фигуры, дуги. Помогите на Pascal ABC изобразить вторую (правую) картинку. С первой я справился.

Решение задачи: «Дуги и фигуры из них»

Листинг программы

Program Caterpillar;
uses GraphABC;
begin
 SetPenWidth(10);
 SetBrushColor(clwhite);
     SetPenColor(clAqua);
     arc(90,150,80,330,210);
     arc(90,240,80,30,270);
     arc(160,280,80,90,330);
     arc(225,240,80,150,30);
     arc(230,150,80,210,90);
     arc(160,110,80,270,150);
     SetPenColor(clwhite);
     SetPenWidth(0);
     SetBrushColor(clwhite);
     Circle(160,190,60);
     SetPenWidth(10);
     SetPenColor(clYellow);
     SetBrushColor(clWhite);
     arc(160,160,30,30,270);
     arc(190,175,30,330,210);
     arc(190,205,30,270,150);
     arc(160,225,30,210,90);
     arc(130,210,30,150,30);
     arc(130,180,30,90,330);
     SetPenColor(clAqua);
     circle(160,190,5);
 
end.

Объяснение кода листинга программы

Устанавливаем ширину пера в 10 единиц.
Устанавливаем цвет кисти на белый.
Устанавливаем цвет пера на зеленый.
Рисуем дугу с координатами начала 90,150, радиусом 80, углом 330 градусов и высотой 210.
Рисуем дугу с координатами начала 90,240, радиусом 80, углом 30 градусов и высотой 270.
Рисуем дугу с координатами начала 160,280, радиусом 80, углом 90 градусов и высотой 330.
Возвращаем цвет пера и ширину пера к начальным значениям.
Рисуем окружность с координатами центра 160,190, радиусом 60.
Устанавливаем цвет пера на желтый и цвет кисти на белый.
Рисуем дугу с координатами начала 160,160, радиусом 30, углом 30 градусов и высотой 270.
Рисуем дугу с координатами начала 190,175, радиусом 30, углом 330 градусов и высотой 210.
Рисуем дугу с координатами начала 190,205, радиусом 30, углом 270 градусов и высотой 150.
Рисуем дугу с координатами начала 160,225, радиусом 30, углом 210 градусов и высотой 90.
Рисуем дугу с координатами начала 130,210, радиусом 30, углом 150 градусов и высотой 30.
Рисуем дугу с координатами начала 130,180, радиусом 30, углом 90 градусов и высотой 330.
Устанавливаем цвет пера на зеленый и цвет кисти на белый.
Рисуем окружность с координатами центра 160,190, радиусом 5.