Удаление элемента списка и всего списка

#include <cstdlib>
#include <iostream>
#include <cstring>
#define M 5
using namespace std;
struct A
{
       char key [25];
       
};
 
struct List
{
       A a;
       List *next;
};
 
void Init (List **begin) //функция инициализации списка
{
   *begin = new List;
   A a[M];
   cout << "Введите слова: ";
   for (int i=0; i<M; i++)
     {
   
            cin >> a[i].key;
     }
   
   (*begin)->next = NULL;
   (*begin)->a=a[0]; // добавляем 1 слово
   List *end = *begin;
   for (int i=1; i<M; i++) // цикл со 2-го
   {
      end->next = new List;
      end = end->next;
      end->a = a[i];
      end->next = NULL;    
   }   
   
}
 
void Print (List*b) //функция вывода списка на экран
{
  List *print = b;
  while (print)
  {
     cout << print->a.key << " -> ";
     print = print->next;      
  }    
  cout << "NULL\n";
}
 
void AddBegin (List **begin, A&a) //добавление элемента в начало списка
{
   List *t = new List;
   t->a = a;
   t->next = *begin;
   *begin = t;      
}
 
void AddEnd (List**b, const A&a) //добавление элемента в конец списка
{
    List *p = *b;
    List *t = new List;
    t->a = a;
    t->next = NULL;
    while (1)
    {
       if (!p->next)
       {
          p->next = t;
          break;             
       }  
       p = p->next;    
    }    
}
 
 
int compare(const A &a, const A &b)
{
    return strcmp(a.key, b.key);
}
void Delete(List **begin, const A &a)
{
    List *l, *t;
    l = *begin;
    if (l = NULL)
        return;
    
    if (compare(l->a, a) == 0) {
        *begin = l->next;
        delete l;
        return;
    }
    for (; l->next; l = l->next)
        if (compare(l->next->a, a) == 0) {
            t = l->next->next;
            delete l->next;
            l->next = t;
            return;
        }
}
 
 
void Free (List **begin)
{
   if (*begin ==0) return;
   List *p = *begin;
   List *t;
   while (p)
   {
         t = p;
         p = p->next;
         delete t;
         
   }    
   *begin = NULL; 
}
int main(int argc, char *argv[])
{
    setlocale (LC_ALL, "Russian");
    A add_word, add_end, add_ins, del;
    List *begin = NULL;
    Init (&begin);
    Print (begin);
    cout << "Введите слово, которое хотите добавить в начало списка: ";
    cin >> add_word.key;
    AddBegin (&begin, add_word);
    Print (begin);
    cout << "Введите слово, которое хотите удалить: ";
    cin >> del.key;
    Delete (&begin, del);
    Print (begin);
    cout << "ведите слово, которое хотите вставить в конец списка: ";
    cin >> add_end.key;
    AddEnd (&begin, add_end);
    Print (begin);
    Free (&begin);
    Print (begin);
    system("PAUSE");
    return EXIT_SUCCESS;
}