#!perl -nl
/ /;$v+=5<(push@T,$')?$'-shift@T:$';printf"$_ Average: %.1f
",$v/@T