 Файлы удаление элементов, удаление повторяющихся элементов |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| mapblwka |
  10.05.2006 22:16
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 13 Пол: Женский Реальное имя: Марина Репутация:  0   |
Уже не один день мучаю свой мозг..
 Ну не могу я предумать такую процедуру... Помогите, а?Дан файл f = file of integer. Удалить из файла все повторяющееся элементы, БЕЗ создания дополнительного файла, матриц и т.п.  Вот такая разминка для мозгов.Заранее огромное спасибо!  |
   |
 
|
  |
Ответов
| Бродяжник |
11.05.2006 11:46
Сообщение
#2
|
|
Бывалый Группа: Пользователи Сообщений: 206 Пол: Мужской Репутация: 3 |
mapbwlka
Нужно открыть файл для чтения/записи. Потом прочесть первое число и запомнить его. Потом надо читать все последующие и сравнивать их с первым. Пока они разные, все нормально. Как только мы наткнулись на совпадение, начинаем развлекаться. Запоминаем позицию совпавшего числа. Читаем следующее за ним. Если оно отличается, перезаписываем его в запомненную позицию. Начиная с этого момента, у нас возникает две позиции в файле - очередная позиция чтения и очередная позиция записи. По мере выявления совпадений эти две позиции будут все больше расходиться. Когда мы дочитаем до конца файла, нужно урезать длину файла с учетом найденных повторений. Теперь мы смещаемся ко второму числу, читаем его и повторяем ту же процедуру. И так до упора. Весело будет... |
|
|
|
Сообщений в этой теме
mapblwka Файлы удаление элементов 10.05.2006 22:16
volvo Уже не один день мучаю свой мозг.
Значит, должны б... 10.05.2006 22:29 mapblwka volvo, вся проблема в удаление элементов из файла,... 11.05.2006 6:17 Бродяжник Смущает вот что: ну хорошо, мы удалили повторяющие... 11.05.2006 10:24
Malice
Значит ли это, что длина файла должна была уменьш... 11.05.2006 10:47 volvo mapbwlka, появилась у меня одна интересная идея...... 11.05.2006 11:50 Malice
mapbwlka, появилась у меня одна интересная идея..... 11.05.2006 12:58 volvo Malice, я кому задал вопрос? Тебе? Будь добр НЕ от... 11.05.2006 13:16 hardcase А вариант с открытым хэшированием не пройдёт?
Мы п... 11.05.2006 19:00 volvo Вариант с рекурсией ОПЯТЬ не рассматривается? В ст... 11.05.2006 19:14 hardcase Рекурсия - хорошая идея. только долго всё это буде... 11.05.2006 19:26 volvo :) И это я пытался у автора выяснить :)
(критична ... 11.05.2006 19:33 mapblwka ой! ребята! Вы такие умные тут! Все на... 11.05.2006 19:40 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 24.06.2025 15:13 |