Language:
Русский
English
{Parcount.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the ParamCount function.}
begin
if ParamCount = 0 then
Writeln('No parameters on command line')
else
Writeln(ParamCount, ' parameter(s)');
end.
Parcount.PAS |
Language: {Parcount.PAS} begin |
|
|