Помогите написать программу на паскале абс "Файловый тип данных." Дан целочисленный файл А. Записать в файл В все положительные числа.
Решение в прикрепленном файле.