Нужен ромб по паскалю

Question

Нужен ромб по паскалю

Comments

Дайте готовую программу пожалуйста !!

Answer 1

PascalABC.Net 3.2

uses GraphABC;
begin
  DrawPolygon(Arr((140,50),(230,170),(140,290),(50,170)))
end.