DEFA (NUMBER)   // алгоритм 36
{               // переворачивание числа
  ALGORITHM
  DEF f
  {
    S1   -> S1
    S1E1 -> f(E1)S1
  }
  DEF g
  {
    0   -> 0
    0E1 -> g(E1)
    E1  -> E1
  }
  DEF A
  {
    E1  -> g(f(E1))
  }
  TESTS
  rnd(10, 600000);
  rnd(10, 1000);
}

