<>;
@a=glob<>;
$x=$y=shift@a;
for(@a){
	@s=sort{$a<=>$b}
		$x+$_,$x-$_,$x*$_,$_?int$x/$_:(),
		$y+$_,$y-$_,$y*$_,$_?int$y/$_:();
	$x=$s[0];
	$y=$s[-1];
}
print$y