RosettaCodeData/Task/Substring-Top-and-tail/TUSCRIPT/substring-top-and-tail.tu

10 lines
147 B
Turing
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
$$ 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