Anonymous user
Substring/Top and tail: Difference between revisions
Added Delphi example
(Added Nemerle) |
(Added Delphi example) |
||
Line 110:
writeln("brooms"[1..$-1]); // strip both first and last characters
}</lang>
=={{header|Delphi}}==
<lang Delphi>program TopAndTail;
{$APPTYPE CONSOLE}
const
TEST_STRING = '1234567890';
begin
Writeln(TEST_STRING); // full string
Writeln(Copy(TEST_STRING, 2, Length(TEST_STRING))); // first character removed
Writeln(Copy(TEST_STRING, 1, Length(TEST_STRING) - 1)); // last character removed
Writeln(Copy(TEST_STRING, 2, Length(TEST_STRING) - 2)); // first and last characters removed
Readln;
end.</lang>
=={{header|Euphoria}}==
| |||