parcount.pas

Пример программы для функции ParamCount.

Код примера
 {Parcount.PAS}
 
 { Пример программы для функции ParamCount }
 
 Begin
  If ParamCount = 0 Then WriteLn('В командной строке не заданы параметры!')
  Else WriteLn(ParamCount, ' параметр(а)(ов)');
 End.

Скачать parcount.pas