Списки, Удаление элементов Опции

[DimaD]

Подскажите как можно удалить из списка элемент под определенным номером.

[DimaD]

Если следует удалить элемент на который указывается ссылка q, то следует в начале присвоить элементу q^ значение следующего за ним элемента, а затем этот элемент удалить.

{удаление элемента q^}
Procedure Delete(Var q: point);
Var r: point;
Begin
 r:=q^.next;
 q^:=r^;
 r^.Next:=nil; 
End;

Как задается q?