function sign(x:integer):integer;beginif x>0 then sign:=1;if x=0 then sign:=0;if x<0 then sign:=-1;end;
var i:integer;beginreadln(i);writeln(sign(i));end.
Филимон ты тупица ха-ха-ха-ха