A B C D - C D C _____________ A B C 求A、B、C、D的值.用VB编程完成
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/05 08:23:41
A B C D - C D C _____________ A B C 求A、B、C、D的值.用VB编程完成
ABCD-CDC=ABC,其中每个字母表示一个数字,请用VB编程解决,
ABCD-CDC=ABC,其中每个字母表示一个数字,请用VB编程解决,
Private Sub Command1_Click()
Dim i, j, k, l, iABCD, iCDC, iABC As Integer
Dim si, sj, sk, sl, sItem As String
For i = 0 To 9
For j = 0 To 9
For k = 0 To 9
For l = 0 To 9
si = Str(i)
sj = Str(j)
sk = Str(k)
sl = Str(l)
sItem = si & sj & sk & sl
iABCD = Val(sItem)
sItem = sk & sl & sk
iCDC = Val(sItem)
sItem = si & sj & sk
iABC = Val(sItem)
If iABCD - iCDC = iABC Then Print i, j, k, l
Next l
Next k
Next j
Next i
End Sub
再问: 能够给点注释吗?发现有些函数不太懂……
Dim i, j, k, l, iABCD, iCDC, iABC As Integer
Dim si, sj, sk, sl, sItem As String
For i = 0 To 9
For j = 0 To 9
For k = 0 To 9
For l = 0 To 9
si = Str(i)
sj = Str(j)
sk = Str(k)
sl = Str(l)
sItem = si & sj & sk & sl
iABCD = Val(sItem)
sItem = sk & sl & sk
iCDC = Val(sItem)
sItem = si & sj & sk
iABC = Val(sItem)
If iABCD - iCDC = iABC Then Print i, j, k, l
Next l
Next k
Next j
Next i
End Sub
再问: 能够给点注释吗?发现有些函数不太懂……
A B C D - C D C _____________ A B C 求A、B、C、D的值.用VB编程完成
a b c d × 9 _____________
[a,b)×[c,d
a,b ,c ,d
求a、b、c、d的值.
( )-(c-d)=(a-c)-(-b+d)
设c为正整数,并且a+b=c,b+c=d,d+a=b,求(a+b)(b+c)(c+d)(d+a)的最小值
我的答案是B、C、C、A或D、D、C、B、C、B、D
已知a/b=b/c=c/d=d/a=k,求(a+b+c+d)/(a+b+c-d)的值是多少?
如果A/B+C+D=B/A+C+D=C/A+D+B=D/A+B+C=K试求K的值
a-(-b+c-d) a+(b-c-d) -(a-b)+(c-d) 去括号的过程
A>B,C>D.A+C