program szamjegy_noveles_kettovel; var s:string; x:real; i:byte; begin readln(s); for i:=1 to length(s) do begin if (s[i]<>'-') and (s[i]<>'.') then if (s[i]<>'9') and (s[i]<>'8') then s[i]:=chr(ord(s[i])+2) else s[i]:=chr(ord(s[i])-8) end; writeln(s); readln end.