bonsoir, j'ai un exo en visual et ce que j'ai fait me laisse perplexe, si quelqu'un pouvait y jeter un coup d'oeil svp ..
j'ai (un) avec n>0 une suite numérique avec u1 = 2 et un = 2u(n-1)+3
je dois écrire un algorithme qui demande à l'utilisateur la valeur de n puis affiche u(n)
voila ce que j'ai écrit :
Sub exo()
Dim i, n As Integer
Dim S() As Integer
n = InputBox("donner la valeur de n" )
ReDim S(n)
For i = 1 To n
S(1) = 2
S(i) = 2 * S(i - 1) + 3
Next
MsgBox ("la valeur de Sn est " & S(n))
End Sub
ça tourne, le soucis c'est que j'arrive pas à comprendre pourquoi quand je mets n=1 il calcule et trouve S(1)=3 alors que je précise bien que S(1)=2 .
si qqn pouvait m'aider à corriger ça svp et jeter un ptit coup d'oeil sur mon prog, merci !