Fonction Optimiser(Invariant) ConvertirAngle(A : Reel, AngleDepart : AnglesSupportes, AngleArrivee : AnglesSupportes) Retourner Reel;
Si aucune conversion n'est nécessaire, la même valeur est retournée.
Principal
/*******/
Variable
/******/
A : Reel;
Debut
...
A=ConvertirAngle(10, AngleDegres, Angle);
/* A contient l'équivalent de dix degrés exprimés dans l'unité choisie par l'utilisateur. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |