print'+'x-$_,'-'x$_,'.'while$b-=$_=$b-ord getc