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