Error 85: ";" expected

Bonsoir
je suis en train de faire un TP en pascal et j'ai une erreur :
" error 85: ";" expected "
cette erreur se pose sur else, je sais bien que avant else il n'y a pas de ; mais je ne sais pas pourquoi cette erreur??
Voilà une partie de mon tpM

Code:

---

1 2 3 4 5 6 7 8

procedure rech(cle:string; pos:integer; p:ptr); begin writeln('donnez la cle que vous voulez chercher: '); readln(cle); i:=h(cle); if t[i]^.num_ccp=cle then pos:=i; p:=nil else

---

y a t'il quelque chose derrière le else?

si tu laisse un else tous seul, c'est normale ^^

Code:

---

t^.num_ccp=cle then

---

l'^ c'est une coquille ou pas?

Bonjour
C'est normal vu que tu as 2 instructions apres ton then

Code:

---

1 2 3 4 5

if t[i]^.num_ccp=cle then pos:=i; p:=nil else

---

Il faudrait plutot mettre un BEGIN END comme cela

Code:

---

1 2 3 4 5 6 7

if t[i]^.num_ccp=cle then begin pos:=i; p:=nil end else

---

Cordialement