Recherche:

decaller(t,i-p {cuseur ici},pos);

donc pour quoi il m affiche error?

error89 :')'expected

procedure shell (n: integer ; var t:tab ;var p:integer ) ;
var
i,x: integer;
begin
p:=p div 3 ;

for i:= p+1 to n do

x:=t[i];
if t[i]<t[i-p] then

non le compteur se deplace automatiquement (
0)
debut trier(n:entier; var t:tab)
p<--0
tant que (p<n)faire
p<--3*p+1
fin tant que
tant que (p<>0)faire
p<---p div 3
pour i de p à n faire

Remarque :
Le tri shell trie chaque liste d'élements séparés de p positions chacun avec le tri par insertion. L'alghorithme effectue plusieurs fois cette opération en diminuant p jusqu'à p égal à...