Pascal

un problème de prog sous pascal...
je crée un tableau dynamique à une dimension, et j'y mets un enregistrement à l'interieur. voici mon code :

program tab;

type
Tcarte= (lion, hippo, gazelle);

carte= record
dessin: Tcarte;
num: Integer;
end;

tabcarte= array of carte;

var
t : tabcarte ;
i: integer;
c : carte ;

begin
setlength(t, 27);
for i:= 1 to 9 do
begin
c.dessin:= lion;
c.num:=4;
t[i]:= c;
end;
write(t[i]);

readln;
end.

et voici l'erreur :
[Erreur] tab.pas(26): Type illégal dans instruction Write/Writeln

Qui peut m'aider ??