DEFA (SET)      // алгоритм 38
{               // центральный символ или, если его нет: ?
  ALGORITHM
  DEF A
  {
     S1     -> S1
     S1S2   -> ?
     S1E1S2 -> A(E1)
     E1     -> ?
  }
  EXAMPLES
  а; ага; балка; шило;
  TESTS
  африканец; атташе; аэродром; бабочка; базар; башня;
  батарея; вешалка; взрыв; винегрет; вождь; возмущение;
  газон; гармонь; гардероб; глина; глобус; гравий; горло;
  дворец; дверь; дельфин; диван; душа; дуэт; дыня;
  евангелие; еда; единица; ель; если; атом; атмосфера;
  11111; 11122; 8934; 17; 1345; 34255; 56899; 21112; 1199;
  9999991111; 1111199999; 12546452579; 124; 23523; 6758563;
  rnd(100, 100000);
}

