链表去重ptac语言

### PTAC语言中链表去重算法

在PTAC语言中实现链表去重功能涉及遍历整个链表，并检查每个节点的数据域是否有重复项。对于发现的任何重复数据，移除后续出现的冗余节点。

#### 定义链表结构
首先定义基本的链表节点结构以及初始化函数：

// 节点结构体定义
typedef struct Node {
    int data;
    struct Node* next;
} Node;

// 创建新节点辅助函数
Node* create_node(int value) {
    Node* newNode = (Node*)malloc(sizeof(Node));
    newNode->data = value;
    newNode->next = NULL;
    return newNode;
}

#### 链表去重方法
下面展示了一个用于去除链表内重复元素的方法，在此过程中保持首次遇到的唯一实例而不改变原有顺序[^3]。

void remove_duplicates(Node **head_ref) {
    if (*head_ref == NULL || (*head_ref)->next == NULL)
        return; // 如果列表为空或只有一个元素，则无需处理
    
    Node *current = *head_ref, *inner, *dup;
    
    while(current != NULL && current->next != NULL){
        inner = current;
        
        while(inner->next != NULL){
            if(current->data == inner->next->data){
                dup = inner->next;
                inner->next = inner->next->next;
                free(dup);
            }else{
                inner = inner->next;
            }
        }

        current = current->next;
    }
}

上述代码片段实现了对单向链表执行去重操作的功能。通过双重迭代的方式确保每一个节点与其后的所有节点比较，一旦找到相同值即刻删除后者并调整指针连接关系以维持链表连续性。