Вызвано исключение по адресу 0x6F32D4EC (ucrtbased.dll)

#include <iostream>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <string.h>
#include <locale.h>
 
typedef struct dictionary
{
    char key[50];
    int value;
    dictionary *next;
    dictionary *prev;
};
dictionary *Head = NULL;
dictionary *Tail = NULL;
dictionary *pd = NULL;
 
void Menu();
dictionary *AddDict(dictionary *p);
void PrintDict(dictionary *p);
void Delete(dictionary *p);
bool Search(dictionary *p);
void Clear(dictionary *p);
 
int main()
{
 
    setlocale(LC_ALL, "Rus");
    Menu();
}
 
 
dictionary *AddDict(dictionary *p)
{
    dictionary *new_p = new dictionary;
    printf("\nКлюч: ");
    scanf_s("%s", &new_p->key);
    printf("Значение: ");
    scanf_s("%d", &new_p->value);
    printf("Добавлено..");
    if (!Head)
    {
        new_p->next = NULL;
        new_p->prev = NULL;
        Head = new_p;
        Tail = new_p;
    }
    else
    {
        p = Tail;
        new_p->next = NULL;
        new_p->prev = p;
        p->next = new_p;
        Tail = new_p;
    }
    return new_p;
}
void PrintDict(dictionary *p)
{
    printf("\n");
    if (!Head)
    {
        printf("Словарь пуст...\n");
        return;
    }
    p = Head;
    while (p)
    {
        printf("key: %s\tvalue: %d\n", p->key, p->value);
        p = p->next;
    }
 
}
void Clear(dictionary *p)
{
    while (Head)
    {
        Head = p->next;
        delete p;
        p = Head;
    }
    printf("\nСловарь очищен...\n");
}
bool Search(dictionary *p)
{
    p = Head;
    char word[50];
    printf("Ключ для поиска: ");
    scanf_s("%s", word);
    while (p)
    {
        if (!strcmp(p->key, word))
        {
            printf("\n__Результат поиска__\n\nkey: %s\tvalue: %d\n", p->key, p->value);
            return true;
        }
        p = p->next;
    }
    return false;
}
void Delete(dictionary *p)
{
    p = Head;
    char word[50];
    printf("Ключ для удаления: ");
    scanf_s("%s", word);
    while (p)
    {
        if (!strcmp(p->key, word))
        {
            if (p == Head)
            {
                Head = p->next;
                Head->prev = NULL;
            }
            else if (p == Tail)
            {
                Tail = p->prev;
                Tail->next = NULL;
            }
            else
            {
                //if(p->prev)
                p->prev->next = p->next;
                //if(p->next)
                p->next->prev = p->prev;
 
            }
            delete p;
            printf("\nУдален элемент с ключом %s", word);
            return;
        }
        p = p->next;
    }
    printf("\nТакого ключа в словаре нет...");
}
void Menu()
{
    int choose;
    printf("Выбор действия: \n\n");
    printf("1. Вывод словаря\n2. Добавление в словарь\n3. Поиск по ключу\n4. Удалить по ключу\n5. Очистить словарь\n0. Выход\n\n");
    scanf_s("%d", &choose);
    switch (choose)
    {
    case 1:
        PrintDict(pd);
        break;
    case 2:
        pd = AddDict(pd);
        break;
    case 3:
        if (!Search(pd))
            printf("\nПоиск не дал результатов...");
        break;
    case 4:
        Delete(pd);
        break;
    case 5:
        Clear(pd);
        break;
    }
    _getch();
    if (choose != 0)
    {
        system("cls");
        Menu();
    }
}