Написать программу ёлка для чертёжника

Question

Написать программу ёлка для чертёжника

Answer 1

Uses drawman;beginfield(12,12);topoint(5,1);pendown;topoint(7,1);topoint(7,3);penup;topoint(5,1);pendown;topoint(5,3);penup;topoint(2,3);pendown;topoint(10,3);onvector(-3,3);penup;topoint(2,3);pendown;onvector(3,3);topoint(3,6);topoint(3,6);onvector(2,2);topoint(4,8);onvector(2,2);onvector(2,-2);topoint(7,8);onvector(2,-2);topoint(7,6);penup;topoint(0,0);end.

Comments

uses drawman;
begin
field(12,12);
topoint(5,1);
pendown;
topoint(7,1);
topoint(7,3);
penup;
topoint(5,1);
pendown;
topoint(5,3);
penup;
topoint(2,3);
pendown;
topoint(10,3);
onvector(-3,3);
penup;
topoint(2,3);
pendown;
onvector(3,3);
topoint(3,6);
topoint(3,6);
onvector(2,2);
topoint(4,8);
onvector(2,2);
onvector(2,-2);
topoint(7,8);
onvector(2,-2);
topoint(7,6);
penup;
topoint(0,0);
end.