<>;$/=$",$f=$_-<>?$%+=!$f:0for split$",<>;print$%