Vraag 1:
Sub Vraag1()
Dim i As Double, a As Double
i = 0
a = 0
Do while a <= 1
i = i + 1
a = i / 10
Loop
MsgBox i
End Sub
Het antwoordt op deze vraag moet 11 zijn, terwijl ik niet verder kom dan 10.. Iemand een uitleg?!
Vraag 2:
Function f(x, y , z)
For i = 1 To 3
x = z + 1
z = x + 1
y = 1
Next
f = x + y + z
End Function
Het antwoord op deze vraag moet zijn:
For i = 1:
x=4, z=5,y=1
For i = 2
x=6, z=7,y=1
For i = 3
x = 8, z = 9, y = 1
f = 8 + 9 + 1 = 18
Als iemand deze twee of een vraag kan uitleggen heel graag, bij voorbaat dank!
Sub Vraag1()
Dim i As Double, a As Double
i = 0
a = 0
Do while a <= 1
i = i + 1
a = i / 10
Loop
MsgBox i
End Sub
Het antwoordt op deze vraag moet 11 zijn, terwijl ik niet verder kom dan 10.. Iemand een uitleg?!
Vraag 2:
Function f(x, y , z)
For i = 1 To 3
x = z + 1
z = x + 1
y = 1
Next
f = x + y + z
End Function
Het antwoord op deze vraag moet zijn:
For i = 1:
x=4, z=5,y=1
For i = 2
x=6, z=7,y=1
For i = 3
x = 8, z = 9, y = 1
f = 8 + 9 + 1 = 18
Als iemand deze twee of een vraag kan uitleggen heel graag, bij voorbaat dank!