DEFA (WORD)     // алгоритм 44
{               // упорядочивание символов по убыванию
  ALGORITHM     //
  DEF d
  {
     S1      ->
     S1S1E1  -> E1
     S1S2E1  -> S2d(S1E1)
  }
  DEF A
  {
     S1E1  -> min(S1E1) A(d(min(S1E1)S1E1))
       E1  ->
  }
  TESTS
  а; ба; еда; гад; ага; баба; вава; гага; ад; да; в; абба;
  дева; ева; гав; вега; авв; гавгав; беда; бега; лук;
  щи; эхо; мяч; ухо; уха; рыло; юла; душа; киса; ручей;
  коля; юрта; юность; паж; пух; лик; кот; там; шах;
}
