神马品牌网思域 汽车之家:这是一个vfp作业
来源：百度文库 编辑：神马品牌网 时间：2024/05/07 18:26:00
1， 编写程序过程，PROCL：计算N！
Procedure procl(n)
S=1
For i =to n
[1]
endfor
?n,”!=”,s
Endproc
2.编写过程PROC2：计算1+2+3+4+…+n
Procedure proc2(m)
For i=1 to m
[2]
Endfor
Return sum
Endproc
Procedure procl(n)
S=1
For i =to n
[1]
endfor
?n,”!=”,s
Endproc
2.编写过程PROC2：计算1+2+3+4+…+n
Procedure proc2(m)
For i=1 to m
[2]
Endfor
Return sum
Endproc
procedure proc1(n)
s=1
for i=1 to n
s=s*n
endfor
?n,"!=",s
endproc
****2
procedure proc2(m)
sum=0
for i=1 to m
sum=sum+m
endfor
retu sum
endproc