program T9; var w: real; begin w := Pi/4; writeln(Sin(w)); writeln(cos(w)); writeln(tan(w)); w:=sin(w); writeln(arcSin(w)*4); writeln(arccos(w)*4); w:=tan(Pi/4); writeln(arctan(w)*4); writeln(arctan2(0,1)); end.