RosettaCodeData/Task/Command-line-arguments/PascalABC.NET/command-line-arguments.pas

5 lines
67 B
ObjectPascal

begin
for var i:=1 to ParamCount do
Print(ParamStr(i));
end.