program Capitalise(input, output, stdErr); (* Accept a String from commandline, convert first character to upper case Pascal Strings begins with 1, not 0 *) var buf: string; begin buf := paramStr(1); if buf = '' then writeln('Usage: please provide a string') else buf := UpCase(buf); writeln(buf); end.
If you see anything you'd like to change or update, please consider contributing.
Note: The solution shown above is the current solution in the Sample Programs repository as of Oct 18 2020 11:36:50. The solution was first committed on Oct 17 2020 07:57:13. As a result, documentation below may be outdated.
No 'How to Implement the Solution' section available. Please consider contributing.
No 'How to Run the Solution' section available. Please consider contributing.