Bonjour j'ai écris le bout de code suivant permettant la décomposition d'un entier en produit de facteurs premiers
il marche bien , mais j'aimerai pouvoir trouver un stratégie pour appeler chaque nombre premier à tester en ne me servant pas d'un tableau .
Sub decomposition_fact_prem()
t = Array(2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97)
n = InputBox("Saisir un entier à decomposer en facteurs premiers")
1:
For i = 0 To UBound(t)
j = 0
If n Mod Val(t(i)) = 0 Then
Do
j = j + 1
Loop Until n Mod (Val(t(i)) ^ j) <> 0
w = w & "*" & Val(t(i)) & "^" & j - 1
n = n / (Val(t(i)) ^ (j - 1))
If n <> 1 Then
GoTo 1
Else
MsgBox Mid(w, 2, Len(w))
Exit Sub
End If
End If
Next
End Sub
Si bvous avez des suggestions ,je suis preneur , Merci à vous.