Типизированые файлы, особенности записи Опции

[Alex7]

Дело вот вобщем в чем- написал програму, которая в конечном итоге должна записать "записи" в типизированый файл при том соблюдая внешнее оформление текста(табуляцию-типо под таблицу).
Возникла следующая проблема: после записи в файл и при дальнейшем его просмотре(что сказано в условии задачи) появляются лишние знаки табуляции(#9) а цифры не отображаются, такое ошюшение, что записаны в другой кодировке.
Вобщем прикрепляю прогу и побочный файл(для чтения).
Хелп!

[Alex7]

Большое кстати, забыл прочитать одно условие задачи, и сразу же запутался, вставляя это в задачу.
Мне нужно там вычеслить общее кол-во путевок, которые получила каждая школа. Вывести это все дело на экран.
Т.е. я понимаю что нужно сравнить tabl[i].nomer со всеми tabl[i].nomer, выводив на экран только разные №-ра а потом tabl[i].kst_p с теми же i просумировать и вывести?
Я пробовал начать это так:

...
tabl[i].vidp:= Copy(rad,1,length(rad));
delete(rad,1,length(rad));
Write(f2,tabl[i]);

for k:=0
  {
    а вот что будет стоять на месте этого элемента,
    если он не существует? "мусор"?
  } to j-1 do
    if tabl[k].nomer <> tabl[i].nomer then write('№',i);
    {
      далее не придумал, т.к. даже не знаю
      правильный ли у меня ход мыслей)
    }
 
Inc(i);
Until seekeof(f1);
...