|
Вопрос # 2 295/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты!
помогите пожалуйста написато программу: Указания: Перед выполнением задания написать программу, создающую на диске файлы, содержащие исходные данные, соответствующие варианту задания. Программа должна обрабатывать файлы больших размеров, без хранения всего содержимого файла в оперативной памяти.
1. Даны два файла, компонентами которых являются целые числа. Создать новый файл, в котором объединить компоненты двух исходный файлов так, чтобы с начала шли четного числа из обоих файлов, а затем нечетные.
 |
Вопрос задал: joke (статус: Посетитель)
Вопрос отправлен: 11 января 2009, 14:40
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: Мережников Андрей
Здравствуйте, joke!
Примерный код в приложении.
Заполнение файлов исходными данными, думаю, проблем не составит.
Приложение: Переключить в обычный режим- var f1,f2,of1,of2:file of integer;
- x:integer;
- begin
-
-
-
-
- rewrite(of1);
- rewrite(of2);
- reset(f1);
- while not(eof(f1))
- do begin
- read(f1,x);
- if (x mod 2)=0
- then write(of1,x)
- else write(of2,x);
- end;
- closefile(f1);
- reset(f2);
- while not(eof(f2))
- do begin
- read(f2,x);
- if (x mod 2)=0
- then write(of1,x)
- else write(of2,x);
- end;
- closefile(f2);
- closefile(of2);
- reset(of2);
- while not(eof(of2))
- do begin
- read(of2,x);
- write(of1,x);
- end;
- closefile(of2);
- closefile(of1);
 |
Ответ отправил: Мережников Андрей (статус: Абитуриент)
Время отправки: 12 января 2009, 05:29
|
Мини-форум вопроса
Всего сообщений: 4; последнее сообщение — 11 января 2009, 20:54; участников в обсуждении: 2.
|
Мережников Андрей (статус: Абитуриент), 11 января 2009, 17:07 [#1]:
в каком порядке должны идти числа? Сначала четные из первого файла, затем четные из второго, нечетные из первого, нечетные из второго? Или не играет роли из какого исходного файла число?
|
|
joke (статус: Посетитель), 11 января 2009, 19:07 [#2]:
не играет роли
|
|
Мережников Андрей (статус: Абитуриент), 11 января 2009, 19:52 [#3]:
тогда можно поступить следующим образом:
1. создаем для записи два файла, один для четных, другой - для нечетных чисел
2. открываем для чтения исходный файл1
3. в цикле последовательно считываем числа из исходного файла1
4. если число четное, то пишем в файл для четных, если нечетное, то пишем в файл для нечетных
5. закрываем исходный файл1
повторяем пункты 2-5 для второго исходного файла
закрываем файл для нечетных чисел. затем открываем его для чтения читаем из него последовательно числа и добавлем в файл для четных.
закрываем оба файла. в файле для четных чисел будет искомый результат. если нужны подробности (код) то пишите
|
|
joke (статус: Посетитель), 11 января 2009, 20:54 [#4]:
напишите пожалуйста код
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|