# Set I, the number of iterations, to 196
INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W
REPEAT W TIMES (
REPEAT W TIMES (
INCREASE I # Increase to 14^2 = 196
)
)
# Set M to 3
INCREASE M INCREASE M INCREASE M
PRINT X
REPEAT I TIMES (
## Set P = 1 if X > 1 ##
REPEAT X TIMES ( # X-1
REPEAT N TIMES (
CLEAR P
INCREASE P
)
CLEAR N
INCREASE N
)
CLEAR N
#########################
REPEAT P TIMES (
# Check if X is even (then E=1) Z = X/2
INCREASE E
REPEAT X TIMES (
REPEAT E TIMES ( CLEAR E CLEAR T )
REPEAT T TIMES ( CLEAR T INCREASE E INCREASE Z )
INCREASE T
)
INCREASE O # Setting odd to 1, if even then gets set to 0
# If X is even
REPEAT E TIMES (
# Set X to be Z
CLEAR X
REPEAT Z TIMES ( INCREASE X )
CLEAR O
)
# If X is odd
REPEAT O TIMES (
# Print result of 3x+1
# Set J to 3x +1
REPEAT X TIMES ( REPEAT M TIMES ( INCREASE J ) ) INCREASE J
PRINT J
# Print the result of (3x+1)/2
REPEAT Z TIMES ( INCREASE X ) INCREASE X
)
CLEAR Z
CLEAR J
CLEAR E
CLEAR O
PRINT X
)
CLEAR P
)