用Visual Foxpro 知识编程：求s=1+(1+2)+(1+2+3)+……+（1+2+3+……+n）的值，n由键盘输入。 求高人解答

答案：*用Visual Foxpro 知识编程：求s=1+(1+2)+(1+2+3)+……+（1+2+3+……+n）的值，n由键盘输入。
SET TALK OFF
CLEAR
INPUT "请输入一个数字：" TO n
hj=0
FOR i=1 TO n
	xj=0
	FOR j=1 TO i
		xj=xj+j
	ENDFOR
	hj=hj+xj
ENDFOR
?hj
SET TALK ON
RETURN

上一个：在visual foxpro 中，将数值转换成字符串函数， 输入：n=-123.456 ?STR(n,9,2),STR(n,6,2),STR(n,3),STR(n
下一个：Visual Foxpro中，在制作一个商品的系统，需设置一个先判断库存是否为0，0即可以删除，其他则不可删除的按