program hra; var N: integer; procedure povely(c: integer); begin if c = 0 then exit; if c mod 10 = 0 then begin povely(c div 10); write('*'); end else if c mod 10 <= 5 then begin povely(c - 1); write('+'); end else begin povely(c + 1); write('-'); end end; begin read(N); povely(N); writeln; end.