print(),$a+=$_,$a?++$r>4&&die:0for<>