Question

ПОЖАЛУЙСТА ПОМОГИТЕ! Описать с помощью векторных команд следующий рисунок (цвет заливки произвольный).

Answer 1

Ответ:

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.