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

5 lines
117 B
Text
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
10 A$="knight":B$="socks":C$="brooms"
20 PRINT MID$(A$,2)
30 PRINT LEFT$(B$,LEN(B$)-1)
40 PRINT MID$(C$,2,LEN(C$)-2)