如何用Pascal编写阶乘和

来源:百度知道 编辑:UC知道 时间:2024/05/26 02:38:44
计算表达式的值:s=1!+2!+3!+…+n!,其中n由键盘输入。
如何用Pascal编写?

program abc;
var i,n:integer;
s:longint;
begin
readln(n);
s:=1;
for i:= 1 to n do
s:=s*i;
writeln(s);
end.

s=0
for i:=1 to n do
k=1
for j:=1 to i do
k=k*j
endfor
s=s+k
endfor

格式有点忘记了,思路应该是这样的吧