Solve[x^2-s*x+187==0, {x, s}, Integers]