Помогите, не знаю в чем трабла, но не могу написать прогу-все время в файлах вместо цифр иероглифы получаются

собственно задача: PASCAL
Дан текстовой файл с числами, нужно рассортировать элементы в 2 файла: в первом положительные элементы, во втором отрицательные