RosettaCodeData/Task/Substring-Top-and-tail/Liberty-BASIC/substring-top-and-tail.basic

string$ = "Rosetta Code"
Print Mid$(string$, 2)
Print Left$(string$, (Len(string$) - 1))
Print Mid$(string$, 2, (Len(string$) - 2))