procedure main() while a:=read()do{every writes((58-ord(!a))%10);write()} end