Substring/Top and tail: Difference between revisions
Content added Content deleted
(Added FreeBASIC) |
|||
Line 477: | Line 477: | ||
end program substring</lang> |
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}}== |
=={{header|Go}}== |