ik moet de volgende reeks bepalen 1+1/2+1/4+1/8 enz. vooraf wordt er gevraagd hoeveel termen er opgeteld moeten worden. het volgende heb ik al
ik krijg alleen niet het aantal termen gekoppeld aan de functie. kan iemand mij een tip geven?
Sub reeks()
Dim tel As Single
Dim getal As Integer
getal = InputBox("uit hoeveel termen moet de reeks bestaan")
Do
tel = 1 + 1 / 2 * tel
MsgBox tel
Loop
End Sub
ik krijg alleen niet het aantal termen gekoppeld aan de functie. kan iemand mij een tip geven?
Sub reeks()
Dim tel As Single
Dim getal As Integer
getal = InputBox("uit hoeveel termen moet de reeks bestaan")
Do
tel = 1 + 1 / 2 * tel
MsgBox tel
Loop
End Sub
Laatst bewerkt:
