Visual FoxPro. 设计程序并标出运行结果。用键盘输入一个正整数N,并计算1，2，3，…，N的和 ，输出计算结

楼上的看清楚了，人家要的是程序

方法一：
modi comm a.prg
然后在出现的程序框中输入
input "n=" to n
x = 0
for m=1 to n
x=x + m
endfor
? "n=",x

按CTRL+W保存，然后在命令框中输入 do a.prg 即可
方法二：
modi comm a.prg
然后在出现的程序框中输入

input "n=" to n
x = 0
m = 0
do while m<n
m = m +1
x = x + m
enddo
? "n=",x
按CTRL+W保存，然后在命令框中输入 do a.prg 即可

要修改程序可以用modi comm 程序名 就可以了

(首项+末项)*项数/2
(1+n) * n/2

挺简单的啊~ ~ ~
input "n=" to n
?(1+n)*n/2