#!perl -l
$r=1;for(2..pop){$_/=5,$t--until$_%5;$_/=2,$t++until$_%2;$r=$r*$_%10}$r=$r*2%10while$t--;print$r