Question

СРОЧНЯК Составьте программу, которая рисует треугольник со сторонами красного, синего, зелёного цвета, с координатами вершин (120,40),(160,120),(60,160). Толщина линии 4 пикселя

Answer 1

uses GraphAbc; begin  SetWindowSize(300,200);  SetPenWidth(4);  SetPenColor(clRed);  Line(120,40,160,120);  SetPenColor(clBlue );  Line(160,120,60,160);  SetPenColor(clGreen);  Line(60,160,120,40);  end.