Question

How to print all command line arguments except the program name in Pascal

Answer 1

program CommandLineArguments;
 
var
    i: Integer;
begin
    for i := 1 to ParamCount - 1 do
        Write(ParamStr(I), ' ');
        if (ParamCount > 0) then
            Write(ParamStr(ParamCount));
        WriteLn();
end.



(*
run:

abc 123 F35

*)

 

70+ SQL courses for beginners and professionals