Как освободить память?

#include "stdafx.h"
#include <stdio.h>
#include <string.h>
#include <conio.h> 
#include <stdlib.h>
 
struct zap //объявление структуры
{
    char fam[33]; 
    char nazv[30]; 
    char rez;    
    char mesto;  
    zap *ptr;
};
 
int k,n,f,ud; //k - количество,n - счетчик ,f - для rez, ud - удалене.
char udal[22]; //строка для поиска фамилии которую нужно удалить  
char sfam[33],snazv[30]; //sfam - для копирования фамилии, snazv- для копирования названия соревнований
 
zap *first,*s,*p,*q; //первый список
zap *first1,*s1,*ps1,*p1,*q1; // второй список
 
int _tmain(int argc, _TCHAR* argv[])
{
    printf("vvedite koli4estvo u4astnikov \n"); //ввод количества участников;
    scanf("%d",&k); //считывание количества участников
 
 
    s=new zap; // new(r); выделение памяти для элемента.    
    first=s; //запоминание адреса начала списка
    s->ptr=NULL; //|r^.p:=nil; указатель первого элемента на следующий нулл.
    puts("vvedite familii u4astnikov i nazvanija sorevnovanii"); //|ввод фамилий и соревнований;
    scanf("%s",s->fam); 
    scanf("%s",s->nazv); //|r^.fam:=;r^.nazv:=;
    n=1;  
    while (n<k)//счетчик
    {
        p=new zap;  // new(q); выделение памяти для элемента.    
        p->ptr=NULL;    //|q^.p:=nil; указатель первого элемента на следующий нулл.
        scanf("%s",p->fam);
        scanf("%s",p->nazv); 
 
        s=first;
        //начало сортировки по алфавиту паралелльно вводу 
        while ( s!= NULL )
        {   
            // вставка в начало
            if (strcmp(p->fam,s->fam)<=0 && s==first) //если введеный элемент меньше текущего и текущий первый то
            {
                p->ptr=s; //указатель нового на текущий
                s=p; //текущий элемент указыает тудаже куда и первый
                first=s; //в запоминающий элемент записывается P!!!!
                s=NULL; //и указание текущего элемента на P исчезает
                // вставка в конец
            } else if (strcmp(p->fam,s->fam)>=0 && s->ptr==NULL) // если новый элемент больше текущего и текущий последний то 
            {
                s->ptr=p; // текущий указывает на новый 
                s=NULL; //адрес текущей ячейки не указывает никуда
                //вставка в середину
            } else  if (strcmp(p->fam,s->fam)>=0 && strcmp(p->fam,s->ptr->fam)<=0 ) //если введеный элемент больше текущего и меньше следуйщего то
            {
                p->ptr=s->ptr; //указатель нового указывает на место куда указывал старый
                s->ptr=p; //указатель текущего указывает на новый адрес элемента
                s=NULL;  // адрес текущей ячейки нулл
 
            } else
                s=s->ptr;   //переход к следуйщему элементу
 
            n++;  //счетчик
 
        }
 
    }
    puts("----------------------------------------------------");
    //вывод участников
    s=first;
    while (s!=NULL)
    {
        printf("%s ",s->fam);
        printf("%s \n",s->nazv);
        s=s->ptr;
    }
    puts("----------------------------------------------------");
    //добавление результаты
    s=first;
    while (s!=NULL)
    {
        printf("vvedite resultat u4astnika: %s v sorevnovanii %s=",s->fam,s->nazv);
        scanf("%d",&f);
        s->rez = (char)f;
        s=s->ptr;
    }
    //печать скорректированного списка
    s=first;
    while (s!=NULL)
    {
        printf("%s ",s->fam);
        printf("%s =",s->nazv);
        printf("%d \n",s->rez);
 
        s=s->ptr;
    }
 
    //создание нового списка и сортировка по результату
    s1=new zap; // new(s1); выделение памяти для первого элемента.    
    first1=s1; //запоминание адреса начала списка
    s=first; // возврат на начало первого списка
    s1->ptr=NULL; //|s^.p:=nil; указатель первого элемента на следующий нулл.
    strcpy(sfam, s->fam); //копирование 
    strcpy(s1->fam, sfam);   //копирование фамилии
 
    strcpy(snazv,s->nazv); // копирование
    strcpy(s1->nazv,snazv); // копирование названмя соревнований
    s1->rez=s->rez; // копирование результата в новый список
 
    n=1; //счетчик
    while (n<k) 
    {
        s=s->ptr;
        p1=new zap;  // new(q); выделение памяти для элемента.    
        p1->ptr=NULL;   //|q^.p:=nil; указатель первого элемента на следующий нулл.
        strcpy(sfam, s->fam);
        strcpy(p1->fam,sfam);
 
        strcpy(snazv, s->nazv);
        strcpy(p1->nazv, snazv);
        p1->rez=s->rez;
 
        s1=first1;
        //начало сортировки по результату
        while ( s1!= NULL )
        {
            if (p1->rez<=s1->rez && s1==first1)
            {
                p1->ptr=s1;
                s1=p1;
                first1=s1;
                s1=NULL;
            } else if (p1->rez>=s1->rez && s1->ptr==NULL)
            {
                s1->ptr=p1;
                s1=NULL;
            } else  if (p1->rez>=s1->rez && p1->rez<=s1->ptr->rez)
            {
                p1->ptr=s1->ptr;
                s1->ptr=p1;
                s1=NULL;
 
            } else
 
                s1=s1->ptr;
 
            n++;
 
        }
 
    }
 
 
    //печать скорректированного нового списка
    puts("----------------------------------------------------");
    s1=first1;
    while (s1!=NULL)
    {
        printf("%s ",s1->fam);
        printf("%s =",s1->nazv);
        printf("%d \n",s1->rez);
 
        s1=s1->ptr;
    }
 
 
    //добавление места
    s1=first1;
    while (s1!=NULL)
    {
        printf("vvedite mesto u4astnika:%s v sorevnovanii %s=",s1->fam,s1->nazv);
        scanf("%d",&f);
        s1->mesto = (char)f;
        s1=s1->ptr;
    }
 
    //печать скорректированного нового списка
    puts("----------------------------------------------------");
    s1=first1;
    while (s1!=NULL)
    {
        printf("%s ",s1->fam);
        printf("%s rez=",s1->nazv);
        printf("%d mesto=",s1->rez);
        printf("%d \n",s1->mesto);
 
        s1=s1->ptr;
    }
 
    // удаление одного из участников по фамилии
    puts("udalit 1 u4astnikov vvedite - 1");
    scanf("%d",&ud);
    if (ud==1)
    {
        scanf("%s",&udal);
        puts("----------------------------------------------------");
 
        printf("vi xotite udalit u4astnika s familiej: %s",udal);
        s1=first1;
        while (s1!=NULL && strcmp(udal,s1->fam)!=0)
        {
            ps1=s1;
            s1=s1->ptr;
        }
 
        if (ps1!=NULL && s1!=NULL)
        {
            ps1->ptr=s1->ptr;
            delete s1;
        }
        else 
            puts("familii nety");
 
 
 
    }
    getch();
 
    //печать скорректированного нового списка
    puts("\n----------------------------------------------------");
    s1=first1;
    while (s1!=NULL)
    {
        printf("%s ",s1->fam);
        printf("%s rez=",s1->nazv);
        printf("%d mesto=",s1->rez);
        printf("%d \n",s1->mesto);
 
        s1=s1->ptr;
    }
 
    //освобождение памяти
    s1=first1;
    while (s1!=NULL)
    {
        delete s1;
        s1=s1->ptr;
    }
 
    s=first;
    while (s!=NULL)
    {
        delete s;
        s=s->ptr;
    }
 
    getch();
 
 
    return 0;
}

delete имя_пер;

zap s;//уже достаточно, что бы память была выделена статически для одного элемента типа структуры
//-----------------------------------------------------------------------------------------------
 
zap s[5];//статически выделили память для массива структур под 5 структур
//-----------------------------------------------------------------------------------------------
 
int i = 5;
zap *s;
s = new zap[i];//динамически выделили память для массива структур под 5 структур
....
delete[] s;//динамически освободили память