Объединение двух текстовых файлов |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Объединение двух текстовых файлов |
NeOOffLinE |
Сообщение
#1
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Реальное имя: Артём Репутация: 0 |
помогите пожалуйста...
даны два текстовых файла с произвольным, количеством строк в каждом. Нужно: объединить их в один, причем, где первая строка - это первая строка 1-го файла, вторая - последняя строка 2-го и так дале (3 - 2 строка 1-го, 4 - предпоследняя 2-го).....я просто не представляю алгоритм для высчитывая строк, в текстовом файле..заранее спасибо за возможную помощь.. |
volvo |
Сообщение
#2
|
Гость |
Объяснить, как это работает, сможешь?
function get_s(var f: text): string; |
NeOOffLinE |
Сообщение
#3
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Реальное имя: Артём Репутация: 0 |
procedure sub; begin if not eof(f1) then begin writeln(get_s(f1)); end; if s2 <> #26 then writeln(s2); end; всё понятно кроме этого Добавлено через 18 мин. сделано было так но сказали без массива
|
Текстовая версия | 27.04.2024 7:53 |