#!perl -l
($a=$_*$a%1e6||1)=~s/0*$//for$|..pop;print$a%10