Очистка памяти

 #include<iostream.h>
 #include<conio.h>
 #include<stdlib.h>
 #include<string.h>
 #include<stdio.h>
 int l;
 FILE *f1;
 FILE *f2;
 void menu();
 void open();
 void write();
 void read();
 void main()
    {
       menu();
    }
//-----------------------------------------------
 void menu()    //Объявление меню
    {
       int c;
       clrscr();
       cout<<"==================="<<endl;
       cout<<"       Menu        "<<endl;
       cout<<"==================="<<endl;
       cout<<" 1. Sozdat' file   "<<endl;
       cout<<" 2. Obrabotka fila "<<endl;
       cout<<" 3. Prosmotr fila  "<<endl;
       cout<<" 4. Exit.          "<<endl;
       cout<<"==================="<<endl;
       cout<<"Viberite deistvie: ";
       do
     {
        c=getch();
        switch(c)
          {
         case 49: write();
         case 50: read();
         case 51: open();
         case 52: exit(0);
          }
     }
       while((c<49)||(c>52));
    }
//----------------------------------------------
 void open()    //Функция вывода содержимого файла на экран
 {
 int i;
 char name[100],txt[100];
 clrscr();
 cout<<"\nEnter name of file for opening:\n";
 gets(name);
 cout<<"\nSoderjimoe fila:\n";
 i=-1;
 f1=fopen(name,"r");
   do
    {
      i++;
      fscanf(f1,"%c", &txt[i]);
      if(txt[i]==EOF)  break;
      if(txt[i]=='.') break;
      printf("%c",txt[i]);
 
     }
 while(feof(f1)==0);
 l=i+1;
 printf("%c",'.');
 fclose(f1);
 getch();
 menu();
 }
//----------------------------------------------
void read()      //Функция обработки файла (проблема скорее всего в ней)
{
         int k,n,z,y,p,g,u,h,x,q,s,d,f,o,i,j;
         char name1[100],name2[100],bykva[100],txt[200],a[100][100],m[100][100],r[100][100];
         clrscr();
         cout<<"\nEnter name of file for reading:\n";
         gets(name1);
         i=-1;
         f1=fopen(name1,"r");
          do
            {
            i++;
            fscanf(f1,"%c", &txt[i]);
            if(txt[i]==EOF)  break;
            if(txt[i]=='.') break;
            }
         while(feof(f1)==0);
         cout<<"Enter name of file 2 for writing: ";
         gets(name2);
         f2=fopen(name2,"w");
         cout<<"\nVvedite bykvi dlya poiska (bez probelov):\n";
         gets(bykva);
         y=strlen(bykva);
         i=0;
         n=0;
         z=0;
         strcpy(a[n],"");
         while(txt[i]!='.')
         {
             if(txt[i]!=' ')
                {
                    a[n][z]=txt[i];
                    z++;
                }
             else
                {
                    a[n][z]='\0';
                    z=0;
                    n++;
                    strcpy(a[n],"");
                }
             i++;
         }
         a[n][z]='\0';
         a[n+1][z]='\0';
         n++;
         for(i=0;i<n;i++)
            cout<<a[i]<<"\n";
         g=-1;
         for(i=0;i<n;i++)
         {
              h=strlen(a[i]);
              for(j=0;j<h;j++)
             for(p=0;p<y;p++)
                 if(bykva[p]==a[i][j])
                    {
                        g++;
                        strcpy(m[g],"");
                        strcpy(m[g],a[i]);
                        j=h;
                        p=y;
                    }
         }
         f=1;
         while(f==1)
             {
             f=0;
             for(i=0;i<g;i++)
                {
                    s=strlen(m[i]);
                    d=strlen(m[i+1]);
                    if(s>d)
                        {
                            f=1;
                            strcpy(r[i],"");
                            strcpy(r[i],m[i]);
                            strcpy(m[i],"");
                            strcpy(m[i],m[i+1]);
                            strcpy(m[i+1],"");
                            strcpy(m[i+1],r[i]);
                        }
                }
             }
         o=0;
         p=1;
         r[o][o]=' ';
         r[p][p]='.';
         for(i=0;i<g+1;i++)
         {
             d=strlen(m[i]);
             for(j=0;j<d;j++)
                fprintf(f2,"%c",m[i][j]);
             if(i!=g) fprintf(f2,"%c",r[o][o]);
         }
         fprintf(f2,"%c",r[p][p]);
         fclose(f1);
         fclose(f2);
         cout<<"\nFinished!";
         getch();
         menu();
}
//---------------------------------------------------
void write()     //Функция создания нового файла
{
    int i,j;
    char name1[100],txt[100];
    clrscr();
    cout<<"Enter name of file: ";
    gets(name1);
    f1=fopen(name1,"w");
    cout<<"\nVvedite text s tochkoi:\n";
    gets(txt);
    l=strlen(txt);
    for(i=0;i<l;i++)
       fprintf(f1,"%c",txt[i]);
    cout<<"\nZapisano v file!";
    fclose(f1);
    getch();
    menu();
}
//---------------------------------------------------

void main()

int main()

f1=fopen(name1,"r");
          do
            {
            i++;
            fscanf(f1,"%c", &txt[i]);
            if(txt[i]==EOF)  break;
            if(txt[i]=='.') break;
            }
         while(feof(f1)==0);