program number; {$APPTYPE CONSOLE} var a,b,c,d:integer; begin assign(input, 'input.dat'); reset(input); readln(d); d:=d-150; a:=d div 100; b:=d div 10 mod 10; c:=d mod 10; close(input); assign(output, 'output.ans'); rewrite(output); writeln(a,' ',b,' ',c); close(output); end.