Hogyan lehet ez megoldani 1814 1+8=23;18+1+4=23;18+14=32 Hány db 4 jegyű szám van ami pontosan ezt tudja?

Pontosan mit?

Egy számod, az 1814. Eddig értem.

Az 1+8=23 nem igaz. A másik két összefüggés igaz, csak eltérő eredményt ad.

Szóval próbáld meg a feladatot úgy megfogalmazni, hogy érthető is legyen.

Gondolom arra gondoltál, hogy a két első számjegy összege hozzáadva a második kétjegyű félhez 23 legyen és fordítva: a két utolsó számjegy összege adva az első kétjegyű félehez is 23 legyen. (1+8+14=1+4+18=23)

Ha a szám alakja általánosan ABCD akkor

A+B+(10*C)+D=23

C+D+(10*A)+B=23

Ezt a 4 ismeretlenes egyenletrendszert kell megoldanod...

Mondjuk én lusta disznó vagyok, így írtam egy nyúlfarknyi kis basic proggit rá, ami behelyettesítéssel végigtekerte egy pillanat alatt:

For s = 1000 To 9999

A = Val(Mid(Str(s), 2, 1))

B = Val(Mid(Str(s), 3, 1))

C = Val(Mid(Str(s), 4, 1))

D = Val(Mid(Str(s), 5, 1))

If (A + B + (10 * C) + D = 23) And C + D + (10 * A) + B = 23 Then Text1.Text = Text1.Text + Str(s) + vbCrLf

Next

Eszerint a keresett számok:

1319, 1418, 1517, 1616, 1715, 1814, 1913, 2021, 2120

Tehát 9 lehetséges négyjegyű kombináció képzelhető el!