如何用VFP 判斷 水仙花數??急

2025-07-23 08:50:20 字數 1555 閱讀 9184

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 水仙球在經歷長時間的儲藏後外表會產生多層乾枯的鱗莖,在挑選時應選擇球莖外部乾枯...