提问，如何用循环编乘阶程序 - pascal吧 - RAT

提问，如何用循环编乘阶程序

level 7

冰雪清月981217 楼主

nl:=1×2×3…×n

2014年08月15日 07点08分 1

level 11

Really嗯嗯嗯

就是我定义函数的那部分。

2014年08月15日 12点08分 2

level 5

厕所app怎么还没倒

for 1 to n do a:=a*n

2014年08月15日 23点08分 3

厕所app怎么还没倒

这个么。

2014年08月15日 23点08分

level 1

桂敏0922

var
a，s，i，n：longint；
begin
a:=1； s:=0；
readln(n);
for i：=1 to n do
begin
a：=a*i；
s:=s+a；
end；
writeln(s);
end；
n不可以太最多到12；要想再大把a和s换成别的类型

2014年08月18日 10点08分 4

1