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

4 lines
110 B
Plaintext

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