| Thread Closed |
Still needing HELP..but should have posted this |
Share Thread | Thread Tools |
| Sep10-06, 06:40 PM | #1 |
|
|
Still needing HELP..but should have posted this
there is a second part to my original puzzle...sorry
So, IF ABC plus DEF equals GHI THEN, ADG, plus BEH equals CFI... Please any takers on this...it is driving me CRAZY !!!! the teasers are listed across if that helps A B C A D G +D E F + B E H _______ ________ G H I C F I Not sure if you will see it correctly ...sorry |
| PhysOrg.com |
science news on PhysOrg.com >> Hong Kong launches first electric taxis >> Morocco to harness the wind in energy hunt >> Galaxy's Ring of Fire |
| Sep10-06, 08:35 PM | #2 |
|
Recognitions:
|
The usual way to solve these puzzles is to turn your two equations into many. For example, based on the small digits: (C + F) mod 10 = (G + H) mod 10 = I. However, whenever I see these puzzles I always just write a computer program to solve them by doing a case-by-case. Here is the output of the program I wrote (notice how there are TWO answers, but that they are very similar):
Code:
718236954 718 + 236 = 954 729 + 135 = 864 729135864 729 + 135 = 864 718 + 236 = 954 Code:
Dim d(1 To 9) As Long
Private Sub Main()
Call testDigit(1) 'start the recursion on the first digit
End Sub
Private Sub testDigit(ByVal index As Long)
Dim a As Long
For a = 1 To 9
If digitsContain(a) = False Then 'make sure the digit is unique
d(index) = a 'try this digit in this position
If index < 9 Then
Call testDigit(index + 1) 'go to next digit if we're not at the last one
ElseIf isValid Then 'if we're at the last digit, check the answer
printDigits
End If
End If
Next a
d(index) = 0 'reset digit
End Sub
Private Function digitsContain(ByVal n As Long) As Boolean
Dim a As Long
'Check if the digit 'n' is already used
For a = 1 To 9
If d(a) = n Then
digitsContain = True
End If
Next a
End Function
Private Function isValid() As Boolean
'make sure the digits match the program
isValid = CBool(CLng(d(1) & d(2) & d(3)) + CLng(d(4) & d(5) & d(6)) = CLng(d(7) & d(8) & d(9)))
isValid = isValid And CBool(CLng(d(1) & d(4) & d(7)) + CLng(d(2) & d(5) & d(8)) = CLng(d(3) & d(6) & d(9)))
End Function
Private Sub printDigits()
Dim a As Long
Dim s As String
For a = LBound(d) To UBound(d)
s = s & d(a)
Next a
Debug.Print s, d(1) & d(2) & d(3) & " + " & d(4) & d(5) & d(6) & " = " & d(7) & d(8) & d(9), d(1) & d(4) & d(7) & " + " & d(2) & d(5) & d(8) & " = " & d(3) & d(6) & d(9)
End Sub
|
| Sep11-06, 04:14 AM | #3 |
|
|
omg...THANK YOU so much....I was trying to figure it out but just assumed that no number would equal more than 10..I was so focused in that respect, I never entertained any other possibilites...geez...but thank you sooo much!
|
| Sep11-06, 09:15 AM | #4 |
|
|
Still needing HELP..but should have posted thisCode:
ABCDEFGHI ABC + DEF = GHI ADG + BEH = CFI 146583729 146 + 583 = 729 157 + 482 = 639 157482639 157 + 482 = 639 146 + 583 = 729 718236954 718 + 236 = 954 729 + 135 = 864 729135864 729 + 135 = 864 718 + 236 = 954 Code:
ABCDEFGHI ABC + DEF = GHI ADG + BEH = CFI 326584910 326 + 584 = 910 359 + 281 = 640 348562910 348 + 562 = 910 359 + 461 = 820 359281640 359 + 281 = 640 326 + 584 = 910 359461820 359 + 461 = 820 348 + 562 = 910 Code:
ABCDEFGHI ABC + DEF = GHI ADG + BEH = CFI 023594617 023 + 594 = 617 056 + 291 = 347 023695718 023 + 695 = 718 067 + 291 = 358 045876921 045 + 876 = 921 089 + 472 = 561 056291347 056 + 291 = 347 023 + 594 = 617 067291358 067 + 291 = 358 023 + 695 = 718 067854921 067 + 854 = 921 089 + 652 = 741 089472561 089 + 472 = 561 045 + 876 = 921 089652741 089 + 652 = 741 067 + 854 = 921 |
| Sep11-06, 10:15 AM | #5 |
|
Recognitions:
|
Interestingly, when I run the program again I get all four answers. I must have missed them somehow.
|
| Thread Closed |
| Thread Tools | |
Similar Threads for: Still needing HELP..but should have posted this
|
||||
| Thread | Forum | Replies | ||
| New to this yet needing some help | Introductory Physics Homework | 9 | ||
| I am Needing help with Moles | Biology, Chemistry & Other Homework | 3 | ||
| AUS- Needing a abit of help | Introductory Physics Homework | 3 | ||
| needing help | Chemistry | 1 | ||
| needing help...again ~_~ | Introductory Physics Homework | 2 | ||