<>;<>;$x+=$_ for@C=<>;$\+=abs$_-($x/@C|0)for@C;print