mercii :) et concernant le remplissage aléatoire par des caractères alphabétiques comment faire ???
procedure remplissage(var t:tab;n,i:integer);
begin
if i<=n then
begin
t[i]:=chr(random(121)+97);
remplissage(t,n,i+1);
end;
end; lors de l'affichage il y a des symboles aussi dans le tableau
random(900)+100 serait sûrement mieux.
procedure remplissage(var t:tab;n,i:integer);
begin
if i<=n then
begin
t[i]:=chr(random(121)+97);
remplissage(t,n,i+1);
end;
end; lors de l'affichage il y a des symboles aussi dans le tableau
pour ne prendre en compte que les caractères, de 0 à 25 donc...