作业帮 > 综合 > 作业

pascal:定义一个函数,求正整数中奇数阶乘的连续和,最大奇数为n(数据保证n为奇数)

来源:学生作业帮 编辑:灵鹊做题网作业帮 分类:综合作业 时间:2024/06/16 18:54:44
pascal:定义一个函数,求正整数中奇数阶乘的连续和,最大奇数为n(数据保证n为奇数)
输入样例
5 (样例解释为1!+3!+5!)
输出样例
127
pascal:定义一个函数,求正整数中奇数阶乘的连续和,最大奇数为n(数据保证n为奇数)
程序已经编写完成,请采纳:
var n:integer;
function facsum(n:longint):longint;
var s,t,i:longint;
begin
s:=0; i:=1; t:=1;
while i
再问: 能加上注解么?谢谢
再答: unction facsum(n:longint):longint;
var s,t,i:longint;
begin
s:=0; i:=1; t:=1; {s累加和,t=1,3,5的阶乘}
while i