Fonction Optimiser(Invariant) ConvertirMetrique(Longueur : Reel, MetriqueDepart : MetriquesSupportees, MetriqueArrivee : MetriquesSupportees) Retourner Reel;
Si aucune conversion n'est nécessaire, la même valeur est retournée.
Principal
/*******/
Variable
/******/
A : Reel;
Debut
...
A=ConvertirMetrique(10, MetriqueMetre, Metrique);
/* A contient l'équivalent de dix mètres exprimés dans l'unité choisie par l'utilisateur. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |