DEF
I J INTEGER
ENDDEF

LOOP
 I PUSH
 IF I 50 >
 THEN
  EXIT
 ELSE
  WHILE J 200 <
  DO
   I 10 MUL
   J STO
  ENDWHILE
  I INC
 ENDIF
ENDLOOP