Помогите пожалуйста !!

Приложения:

litchferet9177: Так что сделать то надо ???
bamnup00: Програму написать
bamnup00: Чтобы это чертилась
bamnup00: И закрасилась
bamnup00: Если что graphABC

Ответы

Ответ дал: nastikots
1

Ответ:

program z1;

uses graphABC;

begin

SetWindowWidth(600);

SetWindowHeight(600);

SetPenColor(clRed);

Ellipse(200,50,500,250);

SetPenWidth(5);

SetPenColor(clBlack);

SetPenStyle(psDash);

Rectangle(350,300,450,400);

SetPenStyle(psSolid);

SetBrushColor(clOrange);

Rectangle(100,250,300,550);

Line(450,400,550,50);

SetPenColor(clGreen);

Line(550,50,50,150)

end.

Объяснение:

картинка

Приложения:
Вас заинтересует