sub a{$c+=print"? @_\n";<>}
$|=1;
$l=99,$r=1e9-1if$f=a(100)>0;
$f&&($%<0?(--$l,$r=$m-2):($l=$m,--$r))while$%=a($m=$l+$r>>1);
print'! ',$m+$c-1,$/