Substring/Top and tail: Difference between revisions
Added FreeBASIC
(Added FreeBASIC) |
|||
Line 477:
end program substring</lang>
=={{header|FreeBASIC}}==
<lang freebasic>' FB 1.05.0 Win64
Dim s As String = "panda"
Dim s1 As String = Mid(s, 2)
Dim s2 As String = Left(s, Len(s) - 1)
Dim s3 As String = Mid(s, 2, Len(s) - 2)
Print s
Print s1
Print s2
Print s3
Sleep</lang>
{{out}}
<pre>
panda
anda
pand
and
</pre>
=={{header|Go}}==
| |||