Dim X As Integer, Z As String
Z = "Stop "
For X = 1 to 4
Z = "Go " & Z
Next X
Dim X As Integer
X = 3
Do While X < 15
X = 2 * X - 1
Loop
Dim a(1 to 20) As Integer, X as Integer a(5) = 1 a(8) = 2 a(13) = 4 X = a(5+8)
Dim X As Integer, box(1 to 10) As Integer, answer As Integer
For X = 1 to 10
box(X) = 2*X
Next X
answer = box(7) + box(3)
Dim X As Integer, Y As Integer, loyola(1 to 3) As Integer
For X = 1 to 3
loyola(X) = 1
Next X
For X = 2 to 3
loyola(X) = X*loyola(X-1)
Next X
Y = loyola(3)