RosettaCodeData/Task/String-case/TUSCRIPT/string-case.tu

9 lines
203 B
Turing
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
$$ MODE TUSCRIPT,{}
string="alphaBETA"
lowercase =EXCHANGE(string," {&a} {-0-} ")
uppercase1=EXCHANGE(string," {&a} {-0+} ")
uppercase2=CAPS (string)
PRINT lowercase
PRINT uppercase1
PRINT uppercase2