Task

Create an enumeration of constants with and without explicit values.




ENUM APPLE, BANANA, CHERRY
 
PROC main()
  DEF x
  ForAll({x}, [APPLE, BANANA, CHERRY],
         `WriteF('\d\n', x))
ENDPROC