What can I do to solve this task?
Solve[Power[x, 2] + Power[y, 2] + 1 == cos[Power[x, 2]*Power[y, 2]], {x, y}]
Reduce[Power[x, 2] + Power[y, 2] + 1 == Cos[Power[x, 2]*Power[y, 2]], {x, y}, Reals]
x==0&&y==0
Solve[Power[x, 2] + Power[y, 2] + 1 == Cos[Power[x, 2]*Power[y, 2]], {x, y}, Reals, Method -> Reduce]
Solve[Power[x, 2] + Power[y, 2] + 1 == Cos[Power[x, 2]*Power[y, 2]], {x, y}, Reals, Method -> Reduce]– Bob Hanlon May 29 '21 at 15:39