RosettaCodeData/Task/Substring/Free-Pascal/substring.free

6 lines
103 B
Text
Raw Permalink Normal View History

2019-09-12 10:33:56 -07:00
s[n..n+m]
s[n..high(nativeUInt)]
s[1..length(s)-1]
s[pos(c, s)..pos(c, s)+m]
s[pos(p, s)..pos(p, s)+m]