program primer;
  var n:integer;
      y,x:real;
begin
  readln (y,n);
  x:=random(n-1)+random; {random - для получения случайного вещественного числа, у меня работает}
  writeln ('Ответ: ',frac((cos(exp(ln(y)*x))+x-y/3)/(2*sqr(x)-y+1)));
end.