Les Maths Libres
Accueil du site > Avec Metapost > Figures géométriques > Des exemples de quadrilatères particuliers

Des exemples de quadrilatères particuliers

mercredi 23 mai 2007

Parallélogramme ABCD : codage des côtés

Voici son code :


u :=1cm ;
figure (-8u,-8u,10u,8u) ;

pair A,B,C,D,V ;

A :=(0,0) ;           %changer la taille du parallélogramme
B :=(6u,0) ;
V :=(1u,4u) ; % V = vecteur BC
C := B shifted V ;
D := A shifted V ;

draw A—B--C—D--cycle ;

label.llft(btex $A$ etex,A) ;  %changer les noms des points de la zone de texte
label.lrt(btex $B$ etex,B) ;
label.urt(btex $C$ etex,C) ;
label.ulft(btex $D$ etex,D) ;


trace codesegments(A,B,D,C,1) ;
trace codesegments(B,C,A,D,2) ;


fin ;


Parallélogramme ABCD : codage des diagonales

Voici son code :


u :=1cm ;
figure (-8u,-8u,10u,8u) ;

pair A,B,C,D,V,O ;

A :=(0,0) ;           %changer la taille du parallélogramme
B :=(6u,0) ;
V :=(1u,4u) ; % V = vecteur BC
C := B shifted V ;
D := A shifted V ;
O :=(A+C)/2 ;

draw A—B--C—D--cycle ;
draw A—C ;
draw B—D ;

label.llft(btex $A$ etex,A) ;  %changer les noms des points de la zone de texte
label.lrt(btex $B$ etex,B) ;
label.urt(btex $C$ etex,C) ;
label.ulft(btex $D$ etex,D) ;
label.top(btex $O$ etex,O) ;


trace codesegments(A,O,O,C,1) ;
trace codesegments(B,O,O,D,2) ;


fin ;


Losange ABCD : codage des côtés

Voici son code :


u :=1cm ;
figure (-8u,-8u,10u,8u) ;

pair A,B,C,D,V,O ;

numeric AC,BD ;

AC :=6 ; % diagonale du losange
BD :=4 ;

A :=(0,0) ;
C :=(AC*u,0) ;
O :=(A+C)/2 ;
B :=(xpart(O),ypart(O)-BD*u/2) ;
D :=(xpart(O),ypart(O)+BD*u/2) ;


draw A—B--C—D--cycle ;


label.lft(btex $A$ etex,A) ;  %changer les noms des points de la zone de texte
label.bot(btex $B$ etex,B) ;
label.rt(btex $C$ etex,C) ;
label.top(btex $D$ etex,D) ;


trace codesegments(A,B,B,C,2) ;
trace codesegments(C,D,D,A,2) ;


fin ;


Losange ABCD : codage des diagonales

Voici son code :


u :=1cm ;
figure (-8u,-8u,10u,8u) ;

pair A,B,C,D,V,O ;

numeric AC,BD ;

AC :=6 ; % diagonales du losange
BD :=4 ;

A :=(0,0) ;           
C :=(AC*u,0) ;
O :=(A+C)/2 ;
B :=(xpart(O),ypart(O)-BD*u/2) ;
D :=(xpart(O),ypart(O)+BD*u/2) ;


draw A—B--C—D--cycle ;
draw A—C ;
draw B—D ;

label.lft(btex $A$ etex,A) ;  %changer les noms des points de la zone de texte
label.bot(btex $B$ etex,B) ;
label.rt(btex $C$ etex,C) ;
label.top(btex $D$ etex,D) ;
label.llft(btex $O$ etex,O) ;


trace codesegments(A,O,O,C,1) ;
trace codesegments(B,O,O,D,2) ;

trace codeperp(C,O,D,5) ;


fin ;


Rectangle ABCD : codage des côtés

Voici son code :


u :=1cm ;
figure (-8u,-8u,10u,8u) ;

pair A,B,C,D ;

numeric AB,AD ;

AB :=6 ; % changer la taille du rectangle
AD :=4 ;

A :=(0,0) ;
B :=(AB*u,0) ;
C :=(AB*u,AD*u) ;
D :=(0,AD*u) ;

draw A—B--C—D--cycle ;

label.llft(btex $A$ etex,A) ;  %changer les noms des points de la zone de texte
label.lrt(btex $B$ etex,B) ;
label.urt(btex $C$ etex,C) ;
label.ulft(btex $D$ etex,D) ;


trace codesegments(A,B,D,C,1) ;
trace codesegments(B,C,A,D,2) ;

trace codeperp(B,A,D,5) ;


fin ;


Rectangle ABCD : codage des diagonales

Voici son code :


u :=1cm ;
figure (-8u,-8u,10u,8u) ;

pair A,B,C,D,O ;

numeric AB,AD ;

AB :=6 ; % changer la taille du rectangle
AD :=4 ;

A :=(0,0) ;          
B :=(AB*u,0) ;
C :=(AB*u,AD*u) ;
D :=(0,AD*u) ;
O :=(A+C)/2 ;

draw A—B--C—D--cycle ;
draw A—C ;
draw B—D ;

label.llft(btex $A$ etex,A) ;  %changer les noms des points de la zone de texte
label.lrt(btex $B$ etex,B) ;
label.urt(btex $C$ etex,C) ;
label.ulft(btex $D$ etex,D) ;
label.top(btex $O$ etex,O) ;


trace codesegments(A,O,O,C,2) ;
trace codesegments(B,O,O,D,2) ;


fin ;


Carré ABCD : codage des côtés

Voici son code :


u :=1cm ;
figure (-8u,-8u,10u,8u) ;

pair A,B,C,D ;

numeric AB ;

AB :=6 ; % changer la taille du carré

A :=(0,0) ;
B :=(AB*u,0) ;
C :=(AB*u,AB*u) ;
D :=(0,AB*u) ;

draw A—B--C—D--cycle ;

label.llft(btex $A$ etex,A) ;  %changer les noms des points de la zone de texte
label.lrt(btex $B$ etex,B) ;
label.urt(btex $C$ etex,C) ;
label.ulft(btex $D$ etex,D) ;


trace codesegments(A,B,D,C,2) ;
trace codesegments(B,C,A,D,2) ;

trace codeperp(B,A,D,5) ;


fin ;


Carré ABCD : codage des diagonales

Voici son code :


u :=1cm ;
figure (-8u,-8u,10u,8u) ;

pair A,B,C,D,O ;

numeric AB ;

AB :=6 ; % changer la taille du carré

A :=(0,0) ;          
B :=(AB*u,0) ;
C :=(AB*u,AB*u) ;
D :=(0,AB*u) ;
O :=(A+C)/2 ;

draw A—B--C—D--cycle ;
draw A—C ;
draw B—D ;

label.llft(btex $A$ etex,A) ;  %changer les noms des points de la zone de texte
label.lrt(btex $B$ etex,B) ;
label.urt(btex $C$ etex,C) ;
label.ulft(btex $D$ etex,D) ;
label.top(btex $O$ etex,O) ;


trace codesegments(A,O,O,C,2) ;
trace codesegments(B,O,O,D,2) ;

trace codeperp(A,O,B,5) ;


fin ;


Lire l’article suivant.