VF编程求1至100之间非3的倍数的所有奇数之和

VF编程求1至100之间非3的倍数的所有奇数之和

clear
s=0
for i=1 to 100
if i%3<>0
if i%2=1
s=s+i
endif
endif
endfor
?"1至100之间非3的倍数的咐誉早所虚迅有奇数之和衡雀为:",s
clear
s=0
for i=1 to 100 step 2
if i%3<>0
s=s+i
endif
endfor
?"1至100之间非3的倍数的所有奇数之和为虚迅:咐誉早"衡雀,s
建立程序仿亩文件,代码如下告羡:
clear
sum=0
for
i
=1
to
100
step
2
sum=sum+i
endfor
?
“1-100的奇数之和为:袜大拍”,sum
也可以用:
clear
sum=0
i=1
do
while
i
<=100
if
mod(i,2)=0
sum=sum+i
endif
i=i+1
enddo
?
"1-100的偶数和为:",sum
← 上一篇: 下一篇: →