Не работает функция бинарного поиска

#include <stdio.h>
#include <time.h>
#include <stdlib.h>
#include<conio.h>
 
void BSort (int* A,int N)
{//Puzirkovii metod
int temp;
 for(int i=0; i<N-1; i++)
 for(int j=0; j<N-1-i; j++)
  if(A[j]>A[j+1])
   {
     temp=A[j];
     A[j]=A[j+1];
     A[j+1]=temp;
    }
}
 
void PrArr (int* A,int N)
{//Vivod elementov massiva
for(int i = 0; i < N; i++)
 printf("%d ", A[i]);
 printf("\n");
};
 
int BinSearch(int* A, int N, int a)
 {
  int x, l, p, centr;
  //Binarnii poisk
 
  l=0;
  p=N;
  do {
      centr=(l+p)/2;
      if (a<=A[centr]) p=centr;
      if (a>A[centr]) l=centr+1;
     }
  while (l!=p);
  if (A[p]==a) return p;
    else return -1;
 };
 
int main(void)
{
int N,A[100],i,a;
printf("Input size of array: \nn = ");
scanf("%d", &N);
srand((unsigned)time(NULL));
for(i = 0; i < N; i++)
A[i] = (int)(rand() % (N+1));
printf("Vvedennii massiv: \n");
PrArr(A, N);
BSort(A,N);
PrArr (A,N);
printf("\nVvedite chislo dlya poiska: \nN = ");
scanf("%d");
int ix = BinSearch(A,N,a);
 if (ix==-1) printf("\nElement ne naiden\n ");
 else printf("\nIndex elementa\n",ix);
delete [] A;
system ("pause");
getch();
return 0;
}