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