Pascal: Programme simple résultat anarchique

Bonjour,
Voici mon code (plutôt simpliste)

   f	    : file of integer;
   n	    : integer;
begin
   assign(f,'fichier.txt');
   reset(f);
   while not eof(f) do
   begin
      read(f,n);
      writeln(n);
   end;
   writeln('end');
   close(f);
end.

Voici le contenu du fameux fichier.txt

0 1 2 3 4 5 6 7 8 9 10
10 9 8 7 6 5 4 3 2 1 0

Et voici le résultat obtenu lors de l'exécution:

8240
8241
8242
8243
8244
8245
8246
8247
8248
8249
12337
12554
8240
8249
8248
8247
8246
8245
8244
8243
8242
8241
2608
end

J'ai beau chercher je ne trouve pas l'erreur s'il y en a une...
Merci d'avance