($a,$b,$c)=glob<>; while(1){ if($a>=1&&$b>=1&&$c>=1){ ++$x; --$a; --$b; --$c }elsif($b<=$c){ if($b>=1&&$c>=3){ ++$x; --$b; $c-=3 }else{ last } }else{ if($b>=3&&$c>=1){ ++$x; --$c; $b-=3 }else{ last } } } print$x+($b/5|0)+($c/5|0)