Задача на работу, с текстовыми фаилами Опции

[szuser]

Помогите, надо срочно решить

Составить программу, реализующую конкретную схему действий.
В содержимое программы должна входить продцедура формирования исходного фаила нужного числа, вывод на экран элементов фаилов F1 и F2.
Дан фаил целых чисел F1. Получить фаил F2. Найти среднее арифметическое компонентов фаила F1.
В фаил F2 поместить все компоненты большие среднего арифметического.

[volvo]

szuser, ну, открой F1, создай F2 и закрой оба...

Assign(f1, 'in.dat'); Reset(f1);
Assign(f2, 'out.dat'); Rewrite(f2);
...
Close(f1); Close(f2);

а в следуюший раз, если у тебя проблема именно с файлами, то не переписывай полностью задание, а спроси, как открыть/закрыть файл. Ты написал задание, тебе дали АЛГОРИТМ его решения. Задач "под ключ" здесь не решают...