OCaml (option informatique) · Chapitre 6 · Application directe du cours

Caractère chiffre

Caractères et chaînes de caractères · niveau 1 (application)

Énoncé

Écrire est_chiffre c, puis valeur c qui, pour un caractère chiffre, renvoie l'entier correspondant ('7' $\mapsto$ 7).

let est_chiffre c = c >= '0' && c <= '9'

let valeur c = int_of_char c - int_of_char '0'

valeur exploite que les chiffres ont des codes consécutifs : int_of_char '7' - int_of_char '0' = 7. Précondition : c est un chiffre.