* 求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