var c:char;begin repeat read(c);write(chr($80200802*comp(c)and$884422010mod$ff))until 0=1end.