Ответы
Ответ дал:
0
Ответ:
uses graphabc;
var i:integer;
begin
SetPenWidth(2);
for i:=7 to 9 do
rectangle (10*i,110-10*i,10*i+10,-20+10*i);
rectangle(100,50,170,40);
for i:=20 downto 18 do
rectangle (10*i,-160+10*i,10*i-10,250-10*i);
end.
golovac447:
Привет, можешь пожалуйста помрчь с заданием последним который я добавила. Буду очень благодарна. Просто срочно надо, отмечу как лучший ответ
Похожие вопросы
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад