Как из тпизированного файла считать первый компонент?

[Екатерина Козлова]

Подскажите как можно читать по элементно из типизированного файла?У меня дан файл целых чисел.
read(f,a) присвоит переменной а все числа из файла.
а как переменной а присвоить только первое число из файла f ??????

[DoDge_VipeR]

read(f,a);

[Екатерина Козлова]

да...я уже исправила...описалась...

[Екатерина Козлова]

но она ,как я уже написала, считает все числа из файла!!!
а как только 1???

[Serge_Bliznykov]

read(f,a) присвоит переменной а все числа из файла.

Что за глупости?! Как в одну скалярную переменную может поместиться МНОГО чисел?!!

уберите цикл чтения (скорее всего у Вас while not eof(f) do begin.... ) и прочитается первая компонента файла...

  Assing(f,'имяФайла');
  Reset(f);
  Read(f,a);
  Close(f);
  WriteLn('первое число в файле :',a);