[pascal] matrice inverse et multiplication

Fermé
al_aliias Messages postés 2 Date d'inscription vendredi 18 mai 2007 Statut Membre Dernière intervention 25 juin 2007 - 18 mai 2007 à 11:02
 ARSIH - 13 avril 2011 à 14:20
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
A voir également:

2 réponses

baladur13 Messages postés 46847 Date d'inscription mercredi 11 avril 2007 Statut Modérateur Dernière intervention 25 octobre 2024 13 408
18 mai 2007 à 18:08
Je ne peux resoudre ton PB, regarde la si tu trouves de quoi moudre...
https://pascail.developpez.com/contribution/?page=unite#matrices1
3
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.
2