永发信息网

用Visual Basic语言编写一个程序,求解搬砖问题:36块砖,36人搬,男的搬4块,

答案:3  悬赏:0  手机版
解决时间 2021-12-02 05:15
用Visual Basic语言编写一个程序,求解搬砖问题:36块砖,36人搬,男的搬4块,
最佳答案
Private Sub Command1_Click()
Dim x As Integer, y As Integer, z As Integer
For x = 1 To 36
For y = 1 To 36
For z = 1 To 36
If (4 * x + 3 * y + 0.5 * z = 36) And _
(x + y + z = 36) Then Print x, y, z
Next
Next
Next

End Sub
全部回答
五个男生20块,五个女生15块,二个小孩1块追问可以用VB吗
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
为什么翻开JJ的皮.碰里面的肉会疼
老农民演员表马仁礼的爹是谁演的
白萝卜猪肉包子怎么做
工伤者单位安排轻松的工作吗
轮子管家的设备号是什么
你介意婆婆生孩子吗?
为了解某中学生遵守《中华人民共和国交通安全
课堂上,老师让一名学生上台,在黑板上同时用
延安精神是指什么??
DS5空调不制冷是什么原因
5.4×20%-1.8x=2.7x20%
钟山景区玩多长时间合适?
一首歌什么什么MSN的 记不清楚了
李想签名设计
理解下列词句: 玲珑饱满 细瘦而不干瘪丰腴而
推荐资讯
全健火疗是骗局吗
崩坏3用户名账号怎么绑定邮箱和手机呀?
大绵羊150风冷摩托车换的新化油器 声音比以前
按照惯例,,我们早餐喜欢吃地瓜粥。今天因为
怎么研究复试彩票(双色球) 买的时候是多少
想带小妹,从哪
24v直流电能串联多少个七彩LED灯泡
单选题京剧脸谱是具有民族特色的一种化妆方法
魅族的手机用华为的耳机支持三键线控功能吗
嘉祥县到邹城多少公里小时查询,嘉祥县至
梦见神兽成对奔跑是什么意思
硅胶挤出机和橡胶挤出机最大的区别是什么
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?