Типизированный файл. Paskal

[BSS]

Помогите плз решить:
В файле целых чисел, если перед положительным числом стоит отрицательное, то удалить это отрицательное число

[Chudo4258]

{ убираем последний элемент файла }
seek(f, filesize(f) - 1);
truncate(f);

тебе нужно пройти по всему файлу и смотреть два рядом стоящих элемента.

[Grag]

А я бы загнал содержимое файла в линейный список, потом выкосил, то что нужно, и слил этот список в файл, просто перезаписав его...