|
|
|
Списки на паскале
|
|||
|---|---|---|---|
|
#18+
Всем привет! Есть список, определенный следующей структурой type tData = integer; pNode = ^tNode; tNode = record Data : tData; Next : pNode; end; Пусть указатель p показывает на некий элемент списка Нужно написать процедуру удаления элемента предыдущего p. Как это сделать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.05.2007, 20:36 |
|
||
|
Списки на паскале
|
|||
|---|---|---|---|
|
#18+
Romka_84 wrote: > Пусть указатель p показывает на некий элемент списка<BR>Нужно > написать процедуру удаления элемента предыдущего p. Как это > сделать? 1) Перебрать весь список с начала до элемена, у которого Next равен p. 2) Использовать "двусторонний" список - т.е. кроме "Next" должно быть поле "Prev", указывающее на предыдущий элемент. Posted via ActualForum NNTP Server 1.4 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.05.2007, 21:29 |
|
||
|
Списки на паскале
|
|||
|---|---|---|---|
|
#18+
Romka_84Всем привет! Есть список, определенный следующей структурой type tData = integer; pNode = ^tNode; tNode = record Data : tData; Next : pNode; end; Пусть указатель p показывает на некий элемент списка Нужно написать процедуру удаления элемента предыдущего p. Как это сделать? "Помним" 2 переменных "предыдущую" и "текущую". Крутим цикл, пока у "текущего" ссылка на следующий не равна p. Как только равна, "предыдущему" ссылку на следующий :=p и освобождаем память от "текущего". Ы? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.05.2007, 13:03 |
|
||
|
|
start [/forum/topic.php?fid=16&gotonew=1&tid=1346039]: |
0ms |
get settings: |
9ms |
get forum list: |
20ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
188ms |
get topic data: |
12ms |
get first new msg: |
7ms |
get forum data: |
3ms |
get page messages: |
58ms |
get tp. blocked users: |
2ms |
| others: | 253ms |
| total: | 560ms |
| 0 / 0 |
