$|=print"? 50\n? 100\n"; $c=<>; $d=<>; for$a(0..99){ for$b($a+1..100){ if(($a+50)%$b==$c&&($a+100)%$b==$d){ print"! $a $b\n"; } } }