RosettaCodeData/Task/String-case/Picat/string-case.picat

5 lines
86 B
Plaintext

main =>
S = "alphaBETA",
println(to_uppercase(S)),
println(to_lowercase(S)).