Solve[x + E^-x == 2, x]