DEFA (WORD)     // алгоритм 13
{               // замена всех букв на следующие по алфавиту
  ALGORITHM
  DEF A
  {
    S1E1 -> next(S1)A(E1)
    E1   ->
  }
  EXAMPLES
  а; б;
  TESTS
  бнкй; йпнс; южъй; йзмн; кдсн; рбдс; йнс; хбдс; втры;
  онкд; йтрс; йнрлнр; рзктьс; отсы; хдкы; мдан; кдчзи;
  шдмнй; шдкы; бдмзй;
}
