lab2.calc_12

program calc_12;
uses Math;
var
  c,res:Real;
  a,b,d,n:LongInt;
begin
     ReadLn(a,b);
     d:=Trunc(b/a);
     c:=Frac(a/b);
     Randomize;
     n:=Random(abs(a))*sign(a);

     res:=Sqrt(Abs(
       ( 223-a/b/c*d*sin(cos(a)) +ln(abs(cos(a)))/ln(10) )
       /( Power(N,2*tan(a)-34) +tan( a-abs(sin(d))-abs(cos(c)) ) )));

     WriteLn(res:0:4);
end.