var c:char;begin
read(c);for c:=#1to c do write("+");write(".")end.