Question

как залить фигуру градиентом паскаль

Answer 1

Ответ:

uses GraphABC;

var

 a: boolean;

 

begin

 SetBrushColor(clBlue);

 SetGradientBrushSecondColor(clRed);

 SetPenMode(2);

 FillRect(100,100,300,300);

end.

Объяснение: