void mutaup(nodd *&prim)
 {nodd *u=prim;
  while(u->urm) u=u->urm;
  u->prec->urm=0;
  u->prec=0;
  u->urm=prim;
  prim->prec=u;
  prim=u;
 }