<>; for(<>){ ($a,$b,$c)=split; print+($b&~1)+(($a-=$e=$a<$c?$a:$c)<($b&=1)?$a:$b)+$e*2+($c-$e>>1),$/; }