oPolygone2D_1 est un Polygone2D
Polyligne2DAjoutePoint(oPolygone2D_1.Contour, -1.00, 1.00)
Polyligne2DAjoutePoint(oPolygone2D_1.Contour, 1.00, 1.00)
Polyligne2DAjoutePoint(oPolygone2D_1.Contour, 1.00, -1.00)
Polyligne2DAjoutePoint(oPolygone2D_1.Contour, -1.00, -1.00)
Polyligne2DAjoutePoint(oPolygone2D_1.Contour, -1.00, 1.00)
Périmètre est un réel = GéométriePérimètre(oPolygone2D_1)
Trace(Périmètre)