Résoudre une équation à 50 inconnues

Bonjour,

J'aimerai résoudre une équation du type 10x+5y+30z = -10

Seulement, j'ai pas que 3 inconnues mais 50. je sais juste que mes inconnues ne peuvent prendre que 9 valeurs possibles (-4, -3, -2, -1, 0, 1, 2, 3, 4) .

Est-ce qu'il y a un moyen que excel me donne les différentes solutions possibles?

Si c'est trop compliqué pour excel car trop de solutions possibles, j'ai la possibilité lui donner une autre équation qui a les mêmes inconnues (2x + 3y + 4z =0 )

Merci d'avance :)

bonjour,

proposition avec vba

19ayuda.xlsm (14.95 Ko)

Merci h2so4

Ton code VBA, tu l'as écrit manuellement? Je dois rajouter un for pour mes 50 lignes ?

Sub aargh()
    For x = -4 To 4
        Range("b1") = x
        For y = -4 To 4
            Range("b2") = y
            For Z = -4 To 4
                Range("b3") = Z
                'If Range("B5") = Range("B4") And Range("B6") = 0 Then
                                If Range("B5") = Range("B4") Then
                    sol = sol + 1
                    Range("B1:B6").Copy Cells(1, sol + 2)
                End If
            Next Z
        Next y
    Next x
End Sub

Pareil pour les équations, je les rentre à la main et j'y intègre les 50 inconnues ?

bonjour,

j'ai lu un peu vite ta demande, j'ai cru qu'elle était limitée à 3 inconnues.

pour 50 inconnues, ajouter des for est une possibilité, mais cela risque de prendre du temps à l'exécution. A 1millisecondes par possibilité, il te faudra 1.6e37 années

Rechercher des sujets similaires à "resoudre equation inconnues"