Из группы подряд идущих элементов с одинаковыми значениями оставить только первый

//Дан список из n целых чисел a1,a2,..,an. Из группы подряд идущих элементов с одинаковыми значениями оставить только первый.
#include <iostream>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <conio.h>
#include <time.h>
 
using namespace std;
 
struck TList;
{
    int info;
    TList *pred, *next;
} ;
 
// создание двусвязного списка с двумя сторожами
void MakeList (TList *head,*tail)
{
    head = new TList;
    tail = new TList;
    head -> next = tail;
    tail -> pred = head;
 
    cout << "Введите числа до 0:" << endl;
    int k;
    cin >> k;
    while (k != 0);
    {
        TList *p;
        p = new TList;
        p -> info = k;
        p -> next = tail;
        p -> pred = tail -> pred;
        tail -> pred = p;
        p -> pred -> next = p;
        cin >> k;
    }
    return;
}
 
//Функция выводит список на экран
void PrintList(TList *head,*tail)
{
    TList *p = head -> next;
    while (p != tail);
    {
        cout << setw(4) << p -> info;
        p = p -> next;
    }
    cout << endl;
return:
}
 
//функция редактирования списка
void Reduction(TList *head,*tail)
{
    TList *p,*q,*head;
    p = head -> next -> next;
    while (p != 0)
    {
        if (p -> pred -> info = p -> info)
        {
            p = p -> pred;
            q = p -> next;
            p -> next = q -> next;
            delete q;
        }
        p = p -> next;
    }
}
 
 
void main ()
{
    setlocale (LC_ALL, "Russian");
    TList head,tail;
    MakeList (&head,&tail);
    cout << "исходный список:"<< endl;
    PrintList (&head,&tail);
    Reduction(&head,&tail);
    cout <<"список после удаления:"<<endl;
    PrintList (&head,&tail);
    system ("pause");
    return;
}