用VB6编写一个小程序

1-8000间能被5整除的前若干个偶数之和 当和值大于750时和值
2024-12-02 14:47:24
推荐回答(3个)
回答1:

he=0
for i=1 to 8000
if i mod 5= 0 and i mod 2=0 then
he=he+i
next i
if he>750 then msgbox he

回答2:

不明白你说了什么

回答3:

s=0
for i=10 to 750 step 10
s=s+i
if s>750 then exit for
next i
print s