请帮我编这个程序吧，要求是删除线性表中的重复结点。例如：原来的为：9，2，5，3，5，2，6，8，9最后应该为9，2，5，3，6，8
请分别用顺序表和链表实现  ！！

顺序表:算法
for（i=0,i<9;i++）
   for(j=i;j<9;j++)
      if(a[i]==a[j])
         for(n=j-1;n<9;n++)
             a[n]=a[n+1];

链表：算法
设链表link 头指针为head
elem *p,*r,*q;
p=head;
q=p->next;
while(p)
{r=p;
  while(q)
   {
     if(p->data==q->data)
         {r->next=q->next;free(q);}
     q=q->next;
     r=r->next;
    }
}
 不知道对不对 你看看吧 ！！！