Ответ:
uses graphabc;
begin
setwindowsize (600,500);
SetPenWidth(5);
rectangle (150,250,450,450);
FloodFill(155,255,clyellow);
line (149,250,303,150);
line (300,150,450,250);
rectangle (250,300,350,375);
line (250,325,350,325);
line (300,325,300,375);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
uses graphabc;
begin
setwindowsize (600,500);
SetPenWidth(5);
rectangle (150,250,450,450);
FloodFill(155,255,clyellow);
line (149,250,303,150);
line (300,150,450,250);
rectangle (250,300,350,375);
line (250,325,350,325);
line (300,325,300,375);
end.
линия (1, 4, 8,4)
прямоугольник (1, 5,...)