Factorisation lu
Fermé
AMI
-
27 mai 2011 à 09:46
chossette9 Messages postés 4239 Date d'inscription lundi 20 avril 2009 Statut Contributeur Dernière intervention 12 septembre 2014 - 27 mai 2011 à 10:32
chossette9 Messages postés 4239 Date d'inscription lundi 20 avril 2009 Statut Contributeur Dernière intervention 12 septembre 2014 - 27 mai 2011 à 10:32
2 réponses
Bonjour, essayez de travailler sur ce code en vba
"Sub DECO_LU()
Dim a, s, u, l As Single
Dim i, j As Integer
For i = 1 To n
For j = 1 To n
s = a(i, j)
If i < j Then
For k = 1 To i - 1
s = s - l(i, k) * u(k, j)
u(i, j) = s
Else
For k = 1 To j - 1
s = s - l(i, k) * u(k, j)
l(i, j) = s / u(j, j)
End If
End Sub"
"Sub DECO_LU()
Dim a, s, u, l As Single
Dim i, j As Integer
For i = 1 To n
For j = 1 To n
s = a(i, j)
If i < j Then
For k = 1 To i - 1
s = s - l(i, k) * u(k, j)
u(i, j) = s
Else
For k = 1 To j - 1
s = s - l(i, k) * u(k, j)
l(i, j) = s / u(j, j)
End If
End Sub"
chossette9
Messages postés
4239
Date d'inscription
lundi 20 avril 2009
Statut
Contributeur
Dernière intervention
12 septembre 2014
1 306
27 mai 2011 à 10:32
27 mai 2011 à 10:32
Bonjour,
que veux-tu exactement ?
Cordialement.
que veux-tu exactement ?
Cordialement.
