Costruzione di un rettangolo

	Nuovo punto A	`A=(x1,y1)`
	Nuovo punto B	`B=(x2,y2)`
	Traccia il segmento a = AB tra i punti A e B	`a=Segmento[A,B]`
	Costruisci la retta perpendicolare b al segmento AB, passante per B	`b=Perpendicolare[B,a]`
	Nuovo punto C sulla retta b	`...`
	Costruisci la retta parallela c al segmento a=AB e passante per il punto C	`c=Retta[C,a]`
	Costruisci la retta perpendicolare d al segmento AB, passante per A	`d=Perpendicolare[A,a]`
	Interseca la retta c con la retta d, per ottenere il punto di intersezione D	D=`Intersezione[c,d]`
	Crea il poligono ABCD.	`Poligono[A,B,C,D]`

	Individua i punti di intersezione C e D con il tasto del mouse…
	Non dimenticare di chiudere il poligono facendo clic sul punto A, dopo avere selezionato il punto D
	Esegui il test di trascinamento sui punti A, B e C… per verificare se la costruzione è corretta