# D = 3
CLEAR D INCREASE D INCREASE D
# H = 180
INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H INCREASE H
# I = 1 Whether the algorithm runs or not
INCREASE I
# X = 1
CLEAR A
CLEAR B
CLEAR C
REPEAT X TIMES (
INCREASE B
REPEAT A TIMES (
CLEAR A
CLEAR B
INCREASE C
)
REPEAT B TIMES (
CLEAR B
INCREASE A
)
)
CLEAR A
INCREASE A
REPEAT C TIMES (
CLEAR A
)
REPEAT A TIMES (
CLEAR I
)
# Algorithm
REPEAT H TIMES (
REPEAT I TIMES (
PRINT X
# Parity -> A
CLEAR A
CLEAR B
REPEAT X TIMES (
INCREASE B
REPEAT A TIMES (
CLEAR A
CLEAR B
)
REPEAT B TIMES (
CLEAR B
INCREASE A
)
)
# Conditional
INCREASE B
# Odd
REPEAT A TIMES (
CLEAR B
# 3x + 1
REPEAT X TIMES (
REPEAT D TIMES (
INCREASE X
)
)
INCREASE X
)
# Even
REPEAT B TIMES (
CLEAR E
CLEAR F
CLEAR G
REPEAT X TIMES (
INCREASE F
REPEAT E TIMES (
CLEAR E
CLEAR F
INCREASE G
)
REPEAT F TIMES (
CLEAR F
INCREASE E
)
)
CLEAR X
REPEAT G TIMES (
INCREASE X
)
)
# x = 0 or 1
CLEAR A
CLEAR B
CLEAR C
REPEAT X TIMES (
INCREASE B
REPEAT A TIMES (
CLEAR A
CLEAR B
INCREASE C
)
REPEAT B TIMES (
CLEAR B
INCREASE A
)
)
CLEAR A
INCREASE A
REPEAT C TIMES (
CLEAR A
)
REPEAT A TIMES (
CLEAR I
)
)
)
PRINT X