Type Radian=Reel Contrainte Objet Entre -Pi Et Pi;
Principal /*******/ Variable /******/ R : Radian; Debut ... R=Pi; /* R a pour valeur Pi radians. */ ... Fin Principal