{ Lecture au clavier d'une valeur reelle     }
{ comprise dans un intervalle et retour      }

reel fonction lectureReelDansIntervalle(-> reel min,-> reel max)
  reel valeur
  valeur <- saisir()
  tant que valeur < min ou valeur > max faire
    afficherln("Erreur!!! Veuillez ressaisir)
    valeur <- saisir()
  fait
  retourner valeur
fin fonction