题解 P2726 【【题目待添加】】

伟大的战钟哥 · 2017-02-07 10:40:19 · 题解

只记录后三位即可 数据没有太刁钻

  n,i,ans:longint;
begin
  readln(n);ans:=1;
  for i:=1 to n do
    begin
      ans:=ans*i;//阶乘
      while ans mod 10=0 do ans:=ans div 10;//把后面的0都去掉
      ans:=ans mod 1000;//只记录后三位
    end;
  writeln(ans mod 10);//取最后一位
end.