RosettaCodeData/Task/String-case/IS-BASIC/string-case.basic

4 lines
110 B
Plaintext

100 INPUT PROMPT "String: ":TX$
110 PRINT "Lower case: ";LCASE$(TX$)
120 PRINT "Upper case: ";UCASE$(TX$)