Question

вот сделайте будет 20баллов

Answer 1

//Эта программа рисует нужное изображение вниз головой
//Во вложении нормальное изображение.
uses
 GraphABC;
begin
line(20,80,65,110);
line(65,110,110,80);
line(110,80,20,80);
rectangle(20,30,110,10);
rectangle(30,80,40,30);
rectangle(50,80,60,30);
rectangle(70,80,80,30);
rectangle(90,80,100,30);
end.