sub f{
	$x0=-100;
	$x1=100;

	$x[$i]=$x0;
	print"? @x\n";
	$d0=<>;
	
	$x[$i]=$x1;
	print"? @x\n";
	$d1=<>;
	
	while($x0<$x1){
		if($d0>$d1){
			$x0=int(($x0+$x1+401)/2)-200;
			$x[$i]=$x0;
			print"? @x\n";
			$d0=<>;
		}else{
			$x1=int(($x0+$x1+400)/2)-200;
			$x[$i]=$x1;
			print"? @x\n";
			$d1=<>;
		}
	}
}

@x=(0,0,0);
$|=1;
for$i(0..2){
	f;
}
print"! @x\n";