Однонаправленный линейный список, Нужно выбросить из файла F1 слова, входящие в файл F2 |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Однонаправленный линейный список, Нужно выбросить из файла F1 слова, входящие в файл F2 |
Тёмный Эльф |
Сообщение
#1
|
Влюблённый псих Группа: Пользователи Сообщений: 185 Пол: Женский Реальное имя: Лейла Репутация: 1 |
А можно ли составить два спика в одной программе? Один список будет составляться по данным файла F1, а другой - файла F2? Нужно ли для этого отдельно описать второй список в TYPE?
Или, если так нельзя, то как можно прочитать файл F2, если известно заранее, что он состит из строк, но неизвестно их количество? Нужно ли делать это через запись или есть другие способы? Сообщение отредактировано: Тёмный Эльф - |
Bokul |
Сообщение
#2
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Цитата А можно ли составить два спика в одной программе? Да хоть 16 тысяч.. Цитата Нужно ли для этого отдельно описать второй список в TYPE? Нет. Просто делаешь две переменные типа твоего списка и работаешь с ними по отдельности Цитата Или, если так нельзя, то как можно прочитать файл F2 Тебе вообще не обязательно перекачивать твой файл в память, можно обойтись только одной переменной типа string. Все зависит от того, что ты хочешь делать с этой информацией. -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
Тёмный Эльф |
Сообщение
#3
|
Влюблённый псих Группа: Пользователи Сообщений: 185 Пол: Женский Реальное имя: Лейла Репутация: 1 |
Объясните, пожалуйста. Немного не догоняю. Вот я составляю список по данным файла «DAN.inp». Но мне нужно проверить, а если ли в этом файле такие же слова, как и в файле «Dan1.inp», например. Нужно ли мне нижеприведенную процедуру сделать аналогично для второго файла? Или это делается другим способом?
Код uses crt; Type next=^elem; Elem=RECORD EL:string; Sled:next; END; VAR Uk1:next; Procedure p1(var p:next); var m:next; F1:text; BEGIN Assign(F1,'DAN.inp'); Reset(f1); Assign(output,'res.out'); rewrite(output); New(m); New(m^.sled); p:=m; Readln(f1, m^.el); m^.sled:=nil; while not EOF(f1) do begin New(m^.sled); m:=m^.sled; Readln(f1, m^.el); m^.sled:=nil; End; Close(f1); m:=p; While m<>NIL do Begin Writeln(m^.el); m:=m^.sled; End; end; Сообщение отредактировано: Тёмный Эльф - |
Текстовая версия | 25.04.2024 3:03 |