2,749
社区成员
发帖
与我相关
我的任务
分享100分求解（在线等待）
如何用VFP编写程序计算
s = 1 + (1+2) + (1+2+3) + (1+2+3+4) + (1+2+3+4+.....+n)
给出完整程序
请会的朋友帮帮，谢谢
s = 1 + (1+2) + (1+2+3) + (1+2+3+4) + (1+2+3+4+.....+n)
给出完整程序
请会的朋友帮帮，谢谢
...全文
请发表友善的回复…
发表回复
newfang 2003-06-10
- 打赏
- 举报
sum=0
for i=1 to n
sum=sum+(i*(1+i))/2
endfor
?s
for i=1 to n
sum=sum+(i*(1+i))/2
endfor
?s
teacluy 2003-06-10
- 打赏
- 举报
input "请输入n:" to n
s=0
for i=1 to n
s=s+(i+(i-1)*i/2)
endfor
?s
s=0
for i=1 to n
s=s+(i+(i-1)*i/2)
endfor
?s
fj_jiangqi 2003-06-10
- 打赏
- 举报
para n
s=0
for i=1 to n
s=s+i*(n-i+1)
**i 从1到n
**(n-i+1) 是i是表达式中出现的次数，如:n=3,则从3到1
endfor
return s
我发了2次短信了。
s=0
for i=1 to n
s=s+i*(n-i+1)
**i 从1到n
**(n-i+1) 是i是表达式中出现的次数，如:n=3,则从3到1
endfor
return s
我发了2次短信了。
fj_jiangqi 2003-06-10
- 打赏
- 举报
加 input to n 就行了
everard 2003-06-10
- 打赏
- 举报
N的值是让用户自己输入的
nononono 2003-06-10
- 打赏
- 举报
n=50
s=0
m=0
for i=1 to n
m=m+i
s=s+m
endfor
? s
s=0
m=0
for i=1 to n
m=m+i
s=s+m
endfor
? s
fj_jiangqi 2003-06-10
- 打赏
- 举报
para n
s=0
for i=1 to n
s=s+i*(n-i+1)
endfor
return s
s=0
for i=1 to n
s=s+i*(n-i+1)
endfor
return s
lz_zxf 2003-06-10
- 打赏
- 举报
nononono(null,null):比较清楚
newfang 2003-06-10
- 打赏
- 举报
楼主呢？？？揭贴吧？？？ ：）
nononono 2003-06-10
- 打赏
- 举报
yanghuanji(yanghuanji)，你的第一种算法太笨，只能给60分。
yanghuanji 2003-06-10
- 打赏
- 举报
两种方法：
一 ：
i=1
nAddUp=0
do while i<=n
m=1
nAmount=0
do while m<=i
nAmount=m+nAmount
m=m+1
enddo
i=i+1
nAddUp=nAddUp+nAmount
enddo
return nAddUp
二（递归）；
时间原因，下次帖
一 ：
i=1
nAddUp=0
do while i<=n
m=1
nAmount=0
do while m<=i
nAmount=m+nAmount
m=m+1
enddo
i=i+1
nAddUp=nAddUp+nAmount
enddo
return nAddUp
二（递归）；
时间原因，下次帖
