int palindrom(nodd *prim)
 {nodd *p,*u;
  u=prim;
  while(u->urm)
   u=u->urm;
  p=prim;
  while(p!=u && u->urm!=p)
   {if(u->info !=p->info) return 0;
    p=p->urm;
    u=u->prec;
   }
  return 1;
 }