用VB程序编写一个能解决如下简单数学问题的程序.今有面额1元、2元和5元的纸币各十张,要是总和为24

答案:2 悬赏:70 手机版

解决时间 2021-01-27 00:56

提问者网友：贪了杯
2021-01-26 20:36

最佳答案

五星知识达人网友：底特律间谍
2021-01-26 21:05

楼上程序应该稍修改一下,问题中并没有10元纸币,修改如下:Private Sub Command1_Click() For j = 0 To 4 '五元数 For k = 0 To 10 '二元数 For l = 0 To 10 '一元数 If 5 * j + 2 * k + l = 24 Then Print 5 * & j & + 2 * & k & +1* & l & = 24 End If Next l Next k Next jEnd Sub5 *0+ 2 *7+1*10 = 245 *0+ 2 *8+1*8 = 245 *0+ 2 *9+1*6 = 245 *0+ 2 *10+1*4 = 245 *1+ 2 *5+1*9 = 245 *1+ 2 *6+1*7 = 245 *1+ 2 *7+1*5 = 245 *1+ 2 *8+1*3 = 245 *1+ 2 *9+1*1 = 245 *2+ 2 *2+1*10 = 245 *2+ 2 *3+1*8 = 245 *2+ 2 *4+1*6 = 245 *2+ 2 *5+1*4 = 245 *2+ 2 *6+1*2 = 245 *2+ 2 *7+1*0 = 245 *3+ 2 *0+1*9 = 245 *3+ 2 *1+1*7 = 245 *3+ 2 *2+1*5 = 245 *3+ 2 *3+1*3 = 245 *3+ 2 *4+1*1 = 245 *4+ 2 *0+1*4 = 245 *4+ 2 *1+1*2 = 245 *4+ 2 *2+1*0 = 24

全部回答

1楼网友：摆渡翁
2021-01-26 22:18

这个问题的回答的对

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息