чтение текстового файла Опции

[Lapp]

Дык я не обращал внимание на это, ведь о строке думал :yes:
Согласен, там будет пробел, верно?

var a:string[15]; b: integer; c: char; k: byte;
// ...
  read(f, a, b, c, с);

А ты попробуй

[sheka]

Уже не могу)
если смотреть на структуру

фамилию год пол

, то должно работать. Разве что на Реадлн заменить.

[Lapp]

перечитай пост №7

[Lapp]

sheka, извини, очередное ВПР, временное помутнение рассудка ((.
Все верно. При условии, что "фамилию" занимает ровно 15 байт.
Но чтение всей строки с последующим разбором все же предпочтительнее со многих точек зрения.

p.s.
рад случаю добавить тебе в репу +1 ))