long Daten[Max+1];

long Binaeres_Suchen(long element)
{
  long links=1, rechts=Max, suchen;

  while( rechts >= links ) {
    suchen= (links + rechts) / 2;
    if( element < Daten[suchen] )
      rechts=suchen-1;
    else
      links=suchen+1;
    if( element == Daten[suchen] )
      return suchen;
  }
  return -1;
}