RosettaCodeData/Task/Substring-Top-and-tail/TUSCRIPT/substring-top-and-tail.tu
2013-04-11 11:14:19 -07:00

9 lines
147 B
Turing

$$ MODE TUSCRIPT
str="upraisers"
str1=EXTRACT (str,2,0)
str2=EXTRACT (str,0,-1)
str3=EXTRACT (str,2,-1)
PRINT str
PRINT str1
PRINT str2
PRINT str3