Function s(ByVal a As Integer,ByVal b As Integer) As Integer
Dim i As Integer
For i = 1 To 1000
If i Mod a = 0 And i Mod b = 0 Then
s = s + i
End If
Next
End Function
VB 編寫函數(shù)fun,函數(shù)的功能是：求1-1000內(nèi)能同時被m,n整除的數(shù)的總和并顯示.
VB 編寫函數(shù)fun,函數(shù)的功能是：求1-1000內(nèi)能同時被m,n整除的數(shù)的總和并顯示.
其他人氣：402 ℃時間：2019-10-26 02:48:37
優(yōu)質(zhì)解答
我來回答
類似推薦
- 請編寫函數(shù)fun(),它的功能是：求出1到1000之內(nèi)能被7或11整除、但不能同時被7和11整除的所有整數(shù)并將它們
- 請編寫函數(shù)fun(),它的功能是：求出1到1000之內(nèi)能被5或13整除、但不能同時被5和13整除的所有整數(shù)并將它們
- 請編寫一個函數(shù)fun,它的功能是:求出1到m(含m)之內(nèi)能被7或11整除的所有整數(shù)放在數(shù)
- VB編程求1到1000中能被3整除的數(shù)的個數(shù)
- VB試題：編寫函數(shù)fun,函數(shù)的功能是：求I 到a之間的偶數(shù)之積
- 關于萬有引力定律的發(fā)現(xiàn),正確的是 A牛頓通過望遠鏡觀察天體運動發(fā)現(xiàn)的 B牛頓通過探究蘋果落地發(fā)現(xiàn)的
- 為什么紅細胞可攜帶二氧化碳
- I know I'm really in love with you..I care and I really don't want to lose you
- 0.8L=（）dm3=（）cm3
- 有沒有I like winter的作文?急用 .求你了!幫個忙!(>_
- 一臺電動機正常工作時，兩端的電壓為220V，通過線圈的電流為10A，若此線圈的電阻為2Ω，那么它的電功率是_W，這臺電動機1min內(nèi)產(chǎn)生的熱量是_J，這臺電動機的效率是_．（最后一空保留三位
- forget現(xiàn)分及形容詞 cook形容詞,名詞兩個
猜你喜歡
- 1家用電器或線路著火,可用泡沫滅火器撲救是對的還是錯的?
- 2Shall we have some chicken wings?（同義句轉(zhuǎn)換）
- 3子彈在水平飛行時,其動能為Ek0=800J,某時它炸裂成質(zhì)量相等的兩塊,其中一塊的動能為Ek1=625J,求另一塊的動能Ek2.
- 4甲乙丙三個同學參加儲蓄，甲存款是乙的4/5，丙存款比乙少40%，已知甲存了500元，丙存了多少元？
- 5函數(shù)f（x）=sin（πx/2-π/4）的圖象是由函數(shù)y=sinx的圖象經(jīng)過怎樣的變換得到的?
- 6歷史題選擇題【詳細解析區(qū)分一下】THANK YOU
- 7英語單詞的過去式和反義詞
- 8設A是m*n矩陣,B是n*m矩陣.證明當M>n時,必有|AB|=0
- 9a*b=a （a小于等于b） =b （a大于b）如果1*2=1,則函數(shù)2^x*2^（-x）的值域
- 10The twins____members of the school football team A are both B both are
- 11最小正周期和周期有什么區(qū)別?
- 125551用加減乘除,括號怎樣等于24