vb程序設(shè)計(jì)：do循環(huán)實(shí)例(編輯修改稿)
2025-02-08 21:45 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 的程序都可以用 DO循環(huán)來(lái)寫(xiě)；而循環(huán)次數(shù)未知時(shí)，只能用 DO循環(huán)。 上機(jī)實(shí)踐： 津津?qū)?10000元錢(qián)存入銀行，銀行的年利率為 1分（即 10%），如一直不取出，問(wèn)按照利滾利的計(jì)算方法，至少經(jīng)過(guò)多少年津津才能拿到 150000元？ Dim s as single, year as integer s = 10000 year = 0 Do While _______ ______________ s = s * (1 + ) Loop MsgBox year 分析： 第一年： S1=10000*(1+) 第二年： S2=S1*(1+) 第三年： S3=S2*(1+) … year = year + 1S150000 枚舉算法 水仙花問(wèn)題： ? 春天是鮮花的季節(jié)，水仙花就是其中最迷人的代表，數(shù)學(xué)上有個(gè)水仙花數(shù)，他是這樣定義的： “ 水仙花數(shù) ” 是指一個(gè)三位數(shù)，它的各位數(shù)字的立方和等于其本身，比如：153=1^3+5^3+3^3。 現(xiàn)在要求輸出所有在 100和 999范圍內(nèi)的水仙花數(shù)。 分析： ? 設(shè)三位數(shù) i，百位數(shù)為 a,十位數(shù)為 b，個(gè)位數(shù)為 c ? 初始值 i=100 ?
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1