подскажите, компанента. абц паскаль

Добрый вечер подскажите нубу.
Имеется фрагмент программы:

Type
TKadr =Record
Fio : String[30];
Kd : Integer;
Sal : Integer;
End;
Var f : File of Kadr; Kadr : Tkadr;
Begin
Assing(f, ‘Dat.dat’); Rewrite(f);
Seek (f, 5); Read (f, Kadr);
. .

Какая по счету компонента файла будет считана с диска?