6 lines
173 B
Text
6 lines
173 B
Text
s$ = "Rosetta Code"
|
|
|
|
PRINT s$
|
|
PRINT MID$(s$, 2) 'strip first
|
|
PRINT LEFT$(s$, LEN(s$) - 1) 'strip last
|
|
PRINT MID$(s$, 2, LEN(s$) - 2) 'strip first and last
|