Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
1 / 1 / 0
Регистрация: 21.01.2014
Сообщений: 30
1

Добавление содержимого нескольких нетипизированных файлов к первоначально пустому файлу

28.01.2014, 17:17. Показов 1214. Ответов 3
Метки нет (Все метки)

Реализуйте последовательное добавление содержимого нескольких нетипизированных файлов к первоначально пустому файлу с заданным именем.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.01.2014, 17:17
Ответы с готовыми решениями:

Копирование нетипизированных файлов
Помогите найти ошибку в программе. program FileCopy; const recsize=512;{размер буфера обмена}...

Обработка нетипизированных двоичных файлов
Даны два файла произвольного типа. Поменять местами их содержимое. ------------- Как формировать...

Считывание содержимого из нескольких файлов
Доброго времени суток. Поискала в более ранних темах - не нашла. Суть проблемы вот в чем: у меня...

Инвертирование содержимого файлов из нескольких подкаталогов
Как можно сделать инвертирование содержимого файлов из нескольких подкаталогов? Это первая часть,...

__________________
3
Фрилансер
3411 / 2808 / 3000
Регистрация: 08.02.2012
Сообщений: 8,021
Записей в блоге: 1
28.01.2014, 18:34 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Var f,g:text;
    s,name,st:string;
    i,n:integer;
Begin
    write('Имя файла: ');readln(name);
    Assign(f,name);Rewrite(f);
    n:=2;
    For i:=1 to n do
    Begin
      s:='in.txt';
      Str(i,st);
      Insert(st,s,3);
      Assign(g,s);Reset(g);
      While not Eof(g) do
      Begin
        readln(g,s);
        writeln(f,s);
      End;
      Close(g);
    End;
    Close(f);
    writeln('Результат в файле ',name);
    readln;
End.
Последовательное соединение файлов с именами
in1.txt
in2.txt
....
inN.txt

Добавлено через 49 секунд
Надо чтобы файлы были созданы и заполнены рядом с программой.Чему = n,столько и файлов должно быть
1
Модератор
63335 / 47046 / 32428
Регистрация: 18.05.2008
Сообщений: 114,040
28.01.2014, 18:41 3
Цитата Сообщение от Влад789456 Посмотреть сообщение
Нетипизированные файлы
Это совсем не это
Pascal
1
Var f,g:text;
а такое
Pascal
1
var f,g:file;
1
Фрилансер
3411 / 2808 / 3000
Регистрация: 08.02.2012
Сообщений: 8,021
Записей в блоге: 1
28.01.2014, 19:47 4
Проглядел
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.01.2014, 19:47

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Копирование содержимого нескольких файлов в один
Интересную вещь заметил, не встречал вроде, но если уже опубликовано можно убрать. Например...

Вывод в консоли содержимого нескольких файлов
Имеется некий код программы, необходимо чтобы данные считывались все сразу, а не при нажатии Enter...

Сравнение нетипизированных файлов
Как сравнить на предмет идентичности два нетипизированных файла ?

Анализ нетипизированных файлов
Прошу помочь разобраться с разложением нетипизированных файлов (лог-файлов). Дано: лог-файлы...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.