Fonction Optimiser(Invariant, NulAbsorbant) SecH(R : Nul Ou Reel) Retourner Nul Ou Reel;
Fonction Optimiser(Invariant, NulAbsorbant) SecH(D : Nul Ou Decimal) Retourner Nul Ou Decimal;
Fonction Optimiser(Invariant, NulAbsorbant) SecH(C : Nul Ou Complexe) Retourner Nul Ou Complexe;
Si le paramètre est Nul, alors le résultat est Nul.
Principal
/*******/
Variable
/******/
R : Reel;
Debut
...
R=SecH(1.0);
/* R a pour valeur SecH(1.0). */
...
Fin Principal
- | - | - | - | - | - | - | - | - |