Работа с двоичными файлами и массивами с++

#include <stdio.h>
#include <iostream.h>
#include <conio.h>
#include <fstream.h>

int main ()
{
    clrscr();
    FILE *f;
    ofstream F;
    int i,k,n,min,m,p;
    int a[100];
    f=fopen ("f:\\abs.dat","rb");
    F.open ("f:\\abs1.txt",ios::out);
    fread (&n, sizeof(int), 1, f);
    cout<<"Vvedite m: ";
    cin>>m;
    cout<<"\nn= "<<n<<"\n";
    fread (&a,sizeof(int),n,f);
    p=0;
    min=a[0];
    cout<<"Ishodnyi massiv:"<<"\n";
    for (i=0; i<n; i++)
      {
           cout<<a[i]<<"\t";
      }
    for (i=1;i<n;i++)
     {
      if (min>=a[i]) { min=a[i]; p=i+1; }
     }
        cout<<"\n";
        cout<<"modificirovannyi massiv: "<<"\n";
    for (i=0; i<p; i++)
     {
       if (a[i]%m==0)
        {
         cout<<a[i]<<"\t";
        }
       if (a[i]==min)
         {
           min=a[i];
          F<<a[i]<<" ";
           break;
         }
     }
    cout<<endl;
    cout<<"min= "<<min;
    fclose (f);
    F.close ();
    getch ();
    return 0;}