var
  d1,d2,d3,d4 : longint;
  s1,s2,s3 : string;
begin
  readln(d1);
  readln(s1);
  s2:=copy(s1,5-d1+1,d1-1);
  writeln(d1,'+1=',d1+1);
  writeln(d1,'-1=',d1-1);
  writeln(s2);
end.