RosettaCodeData/Task/String-case/BASIC/string-case-7.basic
2014-01-17 05:34:36 +00:00

5 lines
116 B
Text

a$ ="alphaBETA"
print a$ '=> alphaBETA
print upper$(a$) '=> ALPHABETA
print lower$(a$) '=> alphabeta