use bigint; $ym=1e18;<>; ++$i, $a[$i]=$i%2?$_-$a[$i-1] :$a[$i-1]-$_, $i-1&2?($xm-=$-=$xm-$a[$i],$xM+=$-=$a[$i]-$xM) :($ym-=$-=$ym-$a[$i],$yM+=$-=$a[$i]-$yM) for<>; $t=1-$xm; $xM+=$t;$yM-=$t; $xm+=$t;$ym-=$t; $t+=$-=$yM-1e18; $xM+=$-;$yM-=$-; $xm+=$-;$ym-=$-; if(1<=$ym&&$xM<=1e18){ print@a+0,$/; printf"%d\n",++$j&2?$_-$t:$_+$t for@a; }else{ print-1,$/; }