var x:real;n:comp;begin
repeat
read(x);n:=201204;repeat
if odd(n)then x:=sin(x)else x:=cos(x);shr(n,1)until n=0;writeln(x:0:6)until 1=0end.