Помогиите! написать программу которая рисует три треугольника разных цветов

Question

Информатика

Бориска

9 марта, 10:28

Помогиите! написать программу которая рисует три треугольника разных цветов

+3

Ответы (1)

Знаете ответ на вопрос?

Сашута · Answer 1

Точно уверен

uses GraphABC;

begin

SetWindowSize (400, 400) ;

SetWindowTitle ('Синий прямоугольник с фиолетовой штриховкой') ;

SetBrushStyle (bsHatch) ;

SetBrushColor (clMagenta) ;

SetBrushHatch (bhVertical) ;

FillRectangle (140,80,320,200) ;

SetPenColor (clBlue) ;

DrawRectangle (140,80,320,200) ;

end.