Cette procédure remplit un tableau avec des lettres majuscules aléatoires.
Procédure remplir (@t:tab; n:entier) Début Pour i de 0 à n-1 faire t[i] ← chr(aléa(ord('A'), ord('Z'))) Fin pour fin