[pascal] matrice inverse et multiplication

Question

bonjour,
J'aimerai que l'on m'aide pour trouver un algorythme en pascal (pas en turbo pascal) pour calculer l'inverse d'une matrice et la multiplication de deux matrices.
Merci de votre aide.
alexandre

baladur13 · Accepted Answer

Je ne peux resoudre ton PB, regarde la si tu trouves de quoi moudre...
 https://pascail.developpez.com/contribution/?page=unite#matrices1

ARSIH · Answer

je ne sais pas programmer en pascal mais juste un pt astuce pr  programmer la multiplication de deux matrices.

program produitde2matr;
uses wincrt;
var MatrA, MatrB, ProdMatr: array [1..3] of integer;
      i,j,k: integer;
BEGIN
        for i := 1 to 3 do
            for j := 1 to 3 do
                    readln (MatrA[i,j]);
        
        for i := 1 to 3 do
            for j := 1 to 3 do
                    readln (MatrB[i,j]);
          
        for i := 1 to 3 do
           begin
             ProdMatr := 0;                
                for j := 1 to 3 do
                    begin
                       for k := 1 to 3 do
                         prodMatr[i,j] := ProdMatr[i,j] + (MatrA[i,k]*MatrB[k,j]);
                    end;
           end;
END.

[pascal] matrice inverse et multiplication

2 réponses

Discussions similaires

Newsletters