早教吧作业答案频道 -->其他-->
韩信点兵问题,士兵人数在100到200之间,3人排队余1人,5人排队余2人,7人排队余5人,求总人数的vb设计希望各位在2周内能帮我做出来.
题目详情
韩信点兵问题,士兵人数在100到200之间,3人排队余1人,5人排队余2人,7人排队余5人,求总人数的vb设计
希望各位在2周内能帮我做出来.
希望各位在2周内能帮我做出来.
▼优质解答
答案和解析
看来你是新手啊,你在窗体上添加一个command 和一个text,其它什么也不用管了,然后输入以下代码就可以了.
Dim 士兵人数 As Integer
Private Sub Command1_Click()
For 士兵人数 = 100 To 200
If 士兵人数 Mod 3 = 1 And 士兵人数 Mod 5 = 2 And 士兵人数 Mod 7 = 5 Then
Text1.Text = "满足条件的士兵数为:" & 士兵人数
End If
Next
End Sub
Private Sub Form_Load()
Command1.Caption =
Text1.Text = ""
End Sub
Dim 士兵人数 As Integer
Private Sub Command1_Click()
For 士兵人数 = 100 To 200
If 士兵人数 Mod 3 = 1 And 士兵人数 Mod 5 = 2 And 士兵人数 Mod 7 = 5 Then
Text1.Text = "满足条件的士兵数为:" & 士兵人数
End If
Next
End Sub
Private Sub Form_Load()
Command1.Caption =
Text1.Text = ""
End Sub
看了 韩信点兵问题,士兵人数在10...的网友还看了以下:
已知p:方程x^2+mx+1=0有两个不等的根.q:方程4x^2+4(m-2)x+1=0无实根.若p 2020-03-31 …
过双曲线x^2-y^2=t(t>0)的右焦点F作直线,交该双曲线右支于M、N两点,弦MN的垂直平分 2020-05-13 …
Excel中{=if(and(a5a1,a5a2,a5a3,a5a4),1,0)}大括号中的怎么简 2020-05-16 …
复数方程的解法X^2-3X+3=0该如何让求解?注:该方程为X的平方,减去3倍X,再加上3,等于0 2020-06-05 …
试用迭代法给出方程x3-x-2=0,在2附近的五次迭代近似解,即由x.o=2算出x.5,精确到小数 2020-06-22 …
f(n)=4f(n-1)-4f(n-2)+3^(n+1)[3的n+1次方](n>=2)f(0)=1 2020-08-01 …
高中数学圆的解析几何问题求经过圆x^2+y^2-4x+2y=0,x^2+y^2-2y-4=0的交点 2020-08-02 …
关于反三角函数已知三角函数求角的类型题希望给出具体的分析过程如下题:sinx=-1/3(1)x∈- 2020-08-03 …
求教计算器的使用方法,普通计算器,(3.8+3.6)*2*2.7-0.9*2.1-0.8*2.1-0 2020-11-15 …
2*(-2分之1)的3次方-3(-2分之1)的2次方+3*(-2分之1)-1急!希望能在1刻钟之内收 2020-12-17 …