input geometriesyr;
figure(0,-0.2u,2u,2u);
pair A,B,C,D;
A=u*(0.5,0.5);
B=u*(1.5,0.5);
C=u*(1.5,1.5);
D=u*(0.5,1.5);
path cc;
cc=A--B--C--D--cycle;
draw cc;
draw codeperp(A,B,C,3);
draw codeperp(B,C,D,3);
draw codeperp(C,D,A,3);
draw codesegments(A,B,B,C,2);
draw codesegments(C,D,D,A,2);
cotation(A,B,-2mm,-2mm,btex $1\,cm$ etex);
fin;
figure(0,0,2.5u,2u);
papiermil((0,0),1,1,(0,0),(2,2),bleu);
drawoptions( withpen pencircle scaled1.5bp);
draw cc;
draw (u*(0.1,0.1))--(u*(0.2,0.1))--(u*(0.2,0.2))--(u*(0.1,0.2))--cycle;
label.rt(btex Unit\'e d'aire etex,u*(0.1,0.2));
fin;
figure(-u,0,9u,4.5u);
papierun((-1,0),(9,4.5),orange);
pair A,B,C,D;
path cc;
cc=u*(-1,0)--(u*(0,0))--(u*(0,1))--(u*(-1,1))--cycle;
draw hachurage(cc,60,0.1,0);
draw cc withpen pencircle scaled1.5bp;
label.rt(btex Unit\'e d'aire etex,u*(0,0.5));
A=u*(1,1);
B=u*(7.9,1);
C=u*(7.9,3.7);
D=u*(1,3.7);
draw A--B--C--D--cycle withpen pencircle scaled1.25bp;
cotationmil(D,C,5mm,20,btex $6,9\,cm$ etex);
cotationmil(A,D,5mm,20,btex $2,7\,cm$ etex);
fin;
figure(0,0,9u,4.5u);
papiermil((0,0),1,1,(0,0),(9,4.5),orange);
pair A,B,C,D;
A=u*(1,1);
B=u*(7.9,1);
C=u*(7.9,3.7);
D=u*(1,3.7);
draw A--B--C--D--cycle withpen pencircle scaled1.25bp;
cotationmil(D,C,5mm,20,btex $69\,mm$ etex);
cotationmil(A,D,5mm,20,btex $27\,mm$ etex);
draw (u*(0.5,0.5))--(u*(0.6,0.5))--(u*(0.6,0.6))--(u*(0.5,0.6))--cycle withpen pencircle scaled 1.25bp;
label.rt(btex Unit\'e d'aire etex,u*(0.6,0.5));
fin;
end