VFP编程题（50分） 求1-100之间能被7整除的数据的个数及其和

来源：百度知道 编辑：UC知道 时间：2024/07/01 04:07:04
还有一道是：
（1）编程输出如下图形（图案首行前空20个空格）
*********
******
***
* （这是右对齐的，和下面的图相反）

以及。。。。

（2）编程输出如下图形（图案前无空格）
*
***
*****
*******

希望高手出手相助。为了感谢，还会再加50分！
还有一题，再加50分！
求1/X+1/X^2+1/X^3+1/X^4...+1/X^n的值，N,X从键盘输入。

* 求1-100之间能被7整除的数据的个数及其和
gs=0 && 个数
he=0 && 和
for aa=1 to 100
gs=gs+iif(mod(aa,7)=0,1,0)
he=he+iif(mod(aa,7)=0,aa,0)
endfor
?gs
?he

*第一个图形有问题吧？【*】个数是：9-6-3-1？
*应该是9-6-3-0,或者10-7-4-1把？
*我按10-7-4-1给你吧。
for aa=10 to 1 step -3
?space(30-aa)+repl('*',aa)
endfor

* 第二个图形
for aa=1 to 7 step 2
?repl('*',aa)
endfor

m=0
s=0
for i=1 to 100
if i%7=0
s=s+1
m=m+i
endif
endfor
?s
?m