Напишите плизз как решить задание? Которая изобразит на экране монитора прямоугольник,разделенный диагоналями на 4 закрашенных в разные цвета треугольника.Толщину линии установите в 4 пикселя.
Напишите плизз как решить задание?
Которая изобразит на экране монитора прямоугольник,разделенный диагоналями на 4 закрашенных в разные цвета треугольника.Толщину линии установите в 4 пикселя.
Ответ(ы) на вопрос:
Гость
uses
GraphABC;
begin
SetWindowSize(800, 600);
SetPenWidth(4);
SetPenColor(clMagenta);
DrawRectangle(100, 100, 500, 500);
Line(100, 100, 500, 500);
Line(100, 500, 500, 100);
SetPenColor(clRed);
FloodFill(300, 200, clRed);
FloodFill(400, 300, clGreen);
FloodFill(400, 450, clBlue);
FloodFill(150, 300, clYellow);
end.
Не нашли ответ?
Похожие вопросы