File standardInput readLines map(v,c:=b:=500;a:=v asNumber;while(a!=b,c=c/2;writeln(b,if(a>b,v=c;" <",v= -c;" >"));b=b+v+.5|0);writeln(b," =
"))