vf 1到6000之间的能被5整除的前若干个偶数只和

按你的意思，从键盘输入要计算的个数n，然后计算。如输入n=4,则和为100（10+20+30+40）
s=0
c=0
input "n=" to n
for i=1 to 6000

if i%5=0 and i%2=0
c=c+1
s=s+i
??i
if n=c
exit
endif
endif
endf
?"和是:",s

能被5整除的偶数只能是10 20 30…6000共我600个公差也10的等差数列。
和为[(10+6000)600]/2=180300