RosettaCodeData/Task/Enumerations/FutureBasic/enumerations.futurebasic

22 lines
369 B
Plaintext

include "ConsoleWindow"
begin enum 1
_apple
_banana
_cherry
end enum
begin enum
_appleExplicit = 10
_bananaExplicit = 15
_cherryExplicit = 30
end enum
print "_apple ="; _apple
print "_banana ="; _banana
print "_cherry ="; _cherry
print
print "_appleExplicit ="; _appleExplicit
print "_bananaExplicit ="; _bananaExplicit
print "_cherryExplicit ="; _cherryExplicit