标题:百元买百鸡
取消只看楼主
isa
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-10-2
 问题点数:0 回复次数:1 
百元买百鸡

Dim a As Integer, b As Integer, c As Integer
For a = 0 To 100
For b = 0 To 100
For c = 0 To 100
If 5 * a + 3 * b + c = 100 And a + b + c = 100 Then
label1.Text =
End If

Next
Next
Next
编到这就没有思路了,想了好久,大侠指点~
谢谢~

搜索更多相关主题的帖子: 100 
2006-10-02 11:05
isa
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-10-2
得分:0 

谢谢大侠!!!

2006-10-07 21:34



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-93949-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.869948 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved