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