$a+=($l=y/a-z//)<($%=$_*.012)?$l:($\+=$l-$%,$%)for<>;print"$a "