Нарисовать машину(на фото) в PasсalABC при помощи graphabc. (размер окна 256, 256) даю 30 баллов

​

Ответ:

uses GraphABC;

begin

SetWindowSize(256,256);

SetPenWidth(3);

Rectangle(15,120,241,165);

Line(128,85,128,165);

Line(78,120,78,165);

Line(178,120,178,165);

Line(93,85,163,85);

Line(78,120,93,85);

Line(163,85,178,120);

Line(88,135,98,135);

Line(158,135,168,135);

Circle(50,170,20);

Circle(190,170,20);

Circle(15,130,5);

Circle(241,130,5);

SetPenWidth(1);

Line(93,85,93,120);

Line(163,85,163,120)

end.

Объяснение:

картинка