constante entier N <- ...

{ Methode de creation d'un tableau de reels   }
{ initialise avec des nombres aleatoires      }
{ compris entre 0.0 et 1.0                    }

Tableau [N] de réel fonction initRand()
  Locales
    i : entier
    tab : Tableau [N] de réel
  pour i de 0 à N-1 faire
    tab[i] <- random()
  fait
  retourner tab
fin fonction

{ Affichage d'un tableau de reels             }
{ pour les valeurs comprises                  }
{ entre des bornes minimale et maximale       }

action principale()
  Locales
    min : réel
    max : réel
    t : Tableau [N] de réel
    i : entier
  Ecran.afficher("SVP, valeur minimale? ")
  min <- Clavier.saisirReel()
  Ecran.afficher("SVP, valeur maximale? ")
  max <- Clavier.saisirReel()
  t <- initRand()
  pour i de 0 à N-1 faire
    si ( t[i] >= min ) et ( t[i] <= max ) alors
      Ecran.afficherln(t[i])
    fsi
  fait
fin action