constante entier N <- ...

{ Fonction de création et retour              }
{ d'un tableau de réels initialisé            }
{ avec des nombres aléatoires                 }
{ compris entre 0.0 et 1.0                    }
{ n : La taille du tableau à créer            }

Tableau [] de réel fonction initRand(n)
  Entrées
    entier n
  Locales
    entier i
    Tableau [n] de réel tab
  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
    réel min
    réel max
    Tableau [N] de réel t
    entier i
  afficher("SVP, valeur minimale? ")
  min <- saisir()
  afficher("SVP, valeur maximale? ")
  max <- saisir()
  t <- initRand(N)
  pour i de 0 à N-1 faire
    si ( t[i] >= min ) et ( t[i] <= max ) alors
      afficherln(t[i])
    fsi
  fait
fin action