1樓:網友
輸出1到999種水仙花數的程式。
clearset talk off
for i=1 to 999
s=str(i,3)
s1=substr(s,1,1)
s2=substr(s,2,1)
s3=substr(s,3,1)
a=val(s1)
b=val(s2)
c=val(s3)
if i=a^3+b^3+c^3
iendif
endfor
return
找出100-999之間的所有「水仙花數」。
如:153=1^3+5^3+3^3
set talk off
clearfor i=100 to 999
a=int(i/100)
b=int((i-100*a)/10)
c=i-int(i/10)*10
if i=a^3+b^3+c^3
iendif
set talk on
return
用vfp求出所有的水仙花數,怎麼寫?
2樓:亓新蘭麼寅
朋友,如何理解你。
所有的」。這範圍太泛了。
現提供乙個小程式您參考,希望能幫到您。
fors=100
to999a=int(s/100)
b=int((s-a*100)/10)
c=s-a*100-b*10
ifs=a^3+b^3+c^3
sendif
endfor執行結果。
--語句解釋。
int()返回數值表示式的整數部分。取整數。
a=int(s/100)
百位數*b=int((s-a*100)/10)十位數*c=s-a*100-b*10
個位數*if
s=a^3+b^3+c^3
水仙花的條件。
用vfp程式找出100~999以內的水仙花數?
3樓:仙墨徹奇冬
新建乙個程式(檔案選單——新建——程式——新建檔案),寫**:
ge=0shi=0
bai=0"100~999以內的水仙花數是:"
fori=100
to999ge=i%10
shi=int(i/10)%10
bai=int(i/100)
ifge^3+shi^3+bai^3=i?iendif
next然後,直接點選感嘆號,儲存並執行,圖:
如何用vfp求水仙花數?
4樓:o心海琉璃
水仙花數是指乙個 3位數,它的每個位上的數字的3次冪之和等於它本身。(例如:1^3 + 5^3 + 3^3 = 153)
clearfor i=100 to 999
if int(i/100)^3+int(i/10%10)^3+(i%10)^3=i then
iendif
endfor
水仙花數為什麼叫水仙花數?求解
和水仙花一點關係都沒有。就像自然數一樣,只是一個名字!這種數字的定義是 n 位數的每個數位的 n 次方之和等於數字本身。例如 三位數的三個位的立方加起來等於改三位數,四位數的四個位的四次方加起來等於該四位數,這種數字有個有趣的英文名叫 narcissistic number,原意是 自戀數 可能是因...
水仙花如何繁殖 水仙花是怎樣繁殖的?
水仙花是怎樣繁殖的?水仙 narcissus tazetta l.var.chinensis roem.又名中國水仙,是多花水仙的乙個變種。是石蒜科多年生草本植物。水仙的葉由鱗莖頂端綠白色筒狀鞘中抽出花莖 俗稱箭 再由葉片中抽出。一般每個鱗莖可抽花莖 枝,多者可達 枝,傘狀花序。花瓣多為片,花瓣末處...
請問,水仙花應如何挑選
1 儘量挑選球大的水仙,水仙的球莖越大,儲存的養分就越多,質量也越高,花多 花大 味香 花期長。市場上水仙的 主要就是根據其球莖的大小而定。2 挑選有土球包裹根部的水仙球,在運輸時可以一定程度的避免擠壓而引起碰傷花芽。3 水仙球在經歷長時間的儲藏後外表會產生多層乾枯的鱗莖,在挑選時應選擇球莖外部乾枯...