VB編程:一個(gè)三位整數(shù),它的百位數(shù)字、十位數(shù)字以及個(gè)位數(shù)相加等于17.求滿(mǎn)足上述條件的三位正整數(shù)的和.
VB編程:一個(gè)三位整數(shù),它的百位數(shù)字、十位數(shù)字以及個(gè)位數(shù)相加等于17.求滿(mǎn)足上述條件的三位正整數(shù)的和.
其他人氣：521 ℃時(shí)間：2020-06-13 02:41:49
優(yōu)質(zhì)解答
Private Sub Form_Click()Sum = 0For i = 100 To 999s = Trim(Str(i)) If Val(Left(s,1)) + Val(Right(s,1)) + Val(Mid(s,2,1)) = 17 Then Sum = i + Sum End IfNextPrint SumEnd Sub
我來(lái)回答
類(lèi)似推薦
- VB編程.找出所有三位數(shù)的升序數(shù),就是個(gè)位數(shù)字大于十位數(shù),十位數(shù)大于百位數(shù).
- VB編程,如果一個(gè)三位整數(shù)等于其各位數(shù)字的立方和,則稱(chēng)這個(gè)數(shù)為水仙花數(shù).輸入一個(gè)整數(shù)判斷其是否為水仙花數(shù).
- 用vb編程在文本框輸入一個(gè)三位數(shù),單擊窗體后,在窗本打印輸出該數(shù)的個(gè)位數(shù),十位數(shù)和百位數(shù)
- 編寫(xiě)vb：“水仙花數(shù)”是指一個(gè)3位數(shù),其各位數(shù)的立方和等于該數(shù),如153＝1^3＋5^3＋3^3.編寫(xiě)程序,打印出
- (1/2)VB編程,如果一個(gè)三位整數(shù)等于其各位數(shù)字的立方和,則稱(chēng)這個(gè)數(shù)為水仙花數(shù),如153=1^3+5...
- 大氣層是怎樣分層的?有多少層?每層密度怎樣?
- z=x^3y-3x^2y^3的二階偏導(dǎo)數(shù)
- ①已知a²+a-3=0 那么a²（a+4）的值是___
- 莎士比亞十四行詩(shī)哪些比較著名?
- 因?yàn)?/2×4/3×3/2=1,所以1/2、4/3、3/2三個(gè)數(shù)互為倒數(shù).
- 2011年4月1日泰國(guó)發(fā)生洪災(zāi),季風(fēng)來(lái)自太平洋還是印度洋?
- 1.25:x=2.5:8怎么解
猜你喜歡
- 1（25加4分之3）除以4分之1加4分之1,脫式計(jì)算
- 2Can A Chinese Young Lady Become An American Woman?
- 31.宇航員身穿沉重的宇航服,還能行走自如,可能是因?yàn)椋?/a>
- 4描寫(xiě)春夏秋冬好詞好句
- 5英語(yǔ)翻譯
- 6簡(jiǎn)要廉頗和藺相如的故事 200字左右 好的話(huà)另加分
- 7伊紅美藍(lán)培養(yǎng)基是什么培養(yǎng)基
- 8德語(yǔ)怎么說(shuō) 我覺(jué)得 我認(rèn)為 相當(dāng)于英語(yǔ)的I think
- 9（一減二分之一）（三分之一減一）（一減四分之一）（五分之一減一）……（2009分之1減1）（,一減2010分之一）
- 10扣取百分之20的手續(xù)費(fèi),你必須獲利50元,該定什么價(jià)格.
- 11a為和值時(shí)適合條件x+y=2a+1和x-y=3a-2的點(diǎn)(x,y)在二象限(第二象限上的點(diǎn)(x,y)滿(mǎn)足x＜0 y＞0)
- 12證明：兩條邊上的高相等的三角形是等腰三角形．