Строки в паскале

[Fanyuus]

Такой вопрос:

мне нужно чтобы в цикле for было число кол-ва строк, точно, потому что кол-во всегда будет меняться, как и данные, и подсчитывать их не всегда получиться.

пример:

у меня есть текстовый док-т, в котором (допусти) 11 строк.
как мне подсчитать кол-во строк в документе и (переменной для фора) n присвоить 11?

[whatever]

По подсчету строк в текстовике:

n:=0;
reset(T);
while not EOF(T) do
  begin
    readln(T);
    inc(n);
  end;

Сообщение от Fanyuus

как мне подсчитать кол-во строк в документе и (переменной для фора) n присвоить 11?

Что к чему присвоить?
Update: А, понял. Ничего n присваивать не надо, сразу в нее и считай, как я выше написал.

[Fanyuus]

whatever, ага, код сейчас проверю,
но всё равно, большое спасибо за помощь!