ll@N,K=0;string S{};while(N>0){K++;if(N%2==0)N/=2,S+="/";else N=N*3-1,S+="-";}
wtLn(K,S);