Bài toán theo í tưởng SGK lớp 6, nhờ các bạn giải giúp, bỡi VBA càng tốt (1 người xem)

[SA_DQ]

Có con số gồm 6 chữ số, là ABCDEF

Khi đó

(1)  ABCDEF * C = CDEFAB

(2)  ABCDEF * G = BCDEFA

(3)  ABCDEF * B = EFABCD

(4)  ABCDEF * E = FABCDE

(5)  ABCDEF * H = DEFABC

? ABCDEF

 

[doveandrose]

ủa đây là trình độ lớp 6 hã thầy ? không biết làm sao mà hồi đó em qua được lớp 6 nhỉ ? híc

 

[n0thing1988]

Cho em có ý kiến. Sao lại có G và H trong đề bài là sao ạ? Liệu có nhầm lẫn ( hoặc thiếu sót ) ở đây ko bác?

 

[ChanhTQ@]

ủa đây là trình độ lớp 6 hã thầy ? không biết làm sao mà hồi đó em qua được lớp 6 nhỉ ? híc

Đã bảo là bài toán lấy í tưởng của đề bài lớp sáu thôi

Cho em có ý kiến. Sao lại có G và H trong đề bài là sao ạ? Liệu có nhầm lẫn ( hoặc thiếu sót ) ở đây ko bác?

Không hề sai đề đâu; Cứ cho là bài toán có 8 ẩn, ta chĩ đang có 5 phương trình

Cần fải tìm trong chúng hoặc fương trình mới, như C=1, . . . Cho đến khi số f ương trình bằng số ẩn là ta sẽ có kết quả thôi
(C=1 cũng là 1 gợi ý gián tiếp đó nha!)

 

[OverAC]

Các chữ số có được quyền giống nhau không bác?

 

[SA_DQ]

Các chữ số có được quyền giống nhau không bác?

Mỗi 1 chữ cái chỉ đại diện cho 1 con số; Ví dụ C là 1 thì bất cứ chổ nào có C đều mang số 1

 

[n0thing1988]

Các chữ số có được quyền giống nhau không bác?

Anh Bình định cho kết quả 111111 đây mà

 

[huuthang_bd]

Chỉ cần dữ kiện 1, 3, 4 là tìm được ABCDEF là 142857

 

[lenongree]

Có con số gồm 6 chữ số, là ABCDEF

Khi đó

(1)  ABCDEF * C = CDEFAB

(2)  ABCDEF * G = BCDEFA

(3)  ABCDEF * B = EFABCD

(4)  ABCDEF * E = FABCDE

(5)  ABCDEF * H = DEFABC

? ABCDEF

Nếu là >excel2010, thì em sẽ dùng CT này tại A1:

A1=((ROW(A111111)*(--MID(ROW(A111111),3,1))=SUM(--MID(ROW(A111111),{3;4;5;6;1;2},1)*10^(6-ROW($1:$6)))))*((ROW(A111111)*(--MID(ROW(A111111),2,1))=SUM(--MID(ROW(A111111),{5;6;1;2;3;4},1)*10^(6-ROW($1:$6)))))*(ROW(A111111)*(--MID(ROW(A111111),5,1))=SUM(--MID(ROW(A111111),{6;1;2;3;4;5},1)*10^(6-ROW($1:$6))))

Ctrl+Shif+Enter rồi fill đến dòng cuối cùng, sau đó fillter cột A lấy=1!!!
Ta được 2 kết quả là 111111 và 142857 , gắn vào điều kiện (2) và (5) của đề thì thỏa hết, vậy có 2 kết quả là 111111 và 142857
Không biết giống cách của thầy huuthang_bd không, hi!!!

 

[huuthang_bd]

Nếu là >excel2010, thì em sẽ dùng CT này tại A1:

A1=((ROW(A111111)*(--MID(ROW(A111111),3,1))=SUM(--MID(ROW(A111111),{3;4;5;6;1;2},1)*10^(6-ROW($1:$6)))))*((ROW(A111111)*(--MID(ROW(A111111),2,1))=SUM(--MID(ROW(A111111),{5;6;1;2;3;4},1)*10^(6-ROW($1:$6)))))*(ROW(A111111)*(--MID(ROW(A111111),5,1))=SUM(--MID(ROW(A111111),{6;1;2;3;4;5},1)*10^(6-ROW($1:$6))))

Ctrl+Shif+Enter rồi fill đến dòng cuối cùng, sau đó fillter cột A lấy=1!!!
Ta được 2 kết quả là 111111 và 142857 , gắn vào điều kiện (2) và (5) của đề thì thỏa hết, vậy có 2 kết quả là 111111 và 142857
Không biết giống cách của thầy huuthang_bd không, hi!!!

Cách này là tìm đáp án chứ không phải là giải toán.
P/S: Excel 2007 cũng dùng được công thức này mà.

 

[lenongree]

Cách này là tìm đáp án chứ không phải là giải toán.
P/S: Excel 2007 cũng dùng được công thức này mà.

Hi, em không nhớ excel 2007 được 1 triệu dòng!!!

 

[befaint]

Tìm thấy bài này... nhưng đọc xong
http://diendantoanhoc.net/topic/96625-tìm-số-tự-nhiên-có-6-chữ-số/

 

[SA_DQ]

Từ (1) ta có A = 1 (a)
Tiếp theo, từ (2): F * G = 1 (b)
Chỉ có thể là (F,G) := (3, 7) (Cặp (9, 9) không thể chọn (c)

Tiếp theo từ (4) ta chỉ có thể có các cập sau (3,5); (7,5) & (9,5) Cho nhóm (E,F) ;Cặp (5,5) bị loại
Kết hợp với điều (c) trên, (E,F) chỉ có thể là (5,7,3)

 

[huuthang_bd]

Từ (1) ta có A = 1 (a)
Tiếp theo, từ (2): F * G = 1 (b)
Chỉ có thể là (F,G) := (3, 7) (Cặp (9, 9) không thể chọn (c)
Tiếp theo từ (4) ta chỉ có thể có các cập sau (3,5); (7,5) & (9,5) Cho nhóm (E,F) ;Cặp (5,5) bị loại
Kết hợp với điều (c) trên, (E,F) chỉ có thể là (5,7,3)

Tiếp đi Bác

Mình thì giải thế này:
Từ (1): ABCDEF * C = CDEFAB
=> A = 1 hoặc C = 1 (a)
Mà ABCDEF * C <> ABCDEF
=> C <> 1, mà (a) nên A = 1
Tiếp theo ABCDEF * C = CDEFAB
=> B * C < 10 (vì nếu >=10 thì kết quả của (1) không thể bắt đầu bằng C) (b)
Mà B, C <> 1 (vì A đã là 1) => B và C là 2 hoặc 3 hoặc 4 (c)
Từ (3): ABCDEF * B = EFABCD
=> B <> 2 (vì nếu B = 2 thì 12xxxx * 2 = 2xxxxx kết quả của (3) phải bắt đầu bằng B)
Kết hợp với (c) => B là 3 hoặc 4 (d)
Kết hợp với (b) => C = 2 (C không thể là 3 hoặc 4 vì nếu B = 3 và C = 4 hoặc ngược lại thì B * C = 12, không thỏa (b))
C = 2 => kết quả của (1) là số chẵn mà (d) nên => B = 4
Từ (1): ABCDEF * C = CDEFAB và (A = 1, B = 4, C = 2) => D = 8 (vì 142xxx * 2 = 28xxxx)
Từ (3): ABCDEF * B = EFABCD và (A = 1, B = 4, C = 2, D = 8) => E = 5 (vì 1428xx * 4 = 571xxx)
Từ (4): ABCDEF * E = FABCDE và (A = 1, B = 4, C = 2, D = 8, E = 5) => F = 7 (vì 14285x * 5 = 7142xx)

==> ABCDEF = 142857

 

[SA_DQ]

Mình thì thấy hướng giải 2 hệ fượng trình khỏe hơn
đó là hệ (1)

(1)  ABCDEF * C = CDEFAB
(2)  ABCDEF * G = BCDEFA
(3)  ABCDEF * B = EFABCD
(4)  ABCDEF * E = FABCDE
(5)  ABCDEF * H = DEFABC  
(6) A =1
(7) F =3
(8) G = 7

& hệ (2)

(1)  ABCDEF * C = CDEFAB
(2)  ABCDEF * G = BCDEFA
(3)  ABCDEF * B = EFABCD
(4)  ABCDEF * E = FABCDE
(5)  ABCDEF * H = DEFABC 
(6) A=1
(7) F=7
(8) G =3

Có excel mà lo gì bão tố với fong ba; Tìm định thức là ra tuốt; Tuy vậy thôi, mình chưa thử bao giờ!

 

[huuthang_bd]

Nếu dùng Excel để tìm đáp án thì có lẽ có nhiều cách. Cứ phan đại đến khi nào trúng thì thôi. Khỏi cần suy nghĩ nhiều.

Sub TimSo()
Dim A As Long, B As Long, C As Long, D As Long, E As Long, F As Long, G As Long, H As Long, SoKiemTra As Long
For A = 1 To 9
    SoKiemTra = 2 ^ A
    For B = 0 To 9
        If (SoKiemTra And 2 ^ B) = 0 Then
            SoKiemTra = SoKiemTra + 2 ^ B
            For C = 0 To 9
                If (SoKiemTra And 2 ^ C) = 0 Then
                    SoKiemTra = SoKiemTra + 2 ^ C
                    For D = 0 To 9
                        If (SoKiemTra And 2 ^ D) = 0 Then
                            SoKiemTra = SoKiemTra + 2 ^ D
                            For E = 0 To 9
                                If (SoKiemTra And 2 ^ E) = 0 Then
                                    SoKiemTra = SoKiemTra + 2 ^ E
                                    For F = 0 To 9
                                        If (SoKiemTra And 2 ^ F) = 0 Then
                                            SoKiemTra = SoKiemTra + 2 ^ F
                                            For G = 0 To 9
                                                If (SoKiemTra And 2 ^ G) = 0 Then
                                                    SoKiemTra = SoKiemTra + 2 ^ G
                                                    For H = 0 To 9
                                                        If (SoKiemTra And 2 ^ H) = 0 Then
                                                            KiemTra A, B, C, D, E, F, G, H
                                                        End If
                                                    Next
                                                    SoKiemTra = SoKiemTra - 2 ^ G
                                                End If
                                            Next
                                            SoKiemTra = SoKiemTra - 2 ^ F
                                        End If
                                    Next
                                    SoKiemTra = SoKiemTra - 2 ^ E
                                End If
                            Next
                            SoKiemTra = SoKiemTra - 2 ^ D
                        End If
                    Next
                    SoKiemTra = SoKiemTra - 2 ^ C
                End If
            Next
            SoKiemTra = SoKiemTra - 2 ^ B
        End If
    Next
Next
End Sub

Private Sub KiemTra(A As Long, B As Long, C As Long, D As Long, E As Long, F As Long, G As Long, H As Long)
Dim So As Long
So = CLng(A & B & C & D & E & F)
If So * CLng(C) <> CLng(C & D & E & F & A & B) Then Exit Sub
If So * CLng(G) <> CLng(B & C & D & E & F & A) Then Exit Sub
If So * CLng(B) <> CLng(E & F & A & B & C & D) Then Exit Sub
If So * CLng(E) <> CLng(F & A & B & C & D & E) Then Exit Sub
If So * CLng(H) <> CLng(D & E & F & A & B & C) Then Exit Sub
MsgBox A & B & C & D & E & F
End Sub

 

[SA_DQ]

[thongbao]Nếu dùng Excel để tìm đáp án thì có lẽ có nhiều cách. Cứ phan đại đến khi nào trúng thì thôi. Khỏi cần suy nghĩ nhiều.[/thongbao]
Chàng này từ quá tả lại chuyển sang quá hữu rồi!
Rất vui nếu các bạn tìm thêm cách giải mới!