{for(s=i=1;$i;i++)s*=$i;$0=s}1