Prog Caml : Ecrire la fonction tarif_selon_age

Écrire une fonction tarif_selon_age qui prend en paramètre un âge, et qui donne le tarif sous forme de chaîne selon la règle suivante :

• "gratuit" jusqu'à 7 ans inclus,
• "tarif jeune" entre 8 et 25 ans inclus,
• "plein tarif" entre 26 et 65 ans inclus,
• "tarif vermeil" pour les plus de 66 ans.

Code à compléter Caml

let tarif_selon_age age =
(*à compléter *)
 ;;

print_string (tarif_selon_age (read_int()));;