<>;
@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