100的阶乘 如何计算 有简单的计算公式么

问题描述:

100的阶乘 如何计算 有简单的计算公式么

没有 可以给你一个pascal的程序
programme js(input,output)
var
S:real
i:integer
begin
S = 1;
for i=1 to 100 do
S = S*i;
write(S);
end