VB程式求1－40之間能被5整除得所有數的和.

dim sum%，i%
for i=1 to 40
if i mod 5=0 then sum=sum+i
next
print sum

RELATED INFORMATIONS

1. 一個三比特小數加上5後能被5整除，减去3後能被3整除，除以2後能被2整除，這個三位數最小是多少
2. 一個三位數加5後能被5整除，减3後能被3整除，除以2後能被2整除，這個三位數最小是多少？
3. 數a能被3整除，（）被9整除；若數a能被9整除，那麼（）被3整除？ A一定能B不一定能C不可能
4. 前2008個既能被2整除又能被3整除的正整數的和，除以9的餘數是（）前2008個既能被2整除又能被3整除的正整數的和，除以9的餘數是（）我的方法很麻煩，得出答案是6.請教哪位大師有更好的方法？
5. 能被十一整除，除以九時餘八，除以七時餘六，除以五時餘四，除以三時餘二的數
6. 如果a能整除b，那麼a是b的倍數，b是a的約數.______.
7. 一個三位數，既是2的倍數，又能被7整除，而且5又是它的約數，這個三位數最小是多少？
8. 如果a除以b等於9，那麼a一定能被b整除嗎
9. 8除以4等於2，那麼是8能整除4還是4能整除8呢？快
10. A除以B等於7兩者之間的關係是什麼？1；A是B的倍數2；A是B的7倍3；A能被B整除4；A和B的公約數是7 這是個單選題打錯了1；A是B的倍數2；A是B的7倍3；A能被B整除4；A和B的公約數是7
11. VB程式求出各位數為6且能被3整除的三位數共有多少個？
12. vb中求1-100之間的偶數和奇數還有能被3和5同時整除的數的程式應該怎麼編寫
13. 從1、2、3、4、5、6這六個數位中任取3個組成三位數，其中能被6整除的有幾個用VB程式怎麼編或者任取0-9中的六個數位中再任取3個組成三位數，這種情況怎麼編？
14. 從0,1,5,6這個四個數中任選3個不同的數組成能同時倍3,5整除的三位數，求這樣的三位數中最大與最小的兩個數之和.
15. 用，0,1,2，三個數位組成的三位數中，能被2整除的有（），能被3整除的有（）能被5整除的有（）
16. 從1，3，5，7中任取2個數位，從2，4，6，8中任取2個數位組成沒有重複數位的四位數，其中能被5整除的四位數的個數有（） A. 120個B. 300個C. 240個D. 108個
17. 在2-6這五個數位中任取四個不同的數位共可組成120個四位數，其中能被45整除的最大的四位數是多少？
18. 同時是2和5的倍數一定是10的倍數.______（判斷對錯）
19. 460-500中有一個數是三的倍數還能被2和5整除.這個數是多少
20. 什麼樣的數能被9整除？同時是3和5的倍數是不是一定是15的倍數/