1只公雞5塊錢,1只母雞3塊錢,3只小雞1塊錢,100塊錢買100只雞,那公雞,母雞,小雞各多少個,用VB語言解

2022-12-04 03:56:26 字數 1268 閱讀 1755

1樓:灑家知道

dim num1,num2,total

dim i,j

dim result

dim isend

isend = false

for i = 1 to 100

num1 = i

for j = 1 to 100 - i - 1num2 = j

total = num1 * 5 + num2 * 3 + (100 - num1 - num2)/3

if total = 100 then

result = "公雞有" & num1 & "只,母雞有" & num2 & "只,小雞有" & (100-num1-num2) & "只。"

isend = true

exit for

end if

next

if isend then

exit for

end if

next

2樓:air索婭

main()

3樓:爺一生只為一個字

sub a()

dim i, j, k

for i = 1 to 33

for j = 1 to 20

for k = 1 to 100

if i + j + k = 100 and i * 3 + j * 5 + k * 1 = 100 then

msgbox "公雞" & j & "只,母雞" & i & "只,小雞" & k & "只", , "計算結果"

exit sub

end if

next

next

next

msgbox "條件不成立", , "提示"

end sub

4樓:車頌

private sub form_click()me.print " 公雞", " 母雞", "小雞"

dim i, j, k '公雞 i,母雞j ,小雞k 。

for i = 0 to 20

for j = 0 to 33

for k = 0 to 100

if 5 * i + 3 * j + k / 3 = 100 and i + j + k = 100 then

me.print i, j, k

end if

next k

next j

next i

end sub

3塊錢1斤10塊3斤有什麼區別

1 單價bai不同3塊錢 1斤的單du價是zhi3元每斤,10塊3斤的單價是3.33元每斤 10 3 dao所以10塊3斤的單價回 其實是答比3塊錢1斤的單價高的。2 買的斤數會不同 3塊錢1斤的話,消費者想買的數量是自由的,1斤起,1斤 2斤 3斤 4斤等等,想買多少斤就多少斤。10塊3斤的話,消...

人花了8塊錢買了一隻雞,賣了9塊錢,又花了10塊錢買了回來,又賣了11塊錢,請問你掙了多少錢

答案 1 9 8 1,11 10 1,1 1 2,所以最後賺2元。2 最初只有8塊錢,最後你有11塊了,所以是賺3塊 3 第一次買賣,主人公損失8塊,獲得一隻雞,第二次買賣 主人公獲得9塊,損失一隻雞 第三次買賣,主人公損失10塊,獲得一隻雞 第四買賣,主人公 獲得11塊,損失一隻雞 所以 整個產生...

面試官 給你1塊錢,如何存活3天

什麼面試?看來情況而定了。源如果不是很嚴肅的問題,我會說 如果您再給我一百元,我覺得我可以想到在1小時內賺200元的方法。如果面試官還不笑,繼續說 再給你100,告訴我1小時賺200的方法。我說 您的第一個要求是一小時賺100,我現在已經完成了。至於您的第二個要求一小時賺200,我能否完成,那在於你...